‘XCL Compiler output for source file {DSK}arunwelch>SKYDRIVE>DOCUMENTS>UNIX>LISP>CLOS>CURRENT>dfun.lisp;1 Source file created Wednesday, 6 November 1991, 15:10:56. FASL file created Friday, 4 December 2020, 19:46:01. ÿ˜–o ˜Œ1 top-level form˜ŒFUNCTION˜“€˜Œ IN-PACKAGE˜ŒCLOS˜–1o ¿g X‘Hgg c˜’Œ *DFUN-STATES*˜‘˜ŒCLOS˜ŒDEFVAR *DFUN-STATES*™˜“€)˜ŒMAKE-HASH-TABLE$˜ŒSYMBOL-FUNCTION˜ŒBOUNDP˜ŒPROCLAIM˜ŒEQ˜ŒTEST™˜“˜ŒSPECIAL™œ˜’ŒNOTICE-DFUN-STATE™˜–@PAB•BCh€h™™™˜“˜“˜ŒGENERIC-FUNCTION˜ŒSTATE˜Œ &OPTIONAL˜ŒNKEYS˜ŒVALUEP˜ŒPUTHASH˜–o ¿g X‘Hhc˜’Œ*DFUN-CONSTRUCTORS*™˜ŒDEFVAR *DFUN-CONSTRUCTORS*™˜“€™ ™™˜“™™˜–o ¿g X‘Hic˜’Œ!*ENABLE-DFUN-CONSTRUCTOR-CACHING*™˜Œ(DEFVAR *ENABLE-DFUN-CONSTRUCTOR-CACHING*™˜“€™ ™™#˜“™™#œ˜’ŒSHOW-DFUN-CONSTRUCTORS™˜–RioT•o„o¿U¸h¹H‘HhYºh»J‘J°»ioIKK¿Jº°ßH¸°Î™#™™(™˜“€B˜ŒFORMAT™*3˜Œ~&~S ~S˜Œdisabled ˜Œenabled˜Œ!~&DFUN constructor caching is ~A.œ˜’ŒGET-DFUN-CONSTRUCTOR™˜–‚ƒejó§kh ¿he#¸@V¹HIgg ºW²FJ[‘K@ H ¼I²H LhhI½IM¿°@H LhhhVc¿L@ H ™™#™0‚ÿÿÿÿ™˜“˜“˜Œ GENERATOR˜Œ&REST˜ŒARGS }˜ŒAPPLYw™a˜Œ COPY-LISTJ™7@™6:™(˜ŒASSOC#™˜’ŒARGUMENT-ERROR˜‘˜ŒSYSTEM˜ŒEQUAL™œ˜’Œ!LOAD-PRECOMPILED-DFUN-CONSTRUCTOR™˜–B@S¸AHgg Y‘hHŸACBhHºHJ@ACBhhSc™™>™˜“˜“˜Œ GENERATOR˜ŒARGS˜ŒSYSTEM˜ŒCONSTRUCTOR™8™ ™<™œ˜’Œ#expand-PRECOMPILE-DFUN-CONSTRUCTORS™˜–‚@X’H€h¹igh»h¼W*½h¾M‘M‚±ì^_¿h_¿O’O‚±Ó_‘h€i_’O†OIð¢±¯N O __¿O__¿O__¿O__ ¿O_"_$¿O"_&¿gNhoggNhgOhgIhgOOOO O$O&hh_(¿K•LO(&¼…O(h\»O_¿±ÿ*M½±ÿK˜’Œ*PRECOMPILING-LAP*™™™F™˜“˜“˜Œ$$MACRO-FORM˜Œ$$MACRO-ENVIRONMENT‚ç˜’ŒMAKE-TOP-LEVEL-FORM™`˜•Œ\MVLIST[™6S™‚È˜’Œ PRECOMPILE-LAP-CLOSURE-GENERATOR™‚¿˜ŒQUOTE‚´™O‚ª™O‚¥™>‚–˜’ŒPRECOMPILE-DFUN-CONSTRUCTOR™˜ŒPROGN‚ ˜“˜ŒLOAD˜–&gg ¿ggo˜Œ%DEFMACRO PRECOMPILE-DFUN-CONSTRUCTORS™˜“€ ˜•ŒPUTPROP˜•ŒSETF-MACRO-FUNCTION˜•ŒARGNAMES˜’ŒPRECOMPILE-DFUN-CONSTRUCTORS™™F™Z˜“™˜ŒSYSTEMœ˜’ŒMAKE-INITIAL-DFUN™˜–nX@¿noH™^™˜“˜“˜ŒGENERIC-FUNCTION˜–he#¹IHÉ ˜Œlambda in MAKE-INITIAL-DFUN‚ÿÿÿÿ˜ŒCLOSURE˜“˜“™2˜ŒARGS ˜’ŒINITIAL-DFUN™ ˜•ŒCOMPILED-CLOSURE˜•Œ \PTRHUNK2œ˜’Œ UPDATE-TO-ONE-CLASS-READERS-DFUN™˜–cnX@AB¿gHÉ‘i€h ¹HÉggHÉ‘i€hh ¿HÉHÉHÉnoHlI ™l™˜“˜“˜ŒGENERIC-FUNCTION˜ŒWRAPPER˜ŒINDEX]˜’ŒUPDATE-DFUN™<™™0+˜’ŒREADERS™&˜’Œ ONE-CLASS™˜’ŒEMIT-ONE-CLASS-READER™O˜–@HÉHÉHÉ˜Œ*lambda in UPDATE-TO-ONE-CLASS-READERS-DFUN™c˜“˜“˜ŒARG˜’ŒONE-CLASS-READERS-MISS™K™i˜•Œ \PTRHUNK4œ˜’Œ UPDATE-TO-ONE-CLASS-WRITERS-DFUN™˜–cnX@AB¿gHÉ‘i€h ¹HÉggHÉ‘i€hh ¿HÉHÉHÉnoHlI ™~™˜“˜“˜ŒGENERIC-FUNCTION˜ŒWRAPPER˜ŒINDEX]™r<™™0+˜’ŒWRITERS™&™t˜’ŒEMIT-ONE-CLASS-WRITER™O˜–@AHÉHÉHÉ ˜Œ*lambda in UPDATE-TO-ONE-CLASS-WRITERS-DFUN™c˜“˜“˜Œ NEW-VALUE˜ŒARG ˜’ŒONE-CLASS-WRITERS-MISS™K™i™|œ™z˜–Aggh@BChhh ™z™˜“˜“˜ŒARG˜ŒGENERIC-FUNCTION˜ŒINDEX˜ŒWRAPPER˜’Œ ACCESSOR-MISS™˜’ŒREADER™™tœ™‚‹˜–Bgg@ACDhhh ™‚‹™˜“˜“˜ŒNEW˜ŒARG˜ŒGENERIC-FUNCTION˜ŒINDEX˜ŒWRAPPER™‚”˜’ŒWRITER™™tœ˜’Œ UPDATE-TO-TWO-CLASS-READERS-DFUN™˜–inX@ABC¿gHÉ‘i€h ¹HÉggHÉ‘i€hh ¿HÉHÉHÉHÉnoHlI ™‚ ™˜“˜“˜ŒGENERIC-FUNCTION˜Œ WRAPPER-0˜Œ WRAPPER-1˜ŒINDEXc™r?™ ™0.™s)˜’Œ TWO-CLASS™˜’ŒEMIT-TWO-CLASS-READER™U˜–@HÉHÉHÉHÉ ˜Œ*lambda in UPDATE-TO-TWO-CLASS-READERS-DFUN™c˜“˜“˜ŒARG˜’ŒTWO-CLASS-READERS-MISS™Q™i™|œ˜’Œ UPDATE-TO-TWO-CLASS-WRITERS-DFUN™˜–inX@ABC¿gHÉ‘i€h ¹HÉggHÉ‘i€hh ¿HÉHÉHÉHÉnoHlI ™‚°™˜“˜“˜ŒGENERIC-FUNCTION˜Œ WRAPPER-0˜Œ WRAPPER-1˜ŒINDEXc™r?™ ™0.™‚„)™‚§˜’ŒEMIT-TWO-CLASS-WRITER™U˜–@AHÉHÉHÉHÉ ˜Œ*lambda in UPDATE-TO-TWO-CLASS-WRITERS-DFUN™c˜“˜“˜Œ NEW-VALUE˜ŒARG˜’ŒTWO-CLASS-WRITERS-MISS™Q™i™|œ™‚˜–Aggh@BCDhh ™‚™˜“˜“˜ŒARG˜ŒGENERIC-FUNCTION˜ŒINDEX˜ŒW0˜ŒW1™‚”™‚•™‚§œ™‚½˜–Bgg@ACDEhh ™‚½™˜“˜“˜ŒNEW˜ŒARG˜ŒGENERIC-FUNCTION˜ŒINDEX˜ŒW0˜ŒW1™‚”™‚ž™‚§œ˜’Œ UPDATE-TO-ONE-INDEX-READERS-DFUN™˜–‚nX@ABC¿HÉ®g Hý¿gHÉ‘i€h ¹khHÉ“HÉl Z»J¼HÉªL Hý¿HÉggHÉ‘i€hh ¿HÉHÉHÉKLHÉnoHlIHÉ™‚Ñ™˜“˜“˜ŒGENERIC-FUNCTION˜ŒINDEX™˜ŒFIELD˜ŒCACHE‚§™r~™[˜’Œ GET-CACHE™J™ME˜’ŒCOMPUTE-CACHE-PARAMETERS™3™0˜’Œ WRAPPER-FIELD™m™sh˜’Œ ONE-INDEX™&˜’ŒEMIT-ONE-INDEX-READERS™˜ŒNUMBER‚–˜–@HÉHÉHÉHÉ ˜Œ*lambda in UPDATE-TO-ONE-INDEX-READERS-DFUN™c˜“˜“˜ŒARG˜’ŒONE-INDEX-READERS-MISS™‚’™i™|œ˜’Œ UPDATE-TO-ONE-INDEX-WRITERS-DFUN™˜–‚nX@ABC¿HÉ®g Hý¿gHÉ‘i€h ¹khHÉ“HÉl Z»J¼HÉªL Hý¿HÉggHÉ‘i€hh ¿HÉHÉHÉKLHÉnoHlIHÉ™‚å™˜“˜“˜ŒGENERIC-FUNCTION˜ŒINDEX™˜ŒFIELD˜ŒCACHE‚§™r~™[™‚ØJ™ME™‚Ù3™0™‚Úm™‚„h™‚Û&˜’ŒEMIT-ONE-INDEX-WRITERS™™‚Ý‚–˜–@AHÉHÉHÉHÉ ˜Œ*lambda in UPDATE-TO-ONE-INDEX-WRITERS-DFUN™c˜“˜“˜Œ NEW-VALUE˜ŒARG˜’ŒONE-INDEX-WRITERS-MISS™‚’™i™|œ™‚â˜–Aggh@BhhCD ™‚â™˜“˜“˜ŒARG˜ŒGF˜ŒINDEX˜ŒFIELD˜ŒCACHE™‚”™‚•™‚Ûœ™‚ò˜–Bgg@AChhDE ™‚ò™˜“˜“˜ŒNEW˜ŒARG˜ŒGF˜ŒINDEX˜ŒFIELD˜ŒCACHE™‚”™‚ž™‚Ûœ˜’ŒONE-INDEX-LIMIT-FN™˜–@ ™‚™˜“˜“˜ŒNLINES˜’ŒDEFAULT-LIMIT-FN™œ˜’ŒUPDATE-TO-N-N-READERS-DFUN™˜–‚ŽnX@AB¿HÉ®g Hý¿g ¹kiHÉ“HÉl Z»J¼HÉªL Hý¿HÉo ¿HÉHÉHÉKLnoHlIHÉ™‚™˜“˜“˜ŒGENERIC-FUNCTION™˜ŒFIELD˜ŒCACHE‚ˆ™rb™P™‚Ø?™M:™‚Ù(™0™‚Ú#˜’ŒEMIT-N-N-READERS™™‚Ýw˜–@HÉHÉHÉ˜Œ$lambda in UPDATE-TO-N-N-READERS-DFUN™c˜“˜“˜ŒARG˜’ŒN-N-READERS-MISS™]˜“˜’ŒN-N™™ss™i™|œ˜’ŒUPDATE-TO-N-N-WRITERS-DFUN™˜–‚ŽnX@AB¿HÉ®g Hý¿g ¹kiHÉ“HÉl Z»J¼HÉªL Hý¿HÉo ¿HÉHÉHÉKLnoHlIHÉ™‚™˜“˜“˜ŒGENERIC-FUNCTION™˜ŒFIELD˜ŒCACHE‚ˆ™rb™P™‚Ø?™M:™‚Ù(™0™‚Ú#˜’ŒEMIT-N-N-WRITERS™™‚Ýw˜–@AHÉHÉHÉ ˜Œ$lambda in UPDATE-TO-N-N-WRITERS-DFUN™c˜“˜“˜ŒNEW˜ŒARG ˜’ŒN-N-WRITERS-MISS™]˜“™‚™‚„s™i™|œ™‚˜–Aggh@hhhBC ™‚™˜“˜“˜ŒARG˜ŒGF˜ŒFIELD˜ŒCACHE™‚”™‚•™‚œ™‚(˜–Bgg@AhhhCD ™‚(™˜“˜“˜ŒNEW˜ŒARG˜ŒGF˜ŒFIELD˜ŒCACHE™‚”™‚ž™‚œ˜’ŒN-N-ACCESSORS-LIMIT-FN™˜–@ ™‚;™˜“˜“˜ŒNLINES™‚ œ˜’ŒUPDATE-TO-CHECKING-DFUN™˜–‚énX@ABC¿HÉ®g Hý¿HÉ Y ºI »I ¼noJ ²HÉo ¿HÉHÉ LhHÉ“HÉl ]¾M_¿HÉ«O Hý¿gJK_¿HÉoLh¿HÉHÉHÉNOHÉnoHlOHÉ™‚@ ™˜“˜“˜ŒGENERIC-FUNCTION˜ŒFUNCTION™˜ŒFIELD˜ŒCACHE‚ã™r‚¸™‚¦™0‚•™‚Ø‚™M|™‚Ùj™r^™O˜•Œ %EVERY-SINGLE=˜’ŒARG-INFO-NKEYS™6˜’ŒARG-INFO-APPLYP™/˜’ŒARG-INFO-METATYPES™)˜’ŒGF-ARG-INFO™™‚Ú‚Ÿ˜’Œ EMIT-CHECKING™™‚Ý‚Ñ˜–he#¹HÉIHÉHÉHÉ ˜Œ!lambda in UPDATE-TO-CHECKING-DFUN‚ÿÿÿÿ™c˜“˜“™2˜ŒARGS˜’Œ CHECKING-MISS™‚±˜“˜’ŒCHECKING™Y˜“˜’ŒDEFAULT-METHOD-ONLY™G˜–@ið˜Œ!lambda in UPDATE-TO-CHECKING-DFUN™c˜“˜“˜ŒMT‚Í™iC™i™|œ˜’ŒCHECKING-LIMIT-FN™˜–@ ™‚]™˜“˜“˜ŒNLINES™‚ œ˜’ŒUPDATE-TO-CACHING-DFUN™˜–‚¶nX@AB¿HÉ®g Hý¿HÉ Y ºI »I ¼gJK½LiHÉ“HÉl ^_¿N_¿HÉ«O Hý¿HÉoLi¿HÉHÉHÉOOnoHlMHÉ™‚b ™˜“˜“˜ŒGENERIC-FUNCTION™˜ŒFIELD˜ŒCACHE‚°™r‚ˆ™t™‚Ø^™MY™‚ÙG™0:™‚H3™‚I,™‚J&™‚K™‚Ú@˜’ŒEMIT-CACHING™™‚Ý‚Ÿ˜–he#¹HÉIHÉHÉ˜Œ lambda in UPDATE-TO-CACHING-DFUN‚ÿÿÿÿ™c˜“˜“™2˜ŒARGS˜’ŒCACHING-MISS™‚˜“˜’ŒCACHING™‚›™i™|œ˜’ŒCACHING-LIMIT-FN™˜–@ ™‚r™˜“˜“˜ŒNLINES™‚ œ™g˜–‚AW²4A@ XYZ»J\—K@ g A@AWA@ X¹HZ»J\¾L_¿AO@ __¿O_¿O²uK—N@ O’O€h²GOgð›AIO¿°*Ogð›AIO¿°hgOo¿N@ O—N@ AN ¿N@ g A@˜’Œ*INVALID-DFUNS-ON-STACK*™™‚w™g™˜“˜“˜ŒARGS˜ŒGENERIC-FUNCTION‚ý™6‚ö™‚ë™6‚ã™‚@‚Û™6‚Ð™6‚È˜•Œ ECASE-FAIL‚³™~‚ž™l‚‚™6h™Mc˜’ŒACCESSOR-MISS-VALUES™G™MB˜’ŒCACHE-MISS-VALUES™3™6,™!™6™M ™‚~‚ñ˜’ŒNO-APPLICABLE-METHOD™‚¼˜’ŒNTYPE™‚¨™‚ž‚“™‚•'™‚‚Ã˜“™‚•™‚žœ™‚”—˜–‚_nX@GG¿Bgð”Dh°"Bgð–CDh°hgBo¹HÉW²8HÉI Z[\½L^—MI g HÉIHÉWHÉI ZHý¿J[¼K]Hý¿M¾HÉNI _Hý ¿OHý¿HÉ¢±yHÉ ¢±_L‘L†HÉ‘h€i™HÉI DÃ_“O°D_¿DÃ›jOÊð‘h‚i€h¢± HÉ Bð¢±ñAgð²)HÉE:²HÉFHÉloH-¿±ÃjoH-¿±·Agð²#HÉE:žHÉkoH-¿±™joH-¿±Agð²9HÉE:²'hg noHloH-¿°WjoH-¿°LAgð²1HÉ‘i€h³9ig noHloH-¿°hgAo¿HÉI joH-¿HÉI joH-¿HÉI joH-¿HÉI g HÉI™‚w™‚w™‚” ™˜“˜“ ˜ŒGF˜ŒOSTATE˜ŒOTYPE˜ŒNEW˜ŒOBJECT˜ŒOINDEX˜ŒOW0˜ŒOW1˜ŒFIELD˜ŒCACHE‚Y™6‚P™‚E™6‚2™6‚™6‚™6‚™‚|‚×™‚”™‚ì™6‚¸™M‚³™‚}‚™M‚‹™‚~x™6o™d™6Q™ML™‚~:™‚|‚K™‚‚÷˜’ŒOSTATE™‚Ò™‚;‚¿™‚‚™‚‚™‚Û‚U™‚§‚%™t‚™i‚ó˜’ŒSTD-INSTANCE™j™‚/˜’ŒOTYPE™ ™‚ž™‚•‚ý˜“™t™‚§™‚Û™‚‚˜–HÉ@AloH-˜Œlambda in ACCESSOR-MISS™c˜“˜“˜ŒNFIELD˜ŒNCACHE5˜“™‚•™‚ž‚Ü™i‚™™i˜•Œ \PTRHUNK7™‚›‚9˜– HÉHÉ ˜ŒCHECKING™c˜“€™‚@™‚›‚&™‚ž™‚›‚™‚ž™‚›‚ì˜–BHÉHÉk@AHÉHÉ YºI»JHÉÿ‘h€i\‘LˆKHÉð‘h€i–JKlBh˜ŒDO-FILL™c˜“˜“˜ŒVALUEP˜ŒLIMIT-FN˜Œ UPDATE-FN™M˜’Œ FILL-CACHE™™‚›‚à˜–?HÉ gðšHÉ@AHÉ gðšHÉ@AhgHÉ o˜ŒN-N™c˜“˜“™˜ŒFIELD˜ŒCACHE9™‚|%™‚™‚,™‚€™‚ž™‚•4˜“™‚•™‚ž™‚›‚´™‚™‚›‚©™‚¦™‚˜˜–AHÉ gð›HÉ@ABHÉ gð›HÉ@ABhgHÉ o˜Œ ONE-INDEX™c˜“˜“˜ŒINDEX™˜ŒFIELD˜ŒCACHE;™‚|'™‚å™‚Ñ.™‚€™‚ž™‚•6˜“™‚•™‚ž™‚›‚s™‚™‚›‚g™‚µ™‚›‚I™‚™‚›‚=˜–Qjl ÿ•Abb¿HÉ gð›HÉAB@HÉ gð›HÉAB@hgHÉ o˜Œ TWO-CLASS™c˜“˜“˜ŒINDEX˜ŒW0˜ŒW1K™‚|7™‚°!™‚ ˜ŒRANDOM>™‚€*™‚ž™‚•F˜“™‚•™‚žœ™‚Q˜–‚ó@W²4@A XYZ»J\—KA g @A@W@ X ¹@A Z»J\¾L_¿N˜OA O²mBOð²WCDIhg Kh __¿O_¿OCÿ‘h€i_’O‡ODð‘h€iœ@OOO¿OA @ ¿OA g @A™‚w™‚w™‚Q™˜“˜“˜ŒGENERIC-FUNCTION˜ŒARGS˜Œ OFUNCTION˜ŒFIELD˜ŒCACHE‚í™6‚æ™‚Û™6‚Ò™‚b‚Ë™6‚Â™‚@‚’™M‚™‚¥‚…™l™6T™MO™‚~G™‚HA™‚K3™6,™!™6™M ™‚~‚á™‚‚€™‚]'™‚œ™‚m˜–‚Ü@W²4@A XYZ»J\—KA g @A@W@ X ¹@A Z»J\¾L_¿N˜OA O²VBCIig KO __¿O_¿OBÿ‘h€i_’O‡OCð‘h€iš@OO¿OA g @A™‚w™‚w™‚m™˜“˜“˜ŒGENERIC-FUNCTION˜ŒARGS˜ŒOFIELD˜ŒOCACHE‚Ö™6‚Ï™‚Ä™6‚»™‚b‚™M‚ˆ™‚¥™l™6T™MO™‚~G™‚HA™‚K3™6,™!™6™M ™‚~‚Ê™‚z™‚r'™‚œ™‚~˜–>@A X¹HZ»J¼@AL ]¾M_¿NO@I K$™‚~™˜“˜“˜ŒGENERIC-FUNCTION˜ŒARGS4˜’ŒCACHE-MISS-VALUES-FUNCTION™!™M˜’ŒGET-WRAPPERS™™M˜’ŒGET-SECONDARY-DISPATCH-FUNCTION™œ™‚Ó—˜–‚ªnX¿hHý¿h¹B‘B…@ Z »J ¼h½h¾A_¿h_¿K_¿h_¿O ‘°^O_¿O_¿O_¿O ‘°CO_¿O_¿O_ið³-Lkÿ›OkoH-° OkoH-_¿M•NO&¾…Oh^½°œMYHÉ$™‚Ó™˜“˜“˜ŒGENERIC-FUNCTION˜ŒARGS™˜ŒARG-INFOX˜ŒENDP=™‚Û!™‚H™‚J™‚K™j™‚Ü‚‡˜–@ Y œiHý¿@ I˜ŒGET-VALID-WRAPPER™c˜“˜“˜ŒX˜’ŒCHECK-WRAPPER-VALIDITY™˜’ŒINVALID-WRAPPER-P™˜’Œ WRAPPER-OF™™‚Ü{™‚äœ™‚Ò˜–P@ðŸhc¿noA˜’Œ*GENERATE-RANDOM-CODE-SEGMENTS*™™‚Ò™˜“˜“˜ŒGENERIC-FUNCTION˜ŒFUNCTION ˜–h˜Œ$lambda in CACHE-MISS-VALUES-FUNCTION™c˜“€ ™iœ˜’ŒGENERATE-RANDOM-CODE-SEGMENTS™˜–$@ ¸h¹H‘Hh¹@@I ¿H¸°è™‚å™‚î™˜“˜“˜ŒGENERIC-FUNCTION™6˜’ŒGENERATE-ARGLISTS™œ™‚ò˜–‚“@ ¸@ ¹hºh»h¼I¡JI½MHgno ¾h_¿h_¿h_¿N£O°8N_ —O †O _¿O˜OO&_¿ˆOh__¿N¾°Æ¼J”KL&»„Lh[ºI¹°„™‚ò™˜“˜“˜ŒGENERIC-FUNCTION_˜’ŒCLASS-PROTOTYPE™W˜’ŒEQL-SPECIALIZER-OBJECT™O˜’ŒEQL-SPECIALIZER-P™3˜’ŒMETHOD-SPECIALIZERS™.˜ŒFIND ˜’ŒGENERATE-ARGLIST-CLASSES™˜’ŒGENERIC-FUNCTION-METHODS™™'˜–g A @˜Œlambda in GENERATE-ARGLISTS™c˜“˜“˜Œ CLASS-LIST˜ŒMETHOD˜ŒEVERY™‚ú™˜’Œ$SPECIALIZER-APPLICABLE-USING-CLASS-P™#™iœ™‚ü˜– @ ¿h™‚ü™˜“˜“˜ŒGENERIC-FUNCTION™‚ýœ™‚}˜–‚Í@ Wð²fnoA ²QAX ² B H h–g°/h°,H ²B H i•g†h„h‚h€hXH²UHgð’BŒHgð“B€h ¹A ºj»Il ¶¼h½L‘L‚h°½JMð‘K‰KkÔ^»L¼°é[‘K‡JIl ¶€h$˜’Œ*STANDARD-METHOD-COMBINATION*™™‚}™˜“˜“˜ŒGENERIC-FUNCTION˜Œ APPLICABLE˜ŒARGS‚•˜’ŒACCESSOR-METHOD-SLOT-NAME™‚™‚ã^˜’ŒOPTIMIZE-SLOT-VALUE-BY-CLASS-P™X™‚R˜’ŒCLASS-OF™H˜’ŒSTANDARD-WRITER-METHOD-P™7™‚1™‚+™‚"˜’ŒSTANDARD-READER-METHOD-P™™‚G˜’Œ#GENERIC-FUNCTION-METHOD-COMBINATION™‚™‚žv™‚•d™‚ž=™‚•˜–@ ‘hi˜Œlambda in ACCESSOR-MISS-VALUES™c˜“˜“˜ŒM˜’ŒMETHOD-QUALIFIERS™™iš‚ÿÿ