hưs8p,LAMBDAF2Dp,lFASD-DATADwkfLoveЦ+RF~FDDp,COMPILER,NEW-DESTINATIONSpGLOBALlTpB SITElGigamos CambridgepB ,PACKAGECONSpB lREADTABLEstandard Common-Lisp1DCIN-PACKAGEDÀQUOTEB51DÀEXPORTDB;D0ALLOCATE-CODE-SPACECALLOCATE-STRUCTURECALLOCATE-STRUCTURE-IN-AREAÀCAAAARÀCAAADRÀCAAARÀCAADARÀCAADDRÀCAADRCAARÀCADAARÀCADADRÀCADARÀCADDARÀCADDDRÀCADDRCADRCARÀCDAAARÀCDAADRÀCDAARÀCDADARÀCDADDRÀCDADRCDARÀCDDAARÀCDDADRÀCDDARÀCDDDARÀCDDDDRÀCDDDRCDDRCDRCONSCONS-IN-AREACONTENTSCONTENTS-OFFSETENDPMAKE-HEADERMAKE-POINTERÀRPLACAÀRPLACDSET-CARSET-CDRÂSET-DEFAULT-CONS-AREASET-DEFAULT-STRUCTURE-CONS-AREAÁSTORE-CONTENTSÂSTORE-CONTENTS-OFFSET1DDEFMACROBgDCDATA-TYPEPOINTERDplSIlXR-BQ-LISTDB;p,HARDWARElDPB-BOXEDBuDB;p,VINCULUM%%DATA-TYPEBv1DBtBfDHEADER-TYPEHEADER-DATADBzDB;B}BDB;BB1DBtBcDBvDpBxXR-BQ-LIST*DB;ÀPROGNDBzDB;pB{lVMA-START-READ-VMA-BOXED-MD-BOXEDBvDB;DDpB{,READ-MD1DBtBdDBvÀOFFSETDBDB;BDBzDB;pB{VMA-START-READ-VMA-UNBOXED-MD-BOXEDDBzDB;pB{24+BBvDB;DDB1DSETQpSETF,*GRODY-SETF-MACRO-TABLE*DpB+CONSDB;DBQÀLAMBDADÀ&RESTARGS3054DLET*DDpB,SINGLE-TEMPVARSDpB+MAPCARDFUNCTIONDBDÀIGNOREDpB+,GENTEMPDB;NILDpBREST-TEMPVARSDBBBDpB,STOREVARDpB+GENSYMDpB,TEMPVARSDÀAPPENDBBDÀVALUESBDBDpB+LISTDpB+lCOPY-LISTBDBBDLETDDCVALUE3055BDBBDBDB;BjDpBxXR-BQ-APPENDBDBzBDBDB;BQBDCIFDpB+BOUNDPDB;BBBBQ1DBBDBDB;DB`BDBARGS3056DBDDBDBBDB;BDBDBBBBDBBDBBDBDBDBBBDBDDCVALUE3057BDBBDBDB;BkDBBDBzB DBDB;B`BBB`1DDEFCONSTANT%%STRUCTURE-HANDLE-FIRST-HEADERDBYTEF 1DB%%STRUCTURE-HANDLE-BOXED-QSDBF F 1DBÂ*NO-FIRST-HEADER-CODE*F1DplNC,DEF-DECLARATIONWRITE-STRUCTURE-HANDLESÀSUBSTDB;DpB/NAMED-LAMBDAB2DCLUSTERFIRST-HEADERCLEFT-OVER-BOXED-QSDpB{WRITE-MD-BOXEDDpB{DPBB8B%B7DpB{VMA-START-WRITE-BOXEDDBp,GLOBAL-REGISTERS*STRUCTURE-HANDLES*B61DB1ÂREAD-STRUCTURE-HANDLESB3DB;DB5BKDB6ÀTHUNKDpB{VMA-START-READDBBDB6DBDDÀSTUFFDBDFUNCALLBLDpB{LDBBRBDBXBRB%1DB1MODIFY-STRUCTURE-HANDLESB3DB;DB5BcDB6BLDBKB6DBDBDB7BOXED-QSDBVBLB7BeDBDBDNEW-FIRST-HEADERNEW-BOXED-QSDpB{MD-START-WRITE-BOXEDDB=BhB%Bg1DB1ÃSTRUCTURE-HANDLE-FIRST-HEADERB3DB;DB5BxDB6DBKB6DBDBDB7BeBeB71DB1CSTRUCTURE-HANDLE-BOXED-QSB3DB;DB5BDB6DBKB6DBDBDB7BeB7Be1DB1WRITE-STRUCTURE-HANDLE-BOXED-QSB3DB;DB5BDB6CNEW-VALUEDBcB6DBDBDB7BeÀWRITERB7DBVBBBe1DB1WRITE-STRUCTURE-HANDLE-FIRST-HEADERB3DB;DB5BDB6BDBcB6DBDBDB7BeBBeDBVBB7B1DBBDBDB;DBxBDBARGS3058DBDDBDBBDB;BDBDBBBBDBBDBBDBDBDBBBDBDDCVALUE3059BDBBDBDB;BDBBDBzBDBDB;BxBBBx1DBBDBDB;DBBDBARGS3060DBDDBDBBDB;BDBDBBBBDBBDBBDBDBDBBBDBDDCVALUE3061BDBBDBDB;BDBBDBzBDBDB;BBBB1DBC*STRUCTURE-HANDLES-QUANTA*DCEILINGpB*NUMBER-OF-VIRTUAL-CLUSTERS*pB,*QS-IN-QUANTUM*1DBCODE-HEADER-INSTRUCTION-HIGHDpB{,UNBOXED-CONSTANT