[Gcl-devel] Compiler does not give error if T clause in case construct is not last one

[Faheem Mitha]

Hi,

The bugs page at http://savannah.gnu.org/bugs/?group=gcl looks dead, so I'm 
writing to the developer mailing list. If there is a more suitable place to 
report bugs, let me know and I'll send it there.

Consider the following session. I believe this is wrong.

address@hidden:/usr/bin$ gcl
GCL (GNU Common Lisp)  2.6.7 CLtL1    Jan 20 2012 20:04:53
Source License: LGPL(gcl,gmp), GPL(unexec,bfd,xgcl)
Binary License:  GPL due to GPL'ed components: (XGCL READLINE UNEXEC)
Modifications of this banner must retain notice of a compatible license
Dedicated to the memory of W. Schelter

Use (help) to get some basic information on how to use GCL.
Temporary directory for compiler files set to /tmp/

> (defparameter x 2)

X

> (defun foo (y) (case y (t (print "matches t")) (1 (print "matches 1")) ) 
)

FOO

> (foo x)

"matches t"
"matches t"

See also https://bugs.launchpad.net/sbcl/+bug/959687 for context.

Please CC me on any reply. Thanks.

                                                 Regards, Faheem