hưs8p,LAMBDAF2Dp,lFASD-DATADwkfOrson WellesB&F~FDp,COMPILER,NEW-DESTINATIONSpGLOBALlTpB SITElGigamos CambridgepB ,PACKAGESYMBOLpB lREADTABLEstandard Common-Lisp1DCIN-PACKAGEDÀQUOTEB51DÀEXPORTDB;DÀBOUNDPFBOUNDPFMAKUNBOUNDGETÁGET-PROPERTIESGETFMAKE-SYMBOLCMAKUNBOUNDREMFREMPROPSETSYMBOL-FUNCTIONSYMBOL-NAMEÁSYMBOL-PACKAGESYMBOL-PLISTSYMBOL-VALUE1DDEFCONSTANTÁ*SYMBOL-SIZE*F1DBTÁ*SYMBOL-PNAME*1DBTÁ*SYMBOL-VALUE*F1DBTC*SYMBOL-FUNCTION*F1DBT*SYMBOL-PACKAGE*F1DBTÁ*SYMBOL-PLIST*F1DplNC,DEF-DECLARATION%SYMBOLPÀSUBSTDB;DpBmNAMED-LAMBDABpDÀOBJECTDp,HARDWAREFIELD=p,GLOBAL-REGISTERS*T*Btp,VINCULUM%%DATA-TYPE1DBo%SYMBOL?BqDB;DBsBDBtDBpBt1DBoSYMBOLPBqDB;DBsBDBtDpBvl32LOGBITPDpBvLDBBtB~DpBv,UNBOXED-CONSTANTF 1DBoSYMBOL?BqDB;DBsBDBtObsolete, use symbolp instead.DBBt1DBoCELL-BOUND?BqDB;DBsBDCELLDpBvVMA-START-READ-WILL-WRITE-VMA-UNBOXED-MD-BOXEDBDNOTDpB|lDATA-TYPE=DpBv,READ-MDDB1DSETQpSETF,*GRODY-SETF-MACRO-TABLE*DpB+CONSDB;DBKÀLAMBDADÀ&RESTARGS1043DLET*DDpB,SINGLE-TEMPVARSDpB+MAPCARDFUNCTIONDBDÀIGNOREDpB+,GENTEMPDB;NILDpBREST-TEMPVARSDBBBDpB,STOREVARDpB+GENSYMDpB,TEMPVARSDÀAPPENDBBDÀVALUESBDBDpB+LISTDpB+lCOPY-LISTBDBBDLETDDCVALUE1044BDBBDplSIXR-BQ-LIST*DB;SET-SYMBOL-FUNCTIONDpBXR-BQ-APPENDBDpBlXR-BQ-LISTBDBDB;BKBDCIFDpB+BOUNDPDB;BBBBK1DBBDBDB;DBMBDBARGS1045DBDDBDBBDB;BDBDBBB BDBBDBBDBDBDBB BDBDDCVALUE1046BDB BDBDB;CSET-SYMBOL-PACKAGEDBB DBBDBDB;BMBB BM1DBBDBDB;DBNBDBARGS1047DBDDBDBBDB;BDBDBBB,BDBBDBBDBDBDBB,BDBDDCVALUE1048BDB,BDBDB;SET-SYMBOL-PLISTDBB,DBB8DBDB;BNBB BN1DBBDBDB;DBCBDÀSYMBOLPROPERTYC&OPTIONALDEFAULTDBDDBDBBDB;DBKBLBNBDBBDBBDBBKBLBNBDBDDÀVALUEBDBKDpB+NTHBDBLDBZFBDBNDBZFBDBDB;%PUTBKBLBWDBDB;BCBB BC1DDEFMACROBHDÀPLISTBLDBDB;SETFBsDBDB;%REMPROPBsBL