hưs2Dp,lFASD-DATADwkfLovesF|FDp,COMPILER,NEW-DESTINATIONSpGLOBALlTpB SITElGigamos CambridgepB ,PACKAGE,VINCULUMpB lREADTABLEstandard Common-Lisp1DCIN-PACKAGEDÀQUOTEB51DÀEXPORTDB;D DEFINE-CONTROL-REGISTER-MODIFIERC1024-INTERRUPT-OFF16384-INTERRPUT-OFFCDATATYPE-TRAPS-OFFÂDRAM-PARITY-TRAPS-OFFFLOATING-POINT-TRAP-OFFFLUSH-ICACHEHEAP-UNDERFLOW-TRAP-OFFICACHE-TRAPS-OFFCOVERFLOW-TRAPS-OFFÂSYNCHRONOUS-TRAPS-OFF1DDEFMACROÂMODIFY-MEMORY-CONTROLDÀTHUNKDplSIXR-BQ-LIST*DB;LETDpBSlXR-BQ-LISTDB;DÁOLD-TRAP-STATEDp,HARDWARE,TRAP-OFFDBYDB;BQBQDB;DDBVDDÁMEMORY-CONTROLDpB[READ-MEMORY-CONTROLDpB[WRITE-MEMORY-CONTROLDpB[DPBBZpB[%%MEMORY-CONTROL-MASTER-TRAP-ENABLEDFUNCALLBQBdDpB[NOPDBuBd1DBOMODIFY-PROCESSOR-CONTROLDBQDBUDB;BVDBYDBYDB;BQBQDB;DDpTRAPWITHOUT-TRAPSDFUNCTIONDÀLAMBDANILDBVDDCPROCESSOR-CONTROLDpB[READ-PROCESSOR-CONTROLDpB[,WRITE-PROCESSOR-CONTROLDBpBQBDBuDBuB1DBOB@DNAMEMODIFIERCBIT-FIELDDBYDB;ÀDEFUNBDB;DCNEW-VALUEDBUDB;pB[LDBDBYBDBYDB;BDBYDB;BDB;DREGISTERDBUDB;BmDB;BBDB;DBBDB;D1DBODEFINE-TRAP-MODIFIERDDISABLE-NAMERESTORE-NAMEBBYTEDBYDB;ÀPROGNDBYDB;B?DBYDB;B;DBYBBDBYDB;BBBDBYDB;BVDB;DDBZDB]DBdDBfDBDBDCIFDCEQBpB MEMORY-CONTROLDBYDB;BVDBYDBYDB;CNEW-MEMORY-CONTROLDBUDB;BmDB;pB[$$TRAP-DISABLEBDB;DBdDB;DDEDUCE-TRAP-MASKBBDB;DBkDBmBZBoBDB;DBuDB;DBuDBUDB;BDB;BdBDB;DD BYDB;BVDBYDBYDB;ÂNEW-PROCESSOR-CONTROLDBUDB;BmDB;BBDB;DBDB;DBBdBDB;DBBDB;DBkDBmBZBoBdDB;DBuDB;DBuDBUDB;BDB;BBDB;DDBYDB;BBDB;DBDBYDB;BVDB;DDBZDB]DBdDBfDBDBDBDBBBDBUDB;BVDBYDBYDB;BDBUDB;BmDB;BBDB;DBdDB;DDBBBDBkDBmBZBoBDBuDBuDBUDB;BVDBYDBYDB;BDBUDB;BmDB;BBDB;DBDB;DDBBdBDBBDBkDBmBZBoBdDBuDBu1DB?DB;DDISABLE-ICACHE-TRAPSRESTORE-ICACHE-TRAPS1DB?DB;DÂDISABLE-1024-INTERRUPTÂRESTORE-1024-INTERRUPT1DB?DB;DDISABLE-16384-INTERRUPTRESTORE-16384-INTERRUPT1DB?DB;DCDISABLE-DRAM-PARITY-TRAPSCRESTORE-DRAM-PARITY-TRAPS1DB?DB;DCDISABLE-SYNCHRONOUS-TRAPSCRESTORE-SYNCHRONOUS-TRAPS1DB?DB;DÂDISABLE-DATATYPE-TRAPSÂRESTORE-DATATYPE-TRAPS1DB?DB;DÂDISABLE-OVERFLOW-TRAPSÂRESTORE-OVERFLOW-TRAPS1DB?DB;DCDISABLE-ASYNCHRONOUS-TRAPSCRESTORE-ASYNCHRONOUS-TRAPS1DB?DB;DDISABLE-SINGLE-STEP-TRAPRESTORE-SINGLE-STEP-TRAP1DB?DB;DDISABLE-HEAP-UNDERFLOW-TRAPSRESTORE-HEAP-UNDERFLOW-TRAPS1DB?DB;DDISABLE-FLOATING-POINT-TRAPSRESTORE-FLOATING-POINT-TRAPS