[Openmcl-devel] Lambda List Troubles

[Ben Hyde]

I suspect this is a bug.

* 558$ echo "(defclass foo () ()) (defgeneric alpha (foo t t))  
(quit)" | openmcl -n -Q --batch
#<STANDARD-CLASS FOO>
 > Error: Bad generic function lambda list: (FOO T T)
 > While executing: CCL::CHECK-GENERIC-FUNCTION-LAMBDA-LIST, in  
process listener(1).
 > Type :POP to abort, :R for a list of available restarts.
 > Type :? for other options.

That works in sbcl[1].

The results of  (ccl::verify-lambda-list '(float string fixnum)) v.s.  
(ccl::verify-lambda-list '(float string string)) don't look right  
either.

  - ben


[1]
557$ echo "(defclass foo () ()) (defgeneric alpha (foo t t)) (quit)"  
| sbcl --no-userinit
This is SBCL 0.9.16, an implementation of ANSI Common Lisp.
More information about SBCL is available at <http://www.sbcl.org/>.

SBCL is free software, provided as is, with absolutely no warranty.
It is mostly in the public domain; some portions are provided under
BSD-style licenses.  See the CREDITS and COPYING files in the
distribution for more information.
*
#<STANDARD-CLASS FOO>
*
#<STANDARD-GENERIC-FUNCTION ALPHA (0)>