hưs8p,LAMBDAF2Dp,lFASD-DATADjimLove_F~F9Dp,COMPILER,NEW-DESTINATIONSpGLOBALlTpB SITElGigamos CambridgepB ,PACKAGE,VINCULUMpB lREADTABLEstandard Common-Lisp1DCIN-PACKAGEDÀQUOTEB51DÀEXPORTDB;DDEFINE-CONTROL-REGISTER-MODIFIERFLUSH-ICACHEÂMODIFY-ICACHE-ENABLESMODIFY-LEDSMODIFY-LOWCORE-CACHE-ENABLEÂMODIFY-MEMORY-CONTROLMODIFY-PROCESSOR-CONTROL1DDEFMACROBEDÀTHUNKDplSIXR-BQ-LIST*DB;LETDpBNlXR-BQ-LISTDB;DÁOLD-TRAP-STATEDp,HARDWARE,TRAP-OFFDBTDB;BLBLDB;DDBQDDÁMEMORY-CONTROLDpBVREAD-MEMORY-CONTROLDpBVWRITE-MEMORY-CONTROLDpBVDPBBUpBV%%MEMORY-CONTROL-MASTER-TRAP-ENABLEDFUNCALLBLB_DpBVNOPDBpB_1DBKBFDBLDBPDB;BQDBTDBTDB;BLBLDB;DDpTRAPWITHOUT-TRAPSDFUNCTIONDÀLAMBDANILDBQDDCPROCESSOR-CONTROLDpBVREAD-PROCESSOR-CONTROLDpBV,WRITE-PROCESSOR-CONTROLDBkBLBDBpDBpB1DBKB@DNAMEMODIFIERCBIT-FIELDDBTDB;ÀDEFUNBDB;DCNEW-VALUEDBPDB;pBVLDBDBTBDBTDB;BDBTDB;BDB;DREGISTERDBPDB;BhDB;BBDB;DBBDB;D1DBKDEFINE-TRAP-MODIFIERDDISABLE-NAMERESTORE-NAMEBBYTEDBTDB;ÀPROGNDBTDB;B?DBTDB;B;DBTBBDBTDB;BBBDBTDB;BQDB;DDBUDBXDB_DBaDCIFDCEQBpB MEMORY-CONTROLDBTDB;BQDBTDBTDB;CNEW-MEMORY-CONTROLDBPDB;BhDB;pBV$$TRAP-DISABLEBDB;DB_DBPDB;DISABLE-DEDUCE-TRAP-MASKBBDB;DBDB;DBfDBhBUBjBDB;DBpDB;DBpDBPDB;BDB;B_BDB;DD BTDB;LET*DBTDB;DBDBDBTDB;ÂNEW-PROCESSOR-CONTROLDBPDB;BhDB;BBDB;DBDBPDB;BBBDB;DB_DB;DBBDB;DBfDBhBUBjB_DB;DBpDB;DBpDBPDB;BDB;BBDB;DDBTDB;BBDB;DCOLD-VALUEDBTDB;BQDB;DDBUDBXDB_DBaDBDBDBDBBBDBPDB;BQDBTDBTDB;BDBPDB;BhDB;BBDB;DB_DBPDB;UPDATE-TRAP-MASKDB;BBBDB;DBBDB;DDBfDBhBUBjBDBpDBpBDBPDB;BQDBTDBTDB;BDBPDB;BhDB;BBDB;DBDBPDB;B-DB;BBBDB;DB_BDB;DDBBDBfDBhBUBjB_DBpDBpB1DBKB-DBBBB_BDBTDB;BDBPDB;C=BDB;DBDBTDB;BBBB_DBTDB;ENABLE-DEDUCE-TRAP-MASKBBB_B1DBKÀBIT-ONDBB_DBTDB;pBVl32LOGBITPDBTDB;ÁBYTE-POSITIONBB_1DBKÁSYNCHRONOUS-ONDB_DBTDB;BeDB;pBV,%%MEMORY-CONTROL-SYNCHRONOUS-TRAP-ENABLEB_1DBKASYNCHRONOUS-ONDB_DBTDB;BeDB;pBVl%%MEMORY-CONTROL-ASYNCHRONOUS-TRAP-ENABLEB_1DBKBIT-ON-MASKDBB_MASKDBPDB;BDBTDB;BeBB_BDB;Dp,GLOBAL-REGISTERSl*ALL-ZERO*1DBKSYNCHRONOUS-ON-MASKDB_BDBTDB;BDB;BtB_B1DBKASYNCHRONOUS-ON-MASKDB_BDBTDB;BDB;B}B_B1DBKÁICACHE-ON-MASKDB_DBPDB;BDB;pBV%%MEMORY-CONTROL-ICACHE-ERROR-ENABLEB_DB;DpBVl*ICACHE-TRAP-MASK*1DBKDRAM-ON-MASKDB_DBPDB;BDB;pBV%%MEMORY-CONTROL-DRAM-PARITY-ENABLEB_DB;DpBVl*DRAM-PARITY-MASK*1DBKHEAP-ON-MASKDBDBPDB;BDB;pBV%%PROCESSOR-CONTROL-HEAP-UNDERFLOW-TRAP-ENABLEBDB;DpBV*HEAP-UNDERFLOW-MASK*1DBK1024-ON-MASKDB_DBPDB;BDB;pBV,%%MEMORY-CONTROL-1024-INTERRUPTB_DB;DpBV*1024-INTERRUPT-MASK*1DBKÁ16384-ON-MASKDB_DBPDB;BDB;pBV,%%MEMORY-CONTROL-16384-INTERRUPTB_DB;DpBV*16384-INTERRUPT-MASK*1DBKB_DBBB_BDBTDB;SETQDB;pB*TRAP-MASK*DBTDB;pBV,32LOGIORDB;DBBpBV*INITIAL-TRAP-MASK*DBDBBBD CASEBDBtDBTDB;BDB;pBVl*UNMASKABLE-SYNCHRONOUS-TRAP-MASK*DBTDB;BDBTDB;BB_DBTDB;BDBTDB;BB_DBTDB;BBDB}DBTDB;BDB;pBV*UNMASKABLE-ASYNCHRONOUS-TRAP-MASK*DBTDB;BDBTDB;BB_DBTDB;BB_DBDBPDB;BB_DB;DBDBDBPDB;BB_DB;DBDBDBPDB;BB_DB;DBDBDBPDB;BB_DB;DBDpBV%%MEMORY-CONTROL-SINGLE-STEP-ENABLEDB;pBVl*SINGLE-STEP-MASK*DpBV%%MEMORY-CONTROL-DATATYPE-TRAP-ENABLEDB;pBV,*DATATYPE-MASK*DpBV%%MEMORY-CONTROL-OVERFLOW-TRAP-ENABLEDB;pBV,*OVERFLOW-MASK*DB-DpB+ERROR,Unhandled Memory control byte in enable-deduce-trap-maskBBDBBDBDBPDB;BB_DB;DBDpBV%%PROCESSOR-CONTROL-FLOATING-POINT-TRAP-ENABLEDB;pBV*FLOATING-POINT-MASK*DB-DB1Unhandled Processor control byte in enable-deduce-trap-maskBB1DBK32LOGNOTDÀ32BITSDBPDB;pBV,32LOGXORBKDB;DpBl*ALL-ONES*1DBKBDBBB_DBTDB;BDB;BDBTDB;pBV,32LOGANDDB;DBBBDBDBBBD BBDBtDB;DBJDBBDBBDBBBDB}DB;DBJDBBDBBBDBDBTDB;BDB;DBJBDBTDB;BB_DBTDB;BB_DBDBTDB;BDB;DBJBDBTDB;BB_DBTDB;BB_DBDB;DBJBDBDB;DBJBDBDB;DBJB!DB%DB;DBJB'DB+DB;DBJB-DB-DB1lUnhandled Memory control byte in disable-deduce-trap-maskBBDBBDBDB;DBJBDB<DB;DBJB>DB-DB1Unhandled Processor control byte in disable-deduce-trap-maskBB1DB?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