From: Sam S. <sd...@gn...> - 2005-01-24 14:06:39
|
> * Bruno Haible <un...@hf...g> [2005-01-24 10:31:20 +0000]: > > (cl:defun export-accessories (name) > (export name) > - (export (clos::class-kconstructor name)) > - (export (clos::class-predicate name)) > + (export (or (clos::class-kconstructor name) '(NIL))) > (export (clos::class-boa-constructors name)) > + (export (or (clos::class-copier name) '(NIL))) > + (export (or (clos::class-predicate name) '(NIL))) > (export (class-accessor-symbols name))) why do you want to export the symbol NIL? -- Sam Steingold (http://www.podval.org/~sds) running w2k <http://www.camera.org> <http://www.iris.org.il> <http://www.memri.org/> <http://www.mideasttruth.com/> <http://www.honestreporting.com> When we write programs that "learn", it turns out we do and they don't. |