[Openmcl-devel] Arglist of :accessors

Sven Van Caekenberghe sven at beta9.be
Sun Jan 4 02:11:59 PST 2004


I noticed the following difference between 0.13 and the latest 0.14:

Welcome to OpenMCL Version (Beta: Darwin) 0.13.6!
? (defclass foo () ((bar :accessor get-bar)))
#<STANDARD-CLASS FOO>
? (arglist #'get-bar)
(#:FOO)
:ANALYSIS

Welcome to OpenMCL Version (Alpha: Darwin) 0.14-031220!
? (defclass foo () ((bar :accessor get-bar)))
#<STANDARD-CLASS FOO>
? (arglist #'get-bar)
(CCL::ARG-0)
:ANALYSIS

Maybe this has something to do with the newer slot access code or 
extended MOP support.

Sven




More information about the Openmcl-devel mailing list