[Openmcl-devel] :initarg caching

[Sven Van Caekenberghe]

On 04 Jan 2004, at 21:46, Gary Byers wrote:

> If you still have the session open, could you send me the output of
>
> ? (describe (find-class 'foo))

CL-USER> (describe (find-class 'foo))
#<STANDARD-CLASS FOO>
Class: #<STANDARD-CLASS STANDARD-CLASS>
Wrapper: #<CCL::CLASS-WRAPPER STANDARD-CLASS #x509DFE6>
Instance slots
CCL::DIRECT-METHODS: (#<STANDARD-WRITER-METHOD (SETF GET-BAR) (T FOO)>
                       #<STANDARD-READER-METHOD GET-BAR (FOO)>)
CCL::PROTOTYPE: NIL
CCL::NAME: FOO
CCL::PRECEDENCE-LIST: (#<STANDARD-CLASS FOO> #<STANDARD-CLASS 
STANDARD-OBJECT>
                        #<BUILT-IN-CLASS T>)
CCL::OWN-WRAPPER: #<CCL::CLASS-WRAPPER FOO #x570F47E>
CCL::DIRECT-SUPERCLASSES: (#<STANDARD-CLASS STANDARD-OBJECT>)
CCL::DIRECT-SUBCLASSES: NIL
CCL::DEPENDENTS: NIL
CCL::CLASS-CTYPE: #<CLASS-CTYPE FOO>
CCL::DIRECT-SLOTS: (#<STANDARD-DIRECT-SLOT-DEFINITION for instance slot 
BAR #x570F6A6>)
CCL::SLOTS: (#<STANDARD-EFFECTIVE-SLOT-DEFINITION for instance slot BAR 
#x570F55E>)
CCL::KERNEL-P: NIL
CCL::DIRECT-DEFAULT-INITARGS: NIL
CCL::DEFAULT-INITARGS: NIL
CCL::ALIST: NIL
CCL::MAKE-INSTANCE-INITARGS: #()
CCL::REINIT-INITARGS: NIL
CCL::REDEFINED-INITARGS: NIL
CCL::CHANGED-INITARGS: NIL