[Gcl-devel] defclass errors

[Camm Maguire]

Greetings!  Here are some more tests in which GCL fails idenitcally
with cmucl 18e:

(defclass class-07 () ((s1 :initarg :s1a :initarg :s1b :reader s1)
                       (s2 :initarg :s2 :reader s2)))
; 
#<STANDARD-CLASS CLASS-07 {4805F51D}>
* (LET ((C
                (MAKE-INSTANCE 'CLASS-07 :S1A 'X :S2
                    'Y :ALLOW-OTHER-KEYS NIL)))
        (VALUES (S1 C) (S2 C)))


Invalid initialization argument :ALLOW-OTHER-KEYS for class CLASS-07

Restarts:
  0: [ABORT] Return to Top-Level.

Debug  (type H for help)

("DEFMETHOD MAKE-INSTANCE (CLASS)" #<unused-arg> #<unused-arg>
 #<Standard-Class CLASS-07 {48058645}> (:S1A X :S2 Y :ALLOW-OTHER-KEYS ...))
Source: Error finding source: 
Error in function DEBUG::GET-FILE-TOP-LEVEL-FORM:  Source file no longer exists:
  target:pcl/init.lisp.
0] 

Paul, is :allow-other-keys supposed to be allowable at all times even
when not in the class definition?  What then is the point of
&allow-other-keys in the defclass lambda list?

Take care,

-- 
Camm Maguire                                            address@hidden
==========================================================================
"The earth is but one country, and mankind its citizens."  --  Baha'u'llah