hưs2D p,COMPILE-DATADpfcDeathNF}FDp,COMPILER,NEW-DESTINATIONSpGLOBALlTpB SITEpB LMIpB QFASL-SOURCE-FILE-UNIQUE-ID1DplFSMAKE-FASLOAD-PATHNAMEDpB+QUOTElJBDB:DSKDB:DlKKBUGDB:lNEW-SPY-UTILITIESDB:LISPDB:FHpB ,PACKAGEpB LAMBDApB BASEF pB lREADTABLEpB lZL1DplSI,DEFVAR-1Â*CACHE-DATA-SELECTOR*F1DÀEXPORTDB:D4C$$HALT-BIT-HALTEDC$$HALT-BIT-RUNNINGGET-HISTORYÀK-INITK-GOCK-READ-OARK-SET-PCÂK-LOAD-MEMORY-CONTROLK-MEM-WRITECK-MEM-READCK-READ-CURRENT-MAP-ADDRESSK-READ-FRAMEÁK-READ-GC-RAMK-READ-HP-SPÂK-READ-MEMORY-CONTROLCK-READ-MEMORY-MAPK-READ-MEMORY-STATUSK-READ-PROCESSOR-CONTROLÂK-READ-VIRTUAL-MEMORYK-READ-REGISTERCK-READ-RETPC-RDESTK-READ-SPY-PROGRAM-HALTK-READ-SPY-MMFIOÁK-READ-SPY-PCÂK-READ-TRANSPORTER-RAMK-READ-TRAP-OFFK-READ-TRAP-REGISTERÀK-RUNCK-RUN-FLAGK-STARTÀK-STEPÀK-STOPK-VMA-START-READCK-WRITE-CURRENT-MAP-ENTRYÁK-WRITE-GC-RAMÁK-WRITE-HP-CSPCK-WRITE-MEMORY-MAPCK-WRITE-PROCESSOR-CONTROLK-WRITE-TRANSPORTER-RAMÂK-WRITE-VIRTUAL-MEMORYCREAD-OPENREAD-ACTIVEREAD-RETURNÀREAD-QÁREAD-MD-BOXEDÁREAD-VMA-BOXEDR-MDÀR-VMAÁSAVING-HP-CSPCSAVING-OARÂSCREEN-VIRTUAL-ADDRESSÀW-VMA1DBYÁ*LOCAL-K-SLOT*NIL,If non-NIL, slot K is in on LOCAL NUBUS1DSPECIALC*LOCAL-DEBUGGING*1DBYC*K-MEMORY-BOARD-REVISION*B1DDEFPROPKIH-NOPB-pSYSTEM,SYSTEM-CONSTANT1DpBWlDEFCONST-1Blloadi-32 to no-op1DBKIH-ALU-NOPB-B1DBBlgeneric ALU instruction wNOP dest1DBÁKIH-ALU-G1FBRB-B1DBB@ ~generic ALU instruction wglobal 1F dest, boxed right1DBÁKIH-ALU-TRANSPB-B1DBBlgeneric ALU instruction wtransporter dest1DBCKIH-ALU-G0B-B1DBB@`generic ALU instruction wg0 dest, boxed right1DBCKIH-ALU-A0B-B1DBB@@,generic ALU instruction wA0 dest1DBKIH-ALU-A0BLB-B1DBB@generic ALU instruction wA0 dest boxed left1DBKIH-ALU-A0BRB-B1DBB@@generic ALU instruction wA0 dest boxed right1DBKIH-ALU-A0BUB-B1DBB@generic ALU instruction wA0 dest & unboxed macrolink1DBCKIH-ALU-O0B-B1DBB@generic ALU instruction wO0 dest, boxed right1DBKIH-DISPATCHB-B1DBBdispatch instruction1DBKIH-DISPATCH-X16B-B1DBB!,dispatch x16 instruction1DBKIH-JUMPB-B1DBB$ljump unconditional1DBCKIH-JCONDB-B1DBB,jump conditional1DBKIH-CALLB-B1DBB (call1DBKIH-OPENB-B1DBB,loadi-32 to no-op, open1DBÁKIH-OPEN-CALLB-B1DBBlopen-call1DBCKIH-RETURNB-B1DBB return1DBÁKIH-RETURN-FDB-B1DBB'return wFDEST1DBKIH-XRETURNB-B1DBB.strange return1DBKIH-OPEN-CALL-XB-B1DBB5lopen-call1DBCKIH-TOPENB-B1DBB<topen1DBCKIH-TCALLB-B1DBBCtcall1DBKIH-TOPEN-TCALLB-B1DBBJtopen-tcall1DBKIH-LOAD-G0B-B1DBBQ`load G0 register instruction1DBKIH-LOAD-G1B-B1DBBXbload G1 register instruction1DBKIH-LOAD-G2B-B1DBB_dload G2 register instruction1DBKIH-LOAD-G3B-B1DBBffload G3 register instruction1DBKIH-LOAD-G9B-B1DBBm@load A0 register instruction1DBKIH-LOAD-A0B-B1DBBt load A0 register instruction1DBKIH-LOAD-O0B-B1DBB{load O0 register instruction1DBKIH-LOAD-R0B-B1DBB@load R0 register instruction1DBÁKIH-LOAD-PCTLB-B1DBBlload processor control reg1DBÁKIH-LOAD-MCTLB-B1DBB,load memory control reg1DBKIH-LOAD-VMAB-B1DBB,load VMA1DBKIH-LOAD-VMA-SRB-B1DBBଂload VMA start read1DBCKIH-LOAD-VMA-SR-RB-B1DBBଃload VMA start read from reg1DBKIH-LOAD-VMA-SWB-B1DBBجload VMA start write1DBKIH-LOAD-MDB-B1DBBload Write-MD1DBÁKIH-LOAD-MD-SWB-B1DBBܬload MD-START-WRITE1DBKIH-LOAD-MAPB-B1DBB,load map1DBKIH-LOAD-OARB-B1DBBlload Open, Active, Return1DBKIH-LOAD-CSPB-B1DBBload call stack pointer & heap pointer1DBKIH-LOAD-RPCB-B1DBB,load return PC and dest1DBKIH-LOAD-USCB-B1DBBload microsecond clock1DBÁKIH-LOAD-STATB-B1DBB,load statistics counter1DBKIH-LOAD-DTB-B1DBB,datatype ram write pulse1DBKIH-ALU-LOAD-DTB-B1DBBdatatype ram write pulse in a ALU instruction1DBKIH-LOAD-GC-RAMB-B1DBB¬gc ram write1DBKIH-LOAD-TRANSPORTERB-B1DBBtransporter ram write1DBKIH-FMUL-G0B-B1DBB`Floating point multiplier op1DBKIH-FALU-G0B-B1DBB`Floating point alu op1DBCKIH-BRANCHB-B1DBB lShort branch instruction.1DBCKIL-READ-QB-B1DBBPlread q reg1DBKIL-READL-G0B-B1DBB#read G0 as left source1DBKIL-READR-G0B-B1DBB*`,read G0 as right source1DBKIL-READ-A0B-B1DBB1 ,read A0 as right source1DBKIL-READ-O0B-B1DBB8F,read O0 as right source1DBKIL-READL-O0B-B1DBB?read O0 as left source1DBKIL-READ-R0B-B1DBBF@,read R0 as right source1DBKIL-READ-OARB-B1DBBM,read OAR1DBÁKIL-READ-PCTLB-B1DBBTlread PCTL1DBÁKIL-READ-PSTATB-B1DBB[lread PSTAT1DBÁKIL-READ-MSTATB-B1DBBblread MSTAT1DBÁKIL-READ-MCTLB-B1DBBilread MCTL1DBKIL-READ-CSPB-B1DBBp,read CSP1DBKIL-READ-RPCB-B1DBBw,read RPC1DBKIL-READ-OPCB-B1DBB~,read OPC1DBÁKIL-READ-OPC+B-B1DBBlread OPC+1DBCKIL-LR-SUBB-B1DBBa@,G0 - G01DBKIL-READ-VMAB-B1DBB,Read VMA1DBKIL-READ-MDB-B1DBB,Read MD1DBKIL-READ-MAPB-B1DBB,Read MAP1DBKIL-READ-USCB-B1DBBRead Microsecond clock1DBÁKIL-READ-STATB-B1DBB,Read Statistics counter1DBÁKIL-READ-TRAPB-B1DBBlRead Trap Register1DBÁKIL-ADD-G0-G0B-B1DBBa Add G0 + G01DBÁKIL-ADD-G1-G0B-B1DBBa Add G1 + G01DBKIL-READ-GC-RAMSB-B1DBB,Read gc ram and transporter ram1DBÁKIL-FADD-G1-G2B-B1DBBc8 FADD single G1 to G21DBKIL-FIADD-G1-G2B-B1DBBc,FIADD single G1 to G21DBÁKIL-FMUL-G1-G2B-B1DBBc8FMUL single G1 to G21DBCKIL-FMODE0B-B1DBBlFMODE0 Fast, Round nearest1DBCKIL-FMODE1B-B1DBB lFMODE1 DM,DL,P2,P3,P4 Transparent1DBCKIL-FMODE2B-B1DBB@FMODE2 P1 transparent, Max accumulate1DBCKIL-FMODE3B-B1DBBflFMODE3 2264/2265 mode, min latency1DBCKIL-READ-TRAP-OFFB-B1DBBread trap off1DBKIL-FIELD-PASS-G0-G1B-B1DBB c ,field pass g0 g11DBYÀK-SLOTBHigh 8 bits of NUBUS address for K processor1DBYCK-MEM-ADDRBlK Processor - Memory address base1DBYCK-IO-ADDRBK Processor - IO address base1DBYK-MODE-ADDRBK Processor - Mode register address1DBYK-HPTR-ADDRBlK Processor - History RAM pointer address1DBYK-HRAM-ADDRBK Processor - History RAM data address1DBYCK-PC-ADDRBK Processor - Program Counter address1DBYK-MMFIO-ADDRB,K Processor - MMFIO bus address1DBYK-SPY0-ADDRBlK Processor - Low spy Instruction Register address1DBYK-SPY1-ADDRBlK Processor - Hi spy Instruction Register address1DBYK-SPYC-ADDRBlK Processor - Spy command register address1DBYCK-INT-ADDRBK Processor - NUBUS interrupt register base address1DBYCK-MEM-LISTBList of installed memory - Setup by TEST-221DB*HRAM-ADDRESS-MASK*B-B1DBBE1DB%%PROGRAM-COUNTER-PCB-B1DBBKDBYTEF1DB%%PROGRAM-COUNTER-TRAP1B-B1DBBTDBNFF1DBÃ%%PROGRAM-COUNTER-TRAP-ENABLEB-B1DBB\DBNFF1DB%%PROGRAM-COUNTER-ICACHE-HITB-B1DBBdDBNFF1DBC%%PROGRAM-COUNTER-EC-PROC4B-B1DBBlDBNFF1DBÂ%%PROGRAM-COUNTER-HALTB-B1DBBtDBNFF1DBB`B-B1DBB`1DBB_B-B1DBB_Fˀ  F K-WRITE-MODEFA@BDEBUG-WRITE-WORDDDpB NO-SIMPLE-SUBSTITUTIONB-DpBINTERPRETED-DEFINITIONDNAMED-SUBSTBDCNDBBBDpB(,ARG-MAPDDBDpB(PLACEHOLDER-TO-MICRO-FUNCTION-TABLEDOBˀ  F K-READ-MODE@BDEBUG-READ-WORDDDBDBBBDBBDBOBˀ  F CK-SPY-CMDFA@B9BDBDBDBBDBDBB9BDBDDBDBDOB1DBC$$SPY-COMMAND-STOPB-B1DBB1DBC$$SPY-COMMAND-RUNB-B1DBBF1DBC$$SPY-COMMAND-STEPB-B1DBBF1DB$$SPY-COMMAND-RELOAD-INSTRUCTIONB-B1DBBF1DBÃ$$SPY-COMMAND-CLEAR-OPC-CLOCKB-B1DBBF1DB$$SPY-COMMAND-SET-OPC-CLOCKB-B1DBBF1DB$$SPY-COMMAND-CLEAR-SPY-MODEB-B1DBBF1DBC$$SPY-COMMAND-SET-SPY-MODEB-B1DBBF1DBC$$SPY-COMMAND-STEPMODE-FULL-CLOCKB-B1DBBF1DBC$$SPY-COMMAND-SET-STEPMODEB-B1DBBF ˀ  F K-SPY-I0FA@B1BDBDBDBBDBDBB1BDBDDBDBDO Bˀ FCK-SPY-I0-AND-CHECKFA@B1BBFSIGNALSpy IR low failed, is ~X, should be ~XDDBDDBDpB(lLOCAL-MAPDDTEMDBD@@׀X D@EOB ˀ  F K-SPY-I1FA@B5BDBDBDBB!DBDBB5BDBDDBDBDO.B!ˀ FBt@BtB)BBldebug port timeoutDDBDBBtBDLETDDRESPONSEDBB)DCIFDNUMBERPB6DLDBBtB6DBB4DBDDB6DB@@8D@E͚ OIBtˀ F Bv@B)BKBDDBDBBvBDB=BKDBB)DBD@͚OUBvˀ  F Bu@B-BDDBDBBuBDBB-DBO`Buˀ  F K-READ-HPTR@B!BDDBDBBcBDBB!DBOlBcˀ F K-READ-HRAM@B%BEBDDBDBBoBDÀLOGANDBEDBB%DBD@OzBoˀ F K-WRITE-INTF@B=BDBDBDBB}DINT-NUMÀVALUEDBDC+B=DASHBFBDBDDBDBDBDE|[3OB}ˀ  F BhFA@BBDBDBDBBhDBYTE-ADDRESSDBDÀLOGIORBBDBDDBDBDOBhˀ F K-MEM-READ-WORD-ADDRESSFA@BBDDpB ,MACROS-EXPANDEDDBhDBDDWORD-ADDRESSDBDE|[OBˀ  F BgF@BBDBDBDBBgDBDATADBDBBBBDBDDBDBDBDOBgˀ F K-MEM-WRITE-WORD-ADDRESSF@BBDDBDBgDBDDBDBDBDE|[OBˀ  F K-MEM-WRITE-BYTEF@BDEBUG-WRITE-BYTEDBDBDBBDADDRBDBDBBBBDBDDBDBDBDOBˀ &FÀDPB32F@pBl%%BYTE-SPECIFIER-POSITIONpB%%BYTE-SPECIFIER-SIZEDDBDÀLOGNOTÁBYTE-POSITIONCBYTE-SIZEDBDDBDPPSSDWORDDBDDÀMASK1DÀMASK2DÀMASK3DBDDEZ[@D@EDEZ[ ADABׂAEEDEZ[O Bˀ !FCHECK-K-PROMF@BSLOT-PROM-STRING-COMPARElLMI FALCON PROCESSOR V0.0LMI FALCON PROCESSORBUnable to decode processor config promDDBDDSLOTDERROR-IF-RANDOMDÁDOCUMENTATIONlRoutine to check if a slot contains a K processorDBE8|E 88v O"Bˀ 3FBF@BÁSTRING-LENGTHDDBDÀPSETQDOTIMESDBDDBDÀSTRINGDBDDCIBDB@||[28|@A@|@||[ 2@Es3E@EJ[X@@EAUYO:Bˀ F ÁK-LOCAL-SETUPFA@BK-SETUPDDBDDCLOCAL-SLOTDBE||ZOHB=ˀ1AbFrBA@ B=B9B5B1B-B)B%B!BBBBBBBINIT-DEBUG-BOARDÀFORMAT~% K processor found in slot ~A.~%~%*** Can't setup, I couldn't find a processor! ***~%ÀCERRORChoose a slot numberlCan't setup, no processor!~&Slot number?READÀFQUERYpB ,CHOICESREVERSE,Slot ~xCDIGIT-CHARpB lFRESH-LINETake which K?FFF@FFFFFK-RESETBbDDBDÂINHIBIT-STYLE-WARNINGSÀFIRSTB+PUSHWHENB,DBDDÁPOSSIBLE-SLOTSDB4BBBDÁPOSSIBLE-SLOTDBSets up and initializes a debug link to a K processorDB8DDETvvAAE 8|A@EZ@EDAAAE:UY@XED||EB,@EZ8@G&@DBwB @@DCCEDGE@E!D|E|Uz"@|E:|UzZCDDYBE#DE|Uz$D|[%D&D'D (D )D *D *D +D,D-D./O{BAˀ $ FBi@B)BZBBB~BbBOJ#x~x failed BDDBDB+BvBDBDDFOODBIssue a reset to the K processor and stops the clocksDB  D   @E D@D|@Z9OBi1DBYB{Bˀ FB~@B)B{B9BBDDBDBvBDBStop the processor clocks, and init spy modesDB D D D Dv| @͚OB~ˀ  F CK-STOP-IF-RUNNING@B{B~DDBDBBBDBmB{DB~DBDBmDBDxOBˀ "FCK-SPY-RUN@B)B{B9BBDDBDBvBDBStart the processor running while fetching from the spy regDB D D D D DE| @͚OBˀ "FBz@B)B{B9BBDDBDBvBDBStart the processor runningDB D D D D DE| @͚OBzˀ #FB}@B)B9B{B~BBDDBDBvBBmBDBlStep the processor one clock cycleDB8  D D D D D| @͚OB}ˀ FÁK-EXECUTE-DISF@BO~&~AplNCDISDDBDDINSTR-HDINSTR-LDBEDE |[3OBˀ FCK-EXECUTE0F@B5B1B9B{B~BDDBDB!BBBmBDBDDBDBDBLoad a spy instruction and let it sit there (no step)DB 8  D D D D DOBˀ FCK-EXECUTE-SUBSTEP@BBB9BDDBDBDB D DOBˀ #FCK-EXECUTEF@B5B1B9B{B~BDDBDB!BBBmBDBDDBDBDBLoad a spy instruction and step the clock onceDB 8  D D D D D DOBˀ #FCK-EXECUTEXF@B1B5B9B{B~BDDBDBB!BBmBDBDDBDBDBLoad a spy instruction and step the clock onceDB 8  D D D D D DOBˀ )FCK-EXECUTE2F@B5B1B9B{B~BDDBDB!BBBmBDBDDBDBDB,Load a spy instruction and step the clock twiceDB 8  D D D D D D D DO0B"ˀ /FCK-EXECUTE3F@B5B1B9B{B~BDDBDB!BBBmBDBDDBDBDBLoad a spy command and step the clock 3 timesDB 8  D D D D D D D D D DOAB3ˀ 5F!CK-EXECUTE4F@B5B1B9B{B~BDDBDB!BBBmBDBDDBDBDBLoad a spy command and step the clock 4 timesDB 8  D D D D D D D D D D D DORBDˀ #FÁK-EXECUTE-RUNF@B5B1B9B{B~BDDBDB!BBBmBDBDDBDBDBLoad a spy command and let the processor runDB 8  D D D D D DOcBU1DBYÁ*DEFAULT-PCTL*ˀ FK-SETUP-PCTL@BdBBBBDDDB D D DOpBjˀ ,$FBb@BZBB~BB$BDFB3DDBDB+B,BDBDDB4DBInit some registers, and set the PC to *cache-data-selector*DB D D@ D@@EUY D D DOBbˀ F K-INIT0@BZB~B$DDBInit some registers, and set the PC to #x0100DB DOB1DBYHBUFDCMAKE-ARRAYFpB TYPEpB ,ART-32BˀJ0F1DUMP-HISTORY@BB%BEBBB9FF FeB~FFBBBOl~%HBUF(~A) PC = ~X~%DDBDB+BoBDBDDBDBDDB4DBDD@ D  D D@D@EM@@E9EĀc@ED@EZD@EJ D  D @@E9OBˀ>0F+Ba@BB%BEBBB9pBWlSIMPLE-MAKE-ARRAYFÀART-QpK-KBUGlK-HALTED-PB~BOlFalcon was running, stopped it at PC #x~xFBBDDBDB+BoSETFBDBDDCPCDB4DB @ DV8B@ED@DA D  D DAEDD@AAE9OBaˀ  FÀSET-NUFA@BBBBiBbBB3BDDBDBDBDDBDB   D DE|[ DDOBˀFRNUFA@B-BBBBBBDBDDBDBuDBDDBDB D D D OBˀ FWNUF@BBBBBDDDBDDBDBDB D D DOBˀ FBFA@BBBBDDDBDDBDBD DOBˀ FB@B-BBBDBDDBDBuDB D O Bˀ FW-MDFA@BBBBDDDBDDBDBD DOB ˀ FW-MD-SWFA@BBBBDDDBDDBDBD DO"Bˀ FB@B-BBBDBDDBDBuDB D O,BˀA6F.X100@B)BKBBBBB~BiBBbBBDB}BDDBDBvB+B,DBDDB4DB  @D@Es@@@E5UYD3D  D DD D3D@͚O@B/ˀ !FZAP-MEM@BBBFDDBDB+BgB,DBDDB4DB@D@E sD|@E s@@E TYOOBCˀ FCZORCH-MEM@BBFDDBDB+BgB,DBDDB4DB@D@E s D|@E s@@ETYO^BRˀ5"F#FALCON-INITIALIZE-CALL-HARDWARE@B.BBBBbBFB3FDDBDB+DBDDB4DB  D D|@  D@ D D@@E9 D D D DOoBaˀ ]:F=DUMP-CH@BBBBZBBMB-BpBB3BBO,~%OAR - ~X HP-CSP - ~X~%FF,*Yellow alert frames*~%BBDlHP - ~X HEAP - ~X~%FFDDBDB+BmBuDBDDÀHP-CSPDOARDCHPDBD @ @D @ AEDDAD@|@EE[BE8E D D EDBE|@ D[|BcB9DAD@DOBrˀ  F BeFA@BBDDDBDDBDBDOBeˀ FCK-SET-PC-AND-CHECKFA@B)BKBeBBlPC failed to load, is #x~x should be #x~xDDBDBvBmDBDDBDBDDTEMPDBD @Z@׀E [Zx D@EOB1DBMAP-BITS-INVALIDB-B1DBB1DBCMAP-BITS-RB-B1DBBF1DBMAP-BITS-RWB-B1DBBF1DBCLUSTER-SIZEB-B1DBBFˀ FÁK-MAP-CLUSTERF@BBBZBBDDBDDVIRTUAL-ADDRESSDPHYSICAL-ADDRESSDBITSDB D D DEOBˀ -&F K-MAP-LOCAL-RAM@CPABFFe@FeFeBFDDBDB+DBDDBDÀLENGTHDBDÀOFFSETDBDDCVADLENDBEEEA@V@ED|D2@E2AERA@A9OBˀ0(F"K-MAP-NUBUS-SLOT@BBFFe@FeFeBFDDBDB+DBDDBDBDBDBDBDBDDBDBDB||[EEA@V @EDD2@E2AERA@A9OB1DBYMEMORY-SLOTF 1DBYCVCMEM-SLOTF 1DBBB-B1DBBˀ FÂK-INIT-VIRTUAL-MEMORY@BBBFDDB D DD| DDO,B$ˀ FCMAP-VCMEM@BBBBFDDB DD DD O7B/ˀ )*FB|FA@BB9BBZBBbBaB$BDBBeBjBDDBDBDBDDSTARTING-ADDRESSDB    D D D DOFB|ˀ F BcFA@BjB|BzDDBDDB@DBOQBcˀ J@F5FALCON-SET-PC-AND-GOA@B9BZF F0F0F0F2F2pB,STORE-KEYWORD-ARG-VALUESDpB ,DO-INITpB DO-INITIALIZE-CALL-HARDWAREpB DO-INIT-VIRTUAL-MEMORYpB lPROCESSOR-CONTROL-REGISTERpB ,MEMORY-CONTROL-REGISTERBbBaB$BBD$BBBzDDBDBBmDBDDB@DBDBDDO-INITDDO-INITIALIZE-CALL-HARDWAREDÂDO-INIT-VIRTUAL-MEMORYDCPROCESSOR-CONTROL-REGISTERDMEMORY-CONTROL-REGISTERDpB(,COMPILER-ARGLISTB@&KEYBwByB{DB}DBDB@8A@EDA8B8C8E8DEDD 8DDDDDOBTˀ FÃREAD-INST-PHYSICAL-WITH-OFFSETFA@BpB*CODE-START*BDDBDBhDBDDCDOUBLEWORD-ADDRESSDBDDADR0DB|D3s@ @D@ @D|@3 |[OBˀ FCREAD-INSTFA@BBDDBDBhDBDDBDB@D|s@D||s3 |[OBˀ !FCWRITE-INSTF@BBF DDBDBgDBDDBDINSTDBDE sDD|E s3DE D[OBˀGF+WRITE-INST-AND-CHECKF@BF BBÀERRORD1 failed, wrote ~s, read ~sD2 failed, wrote ~s, read ~sDDBDBhBgDBDDBDBDBDDCD1DCD2DBDBDDED[A@ DE s@ D|E s3A@E @DE sBX D@EBAE @D|E s3B [Zx DAEBOBˀ FBFA@B-B1BBDFDBDDBDBuDBDDREGDB DE DD OBˀ FBFA@B-B8BB3FDBDDBDBuDBDDBDB DE DD OBˀ"FREAD-OPEN-BOXEDFA@B-B[BB8BB"FDB3FBDDBDBuDBDDBDB DE D D DD@͚O Bˀ FB@B-B[BBBB"B3FBDDBDBuDB D D D@͚O Bˀ FB@B-B[BBBB"B3FBDDBDBuDB D D D@͚O" Bˀ FBFA@B-BFBB3FDBDDBDBuDBDDBDB DE DD O0 BˀFBd@B-BMBBB3BDBDDBDBuDB D D O: Bdˀ FK-WRITE-OARFA@BZBBBB"B3DDBDDBDB D D DOF B= ˀ FK-WRITE-OAR-MULTIPLEFA@BBDDBDDBDBDDDDDDDOR BI ˀ FB@B-BBB3BDDBDBuDB D O\ Bˀ FCPRFA@B-BBBZBBBB3BDDBDBuDBDDBDB D D DOj B_ ˀ #FDUMP-PRB@FFFeFeBO,~&VMA=~x MD=~xB_ DDBDB+B,DBDDBDÀCOUNTDBDDB4BDB|EA@  E DE@3 E@3@@EAUYO Bm ˀ * FÀDUMP-MB@BFFFeFeBO,~&PMA=~x MD=~xBDDBDB+BhB,DBDDBDBz DBDDB4BDB|EA@ E DE@Es3DE@Es3@@EAUYO B ˀ FÀFILL-M@BBFDDBDB+BgB,DBDDB4DB@D@E|[ @@ETYO B ˀ FBnFA@B-BBBZBBB"BDBDDBDBuDBDDÀENTRYDB DE | D DO Bnˀ FBi@B-BBBDBDDBDBuDB D O Biˀ FBFA@BZBBBDDDBDDBDB D D DO Bˀ FBF@BBZBBB"BDDDBDDB DBDB DE | D D D DO Bˀ F FALCON-READ-MAPFA@BnDDBDDB DBO B ˀ FCFALCON-WRITE-MAP-AND-CHECKF@BBnBWrite map failed, is ~x should be ~xDDBDDB DBDBDDBDBE@@ׁX DE@O B ˀ FBfFA@BZBBBBDDDBDDBDB D DO Bfˀ F ÂK-WRITE-MEMORY-CONTROLFA@BfDDBDDBDBO B ˀFBm@BZBB-BiBB3BBDDBDBuDB D @ DO BmˀFBp@BZBB-BTBB3BBDDBDBuDB D @ DO! Bpˀ FBFA@BZBBBBDDDBDDBDB D DO, BˀFK-READ-PROCESSOR-STATUS@BZBB-B[BB3BBDDBDBuDB D @ DO7 B/ ˀ  F K-READ-FLOAT-STATUS@plK-HARDWARE,%%PROCESSOR-STATUS-FLOATING-POINT-STATUSB/ DDBDB͚OC B: ˀ"FBqFA@B-BBBZBBBBDB3BDDBDBuDBDDLOCATIONDB D D DOQ BqˀM.F2BF@BBB-BBBZBBB"BDBB,The map entry for location #x~x is #x~x, which not validThe map entry for location #x~x is #x~x, which does not permit writesBB3DDBDBuDBDDBK DBDCINHIBIT-READ-ONLYDBDDMAPDB D D  D @@|@X|@8DE@XDE@D|@DD@ D D D Og BˀFBF@BZBBBFFFBBDDDBDDCVMA-BOXEDDMD-BOXEDDCTRANS-TYPEDBK DB E DE DE DDZZZ DO{ Bˀ!"FBkFA@B-BBBZBBBBDB3BDDBDBuDBDDBK DB DE| D D|@O BkˀFBF@BBZBBBBDB3DDBDDBK DBDB DE| D D DO BˀC2F.CK-ADDRESS-TRANSPORTER-RAMFE@BBBZBBB-pB> l%%MEMORY-CONTROL-TRANSPORTER-MODEBiBB3BBBDFFBB"FFDDBDBuDBDDBp DBr DBt DCTRANS-MODEDDATATYPEDBDDCMEMCONTROLDCVMA-START-READ-INSTRUCTIONDBD ăE D@ Z@ D@ DĀEDEDDZZAAE DEDDZED| DO B ˀFBwFE@B-pB> %%TRANSPORTER-RAM-BUS-OFFSETBBB B3BDDBDBuDBDDBp DBr DBt DB DB DB EEEE DD @͚O BwˀFBF@BZBB BB B"BDDDBDDBp DBr DBt DB DB DBDB EEEE DED| DO Bˀ FBy@B-BBB3BDDBDBuDB D O Byˀ FBFA@BdFB= DDBDDÀTHUNKDBDDBDBB@||/E@@ŭO Bˀ FBl@B-BpBB3BDDBDBuDB D O Blˀ FBFA@BZBBBBDDDBDDBDB D DO Bˀ FBFA@BlF!BDDBDDB DBDDBDBB@!||/E7E@EZ|@E@ŭO Bˀ F BjFA@BDpB ,INTERNALBjDDDpB(lLOCAL-FUNCTION-MAPDDBDDFRAME-NUMBERDpB INTERNAL-FEF-OFFSETSFDBDO0 Bjˀ FDB BjFA@pB> %%CH-OAR-OPENB= DB B DDDBDB+DpB(,LEXICAL-REF-MAPDB& DB" DCREAD-REGSDBDDBDBDBDB+ FDB|ZDED\@@|OQ B ˀ FDB B4 BE F@pB> lFRAME-SIZEBBDDBA DDFUNCTIONBE DBDDBz DÀVALUESDBDDBDÀBOXEDDBE8@@A@|Z#EAE@E|UzEOk B; ˀ F BrF@BDB BrDFDDB" DDBDDÀFRAMEDBDB+ FDBDO Brˀ FDB BrFA@B9 B= BBDDBA DBDFBy DBDDÀIGNOREDB|ZD|@| @||UO Br ˀ FBs@B-BwBB3BDDBDBuDB D O Bsˀ FBx@B-BBBB"BDDBDBuDB D D O Bxˀ FBo@B-BbBB3BDDBDBuDB D O BoˀS.F5K-WRITE-DATATYPE-RAMF@BBBBQBXBZBBBFFAFFB"FB3DDBDDADDRESSDBDBDDÁRIGHT-DATATYPEDRIGHT-BOXEDDÁLEFT-DATATYPEDCLEFT-BOXEDDCIREG-BITSDB DED||EZ@}EZA}EZBDEZCDEZD D |C3D DZBE||A3D DZ@E|DEDDZDEDDZO B ˀL,F1K-READ-DATATYPE-RAMFA@B-B[BBBQBXBZBFAFBFFB3BDDBDBuDBDDB DBDDB DB DB DB DB DB|EZ@}EZA}EZBDEZCDEZD D |C3D DZBE||A3D DZ@E|DED DZ DD@͚O B ˀ  F DUMP-CACHES@B,too badDDBO B 1DpBW,FASL-RECORD-FILE-MACROS-EXPANDEDDB:DDBuDBJDBoaDBeDB!eDB(EDBe|DB DBv--VDBmDBl=ODBk,DBj_DB,o\DB++FDBFDB*DBtDBg-DBhli