[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
class-all-default-initargs #:slot-unbound
- To: CommonLoops.pa@Xerox.COM
- Subject: class-all-default-initargs #:slot-unbound
- From: kanderso@WILMA.BBN.COM
- Date: Thu, 19 May 88 15:15:09 -0400
- Cc: kanderson@WILMA.BBN.COM, pcl-user@WILMA.BBN.COM
- Redistributed: CommonLoops.pa
The classes at the top of the metabraid seem to have their
class-all-default-initargs unbound, although it seems like they should
be (). THis causes mki to fail. Here's a patch but i don't know what
the correct solution is:
(setf (class-all-default-initargs (symbol-class 't)) ())
(setf (class-all-default-initargs (symbol-class 'standard-class)) ())
(setf (class-all-default-initargs (symbol-class 'class)) ())
(setf (class-all-default-initargs (symbol-class 'standard-slot-description)) ())