Does anyone know how to define subclasses of structure-classes
as in the example:
(defclass foo ()
((a :initarg :a :accessor a))
(:metaclass structure-class))
This defclass is fine in CMUCL, but fails in Allegro 6.2 with the
error:
:DIRECT-SUPERCLASSES :DIRECT-SLOTS are invalid initargs to
make-instance of class #<STANDARD-CLASS STRUCTURE-CLASS>. The valid
initargs are :PLIST :NAME.
"lisping-forever" <····@ai.sri.com> writes:
> This defclass is fine in CMUCL, but fails in Allegro 6.2 with the
> error:
>
> :DIRECT-SUPERCLASSES :DIRECT-SLOTS are invalid initargs to
> make-instance of class #<STANDARD-CLASS STRUCTURE-CLASS>. The valid
> initargs are :PLIST :NAME.
The behavior (initargs, slots, etc) of STRUCTURE-CLASS is unspecified.
--
Rahul Jain
·····@nyct.net
Professional Software Developer, Amateur Quantum Mechanicist