‘XCL Compiler output for source file {DSK}arunwelch>SKYDRIVE>DOCUMENTS>UNIX>LISP>CLOS>CURRENT>defs.lisp;1 Source file created Wednesday, 6 November 1991, 17:38:56. FASL file created Friday, 4 December 2020, 19:42:55. ÿ˜– o ˜Œ1 top-level form˜ŒFUNCTION˜“€˜Œ IN-PACKAGE˜ŒCLOS˜–"o ¿g X‘Hoc˜’Œ*DEFCLASS-TIMES*˜‘˜ŒCLOS˜ŒDEFVAR *DEFCLASS-TIMES*™˜“€˜ŒBOUNDP˜ŒPROCLAIM ™˜“˜ŒLOAD˜ŒEVAL˜ŒCOMPILE˜“˜ŒSPECIAL™˜–"o ¿g X‘Hoc˜’Œ*DEFMETHOD-TIMES*™˜ŒDEFVAR *DEFMETHOD-TIMES*™˜“€™ ™  ™˜“™ ™™˜“™™˜–"o ¿g X‘Hoc˜’Œ*DEFGENERIC-TIMES*™˜ŒDEFVAR *DEFGENERIC-TIMES*™˜“€™ ™  ™˜“™ ™™˜“™™˜–8o ¿g X‘HglÈgg c˜’Œ*SETF-FUNCTION-NAMES*™˜ŒDEFVAR *SETF-FUNCTION-NAMES*™˜“€0˜ŒMAKE-HASH-TABLE+˜ŒSYMBOL-FUNCTION™ ™ &˜ŒEQ!˜ŒTEST˜ŒSIZE ™ ˜“™™ œ˜’ŒGET-SETF-FUNCTION-NAME™˜–6@Q X‘H@Qho@ @ R ™ ˜’Œ*THE-CLOS-PACKAGE*™™*™˜“˜“˜ŒNAME0˜ŒPUTHASH+˜ŒINTERN%˜ŒFORMAT ˜Œ SYMBOL-NAME˜Œ PACKAGE-NAME˜ŒSYMBOL-PACKAGE˜•ŒGETHASH˜Œ SETF ~A ~Aœ˜’Œexpand-DO-STANDARD-DEFSETF™˜–0@¸gogggHhhoh™8™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT˜ŒQUOTE˜’ŒFN-NAME™˜ŒDOLIST˜Œ EVAL-WHEN$˜“˜“˜’ŒDO-STANDARD-DEFSETF-1™™> ˜“™™ ™˜–&gg ¿ggo ˜ŒDEFMACRO DO-STANDARD-DEFSETF™˜“€ ˜•ŒPUTPROP ˜•ŒSETF-MACRO-FUNCTION˜•ŒARGNAMES˜’ŒDO-STANDARD-DEFSETF™™8™K˜“˜Œ&REST˜ŒFUNCTION-NAMESœ˜’Œ!DO-STANDARD-DEFSETFS-FOR-DEFCLASS™˜–@¸h¹H‘HhY ¿H¸°ï™P™˜“˜“˜Œ ACCESSORS ™Aœ™A—˜–knX@¿HÉ ‘hHÉ Hý¿gHÉ o HÉ ¹HÉgI ¿InoH ™A™˜“˜“˜Œ FUNCTION-NAMEe˜•ŒSETF-SYMBOL-FUNCTIONP™HA™0<™44˜Œ CONCATENATE*™2™* ˜’Œ SETFBOUNDP™J˜ŒSETF-METHOD-EXPANDER"˜ŒSTRING/˜Œ-setf-expanderW˜•ŒCOMPILED-CLOSURE˜•Œ \PTRHUNK2™`[˜–I@¹hºh»h¼I¢J°¼J”KL&»„Lh[ºI¹°æ¹@ºh»IJKHÉKI HÉI$˜Œ SETF-EXPANDER˜ŒCLOSURE˜“˜“˜ŒBODY˜ŒENV:˜ŒAPPEND*˜ŒGENSYM™hœ™Z˜–X@ÁÉg'X‘H@ÁÉg'Y‘I@ÁÉg'Z‘J@ÁÉg'[‘K@ÁÉg'\‘L@ÁÉg'™Z™˜“˜“˜ŒSYMBOLQ˜•ŒSETF-METHOD-EXPANDERB™[3˜ŒSHARED-SETF-INVERSE$˜•ŒSETFN˜•Œ SETF-INVERSE˜Œ SETF-INVERSE˜–o¸h¹H‘HhY ¿H¸°ï˜Œ1 top-level form™˜“€™A˜“˜’Œ CLASS-WRAPPER™˜’ŒGENERIC-FUNCTION-NAME™˜’ŒMETHOD-FUNCTION-PLIST™˜’ŒMETHOD-FUNCTION-GET™˜’Œ GDEFINITION™˜’ŒSLOT-VALUE-USING-CLASS™˜–gg ˜ŒDEFSETF SLOT-VALUE™˜“€ ˜ŒSET-SETF-INVERSE˜’ŒSET-SLOT-VALUE™˜’Œ SLOT-VALUE™œ˜’Œexpand-PARSE-GSPEC™˜–‚…@X¹HZ[¼K½J^_¿N_¿h_¿h_¿Id3@ð_“O°,I3‘i€h_“O°I‘h€i_’O…I‘i€h˜Io€h’I°_O_¿IO_¿O_¿ggOhgLOhhMhggOhggOhoggOhhhgOgOhhhOhigoOohh_¿gO _¿O _¿h_¿h_¿h_ ¿O‘h€i_"’O"…O‘h€i“O°1OOh_ ¿O˜OO &_¿ˆO h__¿O_¿O_¿°¼Oh™‚ƒ™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT‚$˜ŒREVERSE‚™‚ˆ_™h ‚˜ŒLET‚ô˜ŒERROR‚ݘŒCADR‚Ö™‚‰‚Ä™‚‹‚¿˜ŒSYMBOLP‚®˜ŒCAR‚©™%‚Ÿ˜ŒLISTP‚š˜ŒAND‚‡™‚‰}™‚Œx˜ŒCOND‚˜“˜“™=˜“˜ŒSETF˜’Œ™˜“™=™‚‘‚ù˜Œ‚ Can't understand ~S as a generic function specifier.~%~ It must be either a symbol which can name a function or~%~ a list like ~S, where the car is the symbol ~S and the cadr~%~ is a symbol which can name a generic function.‚¸˜“˜“™=™‚‘S˜“™=˜ŒFUNCTION˜–&gg ¿ggo ˜ŒDEFMACRO PARSE-GSPEC™˜“€ ™H ™I™J˜’Œ PARSE-GSPEC™™‚ƒ™‚Ÿ˜“˜ŒSPEC˜Œ(NON-SETF-VAR . NON-SETF-CASE)˜Œ(SETF-VAR . SETF-CASE)œ˜’ŒUNENCAPSULATED-FDEFINITION™˜–@ ™‚¥™˜“˜“˜ŒSYMBOL˜•ŒVIRGINFNœ˜’ŒFDEFINE-CAREFULLY™˜–?@R¸@S¹@gi ¿@gi ¿@A ¿I–@ ¿H–@ ¿A˜•Œ ADVISEDFNS˜•Œ BROKENFNS™‚«™˜“˜“˜ŒSYMBOL˜ŒNEW-DEFINITION7˜’ŒREADVISE-FUNCTION˜‘˜ŒXEROX-COMMON-LISP.˜’ŒREBREAK-FUNCTION™‚³%™X˜’ŒUNBREAK-FUNCTION™‚³˜’ŒUNADVISE-FUNCTION™‚³˜ŒNO-ERROR ™‚¸œ˜’ŒGBOUNDP™˜–Y@d3@ð–@ @‘h€iX‘H…@‘i€h²@gð—@d3@ð‚h€hž@X o@og ™‚º™˜“˜“˜ŒSPECS™‚Š=˜ŒFBOUNDP8™*™‚¾N™‚‘!™‚‘I˜“™‚‘™‚’C™‚—œ˜’Œ GMAKUNBOUND™˜–Y@d3@ð–@ @‘h€iX‘H…@‘i€h²@gð—@d3@ð‚h€hž@X o@og ™‚Á™˜“˜“˜ŒSPECS™‚Š=˜Œ FMAKUNBOUND8™*™‚ÅN™‚‘!™‚‘I˜“™‚‘™‚’C™‚—œ™y˜–d@d3@ð²@ X‘H@ @‘h€iX‘H…@‘i€h²@gð—@d3@ð‚h€hž@X o@og ™y™˜“˜“˜ŒSPEC^™‚ŠH™‚¥C™*™‚¥ ˜ŒMACRO-FUNCTIONY™‚‘,™‚‘T˜“™‚‘™‚’N™‚—œ˜’ŒSETF CLOS GDEFINITION™˜–[Ad3@ð—A@ A‘h€iX‘H…A‘i€h²Agð—Ad3@ð‚h€hŸAX @ oAog ™‚Ι˜“˜“˜Œ NEW-VALUE˜ŒSPECU™‚Š?™‚«9™* ™‚«P™‚‘"™‚‘K˜“™‚‘™‚’E™‚—œ˜’Œ*TYPEP™˜–7A ²@ X˜AH hAh X™@Hb¿b¿°Ô@A ™‚Õ™˜“˜“˜ŒOBJECT˜ŒTYPE1˜ŒTYPEP˜’Œ FIND-CLASS™˜’ŒCLASS-PRECEDENCE-LIST™ ˜’ŒCLASS-OF™˜’ŒCLASSP™œ˜’Œ *SUBTYPEP™˜–B@ ‘@†@h ¸A ‘A†Ah ¹H‘I€h˜IH H‘H€I‘h@A ™‚à™˜“˜“˜ŒTYPE1˜ŒTYPE2<˜ŒSUBTYPEP+™‚Ü™‚Û™‚Þ ™‚Û™‚Þœ˜’ŒDO-SATISFIES-DEFTYPE™˜–$g@hggAhhh ™‚癘“˜“˜ŒNAME˜Œ PREDICATE™ ˜Œ SATISFIES™=˜ŒDEFTYPEœ˜’ŒMAKE-TYPE-PREDICATE-NAME™˜–$ho@ @ P ™+™‚“˜“˜ŒNAME™0™1™2 ™3™4˜ŒTYPE-PREDICATE ~A ~A˜–o ¿o ˜Œ2 top-level forms™˜“€™ ™  ˜“™˜’Œ*THE-WRAPPER-OF-T*™˜’Œ*THE-WRAPPER-OF-VECTOR*™˜’Œ*THE-WRAPPER-OF-SYMBOL*™˜’Œ*THE-WRAPPER-OF-STRING*™˜’Œ*THE-WRAPPER-OF-SEQUENCE*™˜’Œ*THE-WRAPPER-OF-RATIONAL*™˜’Œ*THE-WRAPPER-OF-RATIO*™˜’Œ*THE-WRAPPER-OF-NUMBER*™˜’Œ*THE-WRAPPER-OF-NULL*™˜’Œ*THE-WRAPPER-OF-LIST*™˜’Œ*THE-WRAPPER-OF-INTEGER*™˜’Œ*THE-WRAPPER-OF-FLOAT*™˜’Œ*THE-WRAPPER-OF-CONS*™˜’Œ*THE-WRAPPER-OF-COMPLEX*™˜’Œ*THE-WRAPPER-OF-CHARACTER*™˜’Œ*THE-WRAPPER-OF-BIT-VECTOR*™˜’Œ*THE-WRAPPER-OF-ARRAY*™˜“™˜’Œ *THE-CLASS-T*™˜’Œ*THE-CLASS-VECTOR*™˜’Œ*THE-CLASS-SYMBOL*™˜’Œ*THE-CLASS-STRING*™˜’Œ*THE-CLASS-SEQUENCE*™˜’Œ*THE-CLASS-RATIONAL*™˜’Œ*THE-CLASS-RATIO*™˜’Œ*THE-CLASS-NUMBER*™˜’Œ*THE-CLASS-NULL*™˜’Œ*THE-CLASS-LIST*™˜’Œ*THE-CLASS-INTEGER*™˜’Œ*THE-CLASS-FLOAT*™˜’Œ*THE-CLASS-CONS*™˜’Œ*THE-CLASS-COMPLEX*™˜’Œ*THE-CLASS-CHARACTER*™˜’Œ*THE-CLASS-BIT-VECTOR*™˜’Œ*THE-CLASS-ARRAY*™˜’Œ*THE-CLASS-STANDARD-OBJECT*™˜’Œ*THE-CLASS-CLASS*™˜’Œ*THE-CLASS-METHOD*™˜’Œ*THE-CLASS-GENERIC-FUNCTION*™˜’Œ*THE-CLASS-STANDARD-CLASS*™˜’Œ*THE-CLASS-STANDARD-METHOD*™˜’Œ%*THE-CLASS-STANDARD-GENERIC-FUNCTION*™˜’Œ.*THE-CLASS-STANDARD-EFFECTIVE-SLOT-DEFINITION*™˜’Œ!*THE-ESLOTD-STANDARD-CLASS-SLOTS*™˜–o ¿g X‘Hhc˜’Œ*BUILT-IN-CLASS-SYMBOLS*™˜ŒDEFVAR *BUILT-IN-CLASS-SYMBOLS*™˜“€™ ™  ™‚%˜“™™‚%˜–o ¿g X‘Hhc˜’Œ*BUILT-IN-WRAPPER-SYMBOLS*™˜Œ!DEFVAR *BUILT-IN-WRAPPER-SYMBOLS*™˜“€™ ™  ™‚*˜“™™‚*œ˜’ŒGET-BUILT-IN-CLASS-SYMBOL™˜–.@RX‘Hho@ S ¹@IhRc¿I™‚%™+™‚/™˜“˜“˜Œ CLASS-NAME™0™1™2 ˜Œ*THE-CLASS-~A*œ˜’ŒGET-BUILT-IN-WRAPPER-SYMBOL™˜–.@RX‘Hho@ S ¹@IhRc¿I™‚*™+™‚5™˜“˜“˜Œ CLASS-NAME™0™1™2 ˜Œ*THE-WRAPPER-OF-~A*˜–+Q¸gQ‘H†gHc¸gQ‘H†gHc˜’Œ*VARIABLE-DECLARATIONS*˜‘˜ŒWALKER˜Œ2 top-level forms™˜“€!˜’ŒVARIABLE-REBINDING™™‚@ ˜’ŒCLASS™™‚Aœ˜’ŒVARIABLE-CLASS™˜–g@A ™‚C™˜“˜“˜ŒVAR˜ŒENV˜’ŒVARIABLE-DECLARATION™‚<™‚A˜–o ¿g X‘Hhc˜’Œ *BOOT-STATE*™˜ŒDEFVAR *BOOT-STATE*™˜“€™ ™  ™‚J˜“™™‚J˜–(Pgðšo ¿PŸoo h™‚J˜Œ2 top-level forms™˜“€ ˜ŒCERROR™‚Š˜’ŒCOMPLETE™˜Œ‚ÓTrying to load (or compile) CLOS in an environment in which it~%~ has already been partially loaded. This may not work, you may~%~ need to get a fresh lisp (reboot) and then load CLOS.˜Œ(Try loading (or compiling) CLOS anyways. ˜Œ‚ÈTrying to load (or compile) CLOS in an environment in which it~%~ has already been loaded. This doesn't work, you will have to~%~ get a fresh lisp (reboot) and then load CLOS.˜–o ¿g X‘Hhc˜’Œ*NEXT-METHODS*™˜ŒDEFVAR *NEXT-METHODS*™˜“€™ ™  ™‚W˜“™™‚W˜–"o ¿g X‘Hoc˜’Œ*NOT-AN-EQL-SPECIALIZER*™˜ŒDEFVAR *NOT-AN-EQL-SPECIALIZER*™˜“€™ ™  ™‚\˜“˜’ŒNOT-AN-EQL-SPECIALIZER™˜“™™‚\˜– o ˜ŒDEFVAR *UMI-GFS*™˜“€™ ˜“™˜’Œ *UMI-GFS*™˜– o ˜ŒDEFVAR *UMI-COMPLETE-CLASSES*™˜“€™ ˜“™˜’Œ*UMI-COMPLETE-CLASSES*™˜– o ˜ŒDEFVAR *UMI-REORDER*™˜“€™ ˜“™˜’Œ *UMI-REORDER*™˜–o ¿g X‘Hhc˜’Œ,*INVALIDATE-DISCRIMINATING-FUNCTION-FORCE-P*™˜Œ3DEFVAR *INVALIDATE-DISCRIMINATING-FUNCTION-FORCE-P*™˜“€™ ™  ™‚r˜“™™‚r˜–o ¿g X‘Hhc˜’Œ*INVALID-DFUNS-ON-STACK*™˜ŒDEFVAR *INVALID-DFUNS-ON-STACK*™˜“€™ ™  ™‚w˜“™™‚w˜– o ˜Œ$DEFVAR *STANDARD-METHOD-COMBINATION*™˜“€™ ˜“™˜’Œ*STANDARD-METHOD-COMBINATION*™˜–$o ¿g X‘Hghc˜’Œ*SLOTD-UNSUPPLIED*™˜ŒDEFVAR *SLOTD-UNSUPPLIED*™˜“€™ ™ ™‚ ™‚˜“™™‚œ˜’Œexpand-DEFINE-GF-PREDICATE™˜–\@X¹HºggIoJ»h¼h½h¾K¢L°3K_¿gIgOhho¾L”MN&½„Nh]¼K»°Ì™‚†™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT3˜’ŒX™-˜’Œ DEFMETHOD™™‚Œ ˜ŒPROGN?˜“˜“˜“˜“™‚‹€˜–&gg ¿ggo ˜ŒDEFMACRO DEFINE-GF-PREDICATE™˜“€ ™H ™I™J˜’ŒDEFINE-GF-PREDICATE™™‚†™‚•˜“˜Œ PREDICATE™L˜ŒCLASSESœ˜’Œexpand-PLIST-VALUE™˜–*@X¹HºgoIggJhh™‚š™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT˜’ŒPLIST™˜ŒGETF ˜’Œ WITH-SLOTS™˜“™‚Ÿ˜–&gg ¿ggo ˜ŒDEFMACRO PLIST-VALUE™˜“€ ™H ™I™J˜’Œ PLIST-VALUE™™‚š™‚¦˜“˜ŒOBJECT˜ŒNAMEœ˜’ŒPLIST-VALUE-setf-expander™˜–‚`@¸h¹hºh»H¢I°»I”JK&º„KhZ¹H¸°æ¸@H¹ºH@JhI[¼K½h¾h_¿Jd3@ð_“O°,J3‘i€h_“O°J‘h€i_’O…J‘i€h˜Jo€h’J°_N¾JO_¿O_¿goLgOgggMhOhgggMhohh_¿gN _¿O _¿h_¿h_¿h_¿O‘h€i_’O…O‘h€i“O°1OOh_¿O˜OO&_¿ˆOh__¿O_¿O_¿°¼OhI$™‚«™˜“˜“˜Œ ACCESS-FORM˜ŒPLIST-VALUE-setf-env‚û™‚ˆ‚ñ™‚ˆ‚™h,˜•ŒGENSYM™‚° ‚뙂‰‚Í™‚Ÿ‚ȘŒREMF‚Ù‚‚³™‚Ÿ‚®™‚ ‚©™‚‘‚¢˜ŒIF‚—™‚¡‚ט“€‚œ˜“™‚Ÿu˜“™=™‚š˜–gg ˜ŒDEFSETF PLIST-VALUE™˜“€ ˜ŒSET-SETF-METHOD-EXPANDER™‚«™‚¦˜–"o ¿g X‘Hoc˜’Œ*BUILT-IN-CLASSES*™˜ŒDEFVAR *BUILT-IN-CLASSES*™˜“€™ ™  ™‚»˜“˜“˜ŒNUMBER˜“˜“˜ŒCOMPLEX˜ŒFLOAT˜ŒRATIONAL˜“˜“™‚À˜“™‚¾€˜“™‚¾˜“™‚Á˜“™‚¾€˜“™‚¾˜“™‚˜“™‚¾˜“˜ŒINTEGER˜ŒRATIO˜“™‚¾˜“™‚͘“™‚€˜“™‚™‚¾˜“™‚Θ“™‚€˜“™‚™‚¾˜“˜ŒSEQUENCE˜“˜“˜ŒLIST˜ŒVECTOR˜“˜“™‚Ú˜“™‚ؘ“˜ŒCONS˜ŒNULL˜“™‚ؘ“™‚à˜“™‚Ú€˜“™‚Ú™‚ؘ“˜ŒARRAY˜“˜“™‚Û˜“˜“™‚Û˜“™‚虂ؘ“™\˜Œ BIT-VECTOR˜“™‚虂ؘ“™\˜“™‚Û€˜“™‚Û™‚虂ؘ“™‚™‚Û€˜“™‚Û™‚虂ؘ“˜Œ CHARACTER˜“€˜“˜“˜ŒSYMBOL˜“˜“™‚ᘓ˜“™‚ᘓ™‚ü€˜“™‚ü™‚Ú™‚ؘ“™™‚»˜–‚1ighhhh ¿ggohhh ¿ggohhh ¿ggohhh ¿no¸ggogHgggoghgoohhh ¿ggogg ggghghghohhh ¿ggohhh ¿ggohhh ¿no¸ggogg gggogogoogg gggoghghogg gggoghghogHggghghghohho ¿ggogg ggghghghogg ggghghghohhh ¿ggogg gggogoghogg gggogoghogg gggogoghogg ggghghghohho ¿ggohhh ¿ggohhh ¿ggohhh ¿ggohhh ¿ggohhh ¿ggohhh ¿ggohhh ¿no¸no¹ggogg gggogoghogIgggogoghogIgggogoghogg gggogoghogg gggogoghogg gggogoghogg gggogoghogg gggogoghogHggghghgoogg gggogoghogg gggogoghohho ¿ggohhh ¿ggohhh ¿ggogggoghgohhhh ˜Œ22 top-level forms™˜“€(‚+˜’Œ LOAD-DEFCLASS™‚䙂 ‚Ë™‚ ‚²™‚ ‚g™$‚%™$‚®™$‚l™$‚*™$‚è™$‚¦™$‚ò™$‚»™‚ ‚¢™‚ ‚‰™‚ ‚p™‚ ‚W™‚ ‚>™‚ ‚%™‚ ‚ ™‚ ‚Й$‚Ž™$‚L™$‚ ™$‚뙂 ‚µ™$‚{™$‚\™‚ ‚ë™$‚­™$‚g™$‚<™‚ ‚#™‚ ‚ ™‚ ‚Õ™$‚¶™‚ W™‚ >™‚ %™‚ ™‚ ‚Ì‚˜ŒINITARGS‚ ˜ŒWRITERS‚˜ŒREADERS‚þ˜’ŒOBJECT™‚ù˜ŒNAME‚ŒSTANDARD-CLASS™‚ꘒŒEQL-SPECIALIZER™‚Ö™‚‚ј’Œ"STANDARD-EFFECTIVE-SLOT-DEFINITION™‚½™‚‚¸˜’ŒSTANDARD-DIRECT-SLOT-DEFINITION™‚Š™‚ ‚€™‚ ‚v™‚ ‚q˜’ŒINSTANCE-INDEX™‚l™‚‚b˜’ŒFALSE™‚³‚]˜Œ INITFUNCTION‚H™‚ ‚>™‚ ‚4™‚ ‚/™‚A‚*™‚‚ ™‚‚™‚‚™‚ ‚ü™‚ ‚ö™‚ ‚ñ˜’Œ DOCUMENTATION™‚왂‚時‚Ñ™‚ ‚Ç™‚ ‚½™‚ ‚¸˜ŒTYPE‚³™‚‚©™‚‚¤™‚‚™‚ ‚…™‚ ‚{™‚ ‚v˜’Œ ALLOCATION™‚q™‚‚g™‚‚b™‚‚M™‚ ‚C™‚ ‚9™‚ ‚4˜’ŒINITARGS™‚/™‚‚%™‚‚ ™‚‚ ™‚ ‚™‚ ‚÷™‚ ‚ò˜’ŒWRITERS™‚홂‚㙂‚Þ™‚‚É™‚ ‚¿™‚ ‚µ™‚ ‚°˜’ŒREADERS™‚«™‚‚¡™‚‚œ™‚‚‡™‚ ‚}™‚ ‚s™‚ ‚n˜’Œ INITFUNCTION™‚i™‚‚c™‚‚N™‚ ‚D™‚ ‚:™‚ ‚5˜’ŒINITFORM™‚0™‚‚*™‚‚™‚ ‚ ™‚ ‚™‚ ‚ü˜’ŒNAME™‚÷™‚‚홂‚虂‚Þ™‚‚Ù˜’ŒSTANDARD-SLOT-DEFINITION™‚­™‚‚¨˜’ŒEFFECTIVE-SLOT-DEFINITION™‚”™‚‚˜’ŒDIRECT-SLOT-DEFINITION™‚{™‚‚v˜’ŒSLOT-DEFINITION™‚b™‚‚]˜’ŒBUILT-IN-CLASS™‚I™‚‚D˜’ŒFORWARD-REFERENCED-CLASS™‚0™‚‚+˜’ŒFUNCALLABLE-STANDARD-CLASS™‚™‚‚™‚‚뙂 ‚噂 ‚ß™‚ ‚Ú˜’Œ PROTOTYPE™‚Õ™‚‚Ë™‚‚Æ™‚‚±™‚ ‚§™‚ ‚™‚ ‚˜˜’ŒNO-OF-INSTANCE-SLOTS™‚“™‚‚‰˜’ŒZERO™‚„™‚‚o™‚ ‚e™‚ ‚[™‚ ‚V˜’ŒSLOTS™‚Q™‚‚G™‚‚B™‚‚-™‚ ‚#™‚ ‚™‚ ‚˜’Œ DIRECT-SLOTS™‚™‚‚™‚‚™‚‚ö™‚‚ñ˜’Œ STD-CLASS™‚Й‚ ‚Ê™‚ ‚Ä™‚ ‚¿˜’ŒWRAPPER™‚º™‚‚°™‚‚«™‚‚–™‚ ‚™‚ ‚Š™‚ ‚…™‚Ü‚€™‚‚v™‚‚q™‚‚g™‚‚b˜’Œ CLOS-CLASS™‚;™‚ ‚5™‚ ‚/™‚ ‚*˜’ŒDIRECT-METHODS™‚%™‚‚™‚‚ ™‚ ‚™‚ ‚ú™‚ ‚õ˜’ŒDIRECT-SUBCLASSES™‚𙂂時‚ᙂ‚Ì™‚ ‚Æ™‚ ‚¼™‚ ‚·˜’ŒDIRECT-SUPERCLASSES™‚²™‚‚¨™‚‚£™‚‚Š™‚ ‚€™‚ ‚v™‚ ‚q™‚‚l™‚‚b™‚‚]™‚‚S™‚‚N™‚A‚.™‚‚)˜’ŒDEPENDENT-UPDATE-MIXIN™‚™‚‚˜’ŒDOCUMENTATION-MIXIN™‚𙂠‚Ꙃ ‚䙂 ‚ß™‚Ÿ‚Ú™‚‚Й‚‚Ë™‚‚Á™‚‚¼˜’Œ PLIST-MIXIN™‚˜™‚ ‚’™‚ ‚ˆ™‚ ‚ƒ˜’ŒSOURCE™~™‚x™‚n™‚i˜’ŒDEFINITION-SOURCE-MIXIN™I™‚D˜’Œ SPECIALIZER™0™‚+˜’Œ METAOBJECT™™‚˜’ŒSTANDARD-OBJECT™™‚#W‚˜“˜ŒOBJECT‚˜“˜’ŒEQL-SPECIALIZER-OBJECT™‚ô˜“™‚6‚Û˜“™‚™‚ ‚˜“™‚™‚!‚¬˜“ ˜’ŒSLOTD-INSTANCE-INDEX™˜’Œ SLOTD-CLASS™˜’Œ SLOTD-TYPE™˜’ŒSLOTD-ALLOCATION™˜’ŒSLOTD-INITARGS™˜’Œ SLOTD-WRITERS™˜’Œ SLOTD-READERS™˜’ŒSLOTD-INITFUNCTION™˜’ŒSLOTD-INITFORM™˜’Œ SLOTD-NAME™‚˜“˜ŒINITFORM€‚…˜“˜“™‚‘™‚@‚{˜“™‚@‚N˜“™‚K€‚C˜“˜“™‚‘™‚A‚9˜“™‚A‚ ˜“™‚K˜Œ‚˜“˜Œ DOCUMENTATION‚ט“™‚K€‚̘“˜“™‚‘™‚B‚˜“™‚B‚•˜“™‚K€‚Š˜“˜“™‚‘™‚C‚€˜“™‚C‚S˜“™‚K€‚H˜“˜“™‚‘™‚D‚>˜“™‚D‚˜“™‚K€‚˜“˜“™‚‘™‚E‚ü˜“™‚E‚Ϙ“™‚K€‚Ę“˜“™‚‘™‚F‚º˜“™‚F‚˜“™‚K™‚‚‚˜“˜“™‚‘™‚G‚x˜“™‚G‚T˜“™‚K™‚‚I˜“˜“™‚‘™‚H‚?˜“™‚H‚˜“™‚K€‚˜“˜“™‚‘™‚I‚˜“™‚I‚㘓™‚"‚ј–P™‚˜Œlambda in 22 top-level forms™b˜“€‚Ř–o˜Œlambda in 22 top-level forms™b˜“€™‚T‚²˜“™‚"‚™˜“™‚"‚€˜“™‚7‚g˜“™‚-‚N˜“™‚-‚5˜“™‚+‚˜“™‚+‚˜“˜’ŒCLASS-NO-OF-INSTANCE-SLOTS™˜’Œ CLASS-SLOTS™˜’ŒCLASS-DIRECT-SLOTS™‚ñ˜“™‚K€‚·˜“™‚K‚¬˜“˜“™‚‘™‚†‚¢˜“™‚†‚u˜“™‚K€‚j˜“˜“™‚‘™‚‡‚`˜“™‚‡‚3˜“™‚K€‚(˜“˜“™‚‘™‚ˆ‚˜“™‚ˆ‚û˜“™‚-‚Ö˜“™‚K€‚œ˜“™‚K€‚l˜“™‚A‚V˜“˜’Œ CLASS-NAME™‚A˜“™‚K˜“™‚à€€‚˜“™‚K€‚ÿ˜“˜’ŒCLASS-DIRECT-SUBCLASSES™‚Ò˜“™‚K€‚Á˜“˜’ŒCLASS-DIRECT-SUPERCLASSES™‚”˜“™‚K€‚˜“™‚‚…˜“˜“™‚‘™‚›‚{˜“™‚›‚X˜“™‚2™‚1™‚5™‚6‚F˜–hh˜Œlambda in 22 top-level forms™b˜“€‚3˜“™‚3‚˜“™‚3‚ö˜“™‚K€‚Ƙ“™‚8‚¢˜“™‚K˜“˜’Œ LOAD-TRUENAME™‚˜“˜ŒDEFINITION-SOURCE‚˜“˜’ŒDEFINITION-SOURCE™s˜“™‚8a˜–˜Œlambda in 22 top-level forms™b˜“€™‚²N˜“™‚75˜“™‚8˜“‚Í™^‚Á™^‚B™^]™^œ˜’Œexpand-DOLIST-CAREFULLY™˜–f@XYºI[¼K½H¾gJogLhhgogoggJoNMhhhh™‚Á™˜“˜“˜Œ $$MACRO-FORM˜Œ$$MACRO-ENVIRONMENTE˜ŒSETQ@™‚6™‚²,˜ŒLOOP ˜’Œ.DOLIST-CAREFULLY.™™‚‰K˜“˜“˜ŒPOP™‚È;˜“˜ŒCONSP™‚È1˜“˜ŒWHEN˜“™‚ᙂȘ“˜ŒRETURN€˜“€˜–&gg ¿ggo ˜ŒDEFMACRO DOLIST-CAREFULLY™˜“€ ™H ™I™J˜’ŒDOLIST-CAREFULLY™™‚Á™‚ט“˜Œ (VAR LIST IMPROPER-LIST-HANDLER)˜Œ&BODY˜ŒBODYœ˜’ŒLEGAL-STD-DOCUMENTATION-P™˜–@‘h€iX‘H…@ ‘io™‚Ý™˜“˜“˜ŒX ˜ŒSTRINGP˜Œa string or NULLœ˜’ŒLEGAL-STD-LAMBDA-LIST-P™˜–i™‚䙘“˜“˜ŒXœ˜’ŒLEGAL-STD-METHOD-FUNCTION-P™˜–@ ‘io™‚陘“˜“˜ŒX˜Œ FUNCTIONP ˜Œ a functionœ˜’ŒLEGAL-STD-QUALIFIERS-P™—˜–YnZ¿ggYJý¿n‹»h¼@½M¡°5M‘i€h²"M¾M½N\ ^ið³hoLN joJ-¿°Ëi˜’Œ*CATCH-RETURN-PC*˜‘˜ŒSYSTEM˜’Œ*CATCH-RETURN-TO*™‚ò™‚𙘓˜“˜ŒXF™14˜’ŒLEGAL-STD-QUALIFIER-P™ ™‚ð™‚ð?˜ŒContains ~S which ~A™_™‚úM˜–HÉoh ˜Œ IMPROPER-LIST™b˜“€ ˜’ŒNON-LOCAL-RETURN-VALUES™‚ò˜ŒIs not a proper list.œ™‚ø˜–@–@‘h‚i€h‘io™‚ø™˜“˜“˜ŒX˜Œis not a non-null atomœ˜’ŒLEGAL-STD-SLOT-NAME-P™˜–+@d3@ð²@ •o@o•oio™‚™˜“˜“˜ŒX ˜ŒKEYWORDP%˜Œ&is not a symbol and so cannot be bound˜Œcannot be bound˜“€˜Œ#is a keyword and so cannot be boundœ˜’ŒLEGAL-STD-SPECIALIZERS-P™—˜–YnZ¿ggYJý¿n‹»h¼@½M¡°5M‘i€h²"M¾M½N\ ^ið³hoLN joJ-¿°Ëi™‚ó™‚ô™‚™˜“˜“˜ŒXF™14˜’ŒLEGAL-STD-SPECIALIZER-P™ ™‚™‚?˜ŒContains ~S which ~A™_™‚M˜–HÉoh ˜Œ IMPROPER-LIST™b˜“€ ™‚ý˜ŒIs not a proper list.œ™‚˜–@ X‘H…@ ‘io™‚™˜“˜“˜ŒX ˜’ŒEQL-SPECIALIZER-P™™‚Þ˜Œ0is neither a class object nor an eql specializerš‚ ÿÿ