hưs8p,LAMBDAF2Dp,lFASD-DATADJIMMaurice Ravel4y4FF Dp,COMPILER,NEW-DESTINATIONSpGLOBALlTpB SITElGigamos CambridgepB ,PACKAGElK2pB lREADTABLEstandard Common-Lisp1DCIN-PACKAGEDÀQUOTEB51DDEFMACRODEFINE-ACCESSORSDpUSERlOBJECT-VARpBAlVALUE-VARÀ&RESTpBAlSLOT-LISTDCDODDpBAlSLOT-TAILBHDRESTBLDpB+NUMBERDC1+BQDpBACODEDB;NILDLETDDpBASLOTDpB+FIRSTBLDBZDDpBAACCESS-NAMEDB^B\DpBASETTER-NAMEDpB+SECONDB\DÀAPPENDDplSIlXR-BQ-LISTDBpDB;DEFSETFBcBgDBpDB;ÀDEFUNBgDBpBCBEDBpDB;pCONSSTORE-CONTENTS-OFFSETBCBQBEDBpDB;BtBcDBpBCDBpDB;pBw,CONTENTS-OFFSETBCBQBWDDNULLBLDpBnXR-BQ-LIST*DB;ÀPROGNDpB+,REVERSEBW1DSETQpSETF,*GRODY-SETF-MACRO-TABLE*DpB+CONSDB;DC%COMPILED-FUNCTION-HEADERÀLAMBDADBFÀARGS82DLET*DDpB,SINGLE-TEMPVARSDpB+MAPCARDFUNCTIONDBDÀIGNOREDpB+,GENTEMPDB;BXDpBREST-TEMPVARSDBBBDpB,STOREVARDpB+GENSYMDpB,TEMPVARSDBmBBDÀVALUESBDBmDpB+LISTDpB+lCOPY-LISTBDBBDBZDDVALUE83BDBBDBDB;Ã%SET-COMPILED-FUNCTION-HEADERDpBnXR-BQ-APPENDBDBpBDBDB;BBDCIFDpB+BOUNDPDB;BBBXB1DBBDBDB;D%COMPILED-FUNCTION-NAMEBDBFÀARGS84DBDDBDBBDB;BXDBDBBBBDBBDBBDBmDBDBBBDBZDDVALUE85BDBBDBDB;%SET-COMPILED-FUNCTION-NAMEDBBDBpBDBDB;BBBB1DBBDBDB;D%COMPILED-FUNCTION-ENTRY-POINTSBDBFÀARGS86DBDDBDBBDB;BXDBDBBBBDBBDBBDBmDBDBBBDBZDDVALUE87BDBBDBDB;%SET-COMPILED-FUNCTION-ENTRY-POINTSDBBDBpBDBDB;BBBB1DBBDBDB;DÃ%COMPILED-FUNCTION-LOCAL-REFSBDBFÀARGS88DBDDBDBBDB;BXDBDBBB&BDBBDBBDBmDBDBB&BDBZDDVALUE89BDB&BDBDB;C%SET-COMPILED-FUNCTION-LOCAL-REFSDBB&DBpB2DBDB;B%BBB%1DBBDBDB;D%COMPILED-FUNCTION-REFSBDBFÀARGS90DBDDBDBBDB;BXDBDBBBFBDBBDBBDBmDBDBBFBDBZDDVALUE91BDBFBDBDB;%SET-COMPILED-FUNCTION-REFSDBBFDBpBRDBDB;BEBBBE1DBBDBDB;DC%COMPILED-FUNCTION-LENGTHBDBFÀARGS92DBDDBDBBDB;BXDBDBBBfBDBBDBBDBmDBDBBfBDBZDDVALUE93BDBfBDBDB;Ã%SET-COMPILED-FUNCTION-LENGTHDBBfDBpBrDBDB;BeBBBe1DBBDBDB;D%COMPILED-FUNCTION-CODEBDBFÀARGS94DBDDBDBBDB;BXDBDBBBBDBBDBBDBmDBDBBBDBZDDVALUE95BDBBDBDB;%SET-COMPILED-FUNCTION-CODEDBBDBpBDBDB;BBBB1DplNC,DEF-DECLARATION%COMPILED-FUNCTION-PÀSUBSTDB;DpBNAMED-LAMBDABDPTRDp,HARDWAREFIELD=BDpBDPB-UNBOXED$$DTP-COMPILED-FUNCTIONp,VINCULUM%%DATA-TYPEDpB,UNBOXED-CONSTANTB1DDEFCONSTANTCOMPILED-FUNCTION-STRUCTURE-SIZEF1DÀDEFVAR*SPECIAL-TRAP-FUNCTIONS*DB;DpTRAPTRAPpBlNON-MODIFYING-EXITpBMODIFYING-EXITpBDIAGNOSTIC-TRAP-EXITpBlTRAP-VECTOR-TABLE1DBpLISP-INTERNALS*EVALUATOR-AVAILABLE?*BXT when eval works on the K.