KBUG-BASE-ADDRK2 KBUG-COMMAND-ADDRK2 + PRIMITIVES KBUG-BASE-ADDRK2 KBUG-STATUS-ADDRK2 + PRIMITIVES KBUG-BASE-ADDRK2 KBUG-PARAMETER-ADDRK2 + PRIMITIVES KBUG-BASE-ADDRK2 KBUG-INTERNAL-STORAGE-ADDRK2 + PRIMITIVES KBUG-BASE-ADDRK2   KBUG-PC-ADDRK2 + PRIMITIVES KBUG-BASE-ADDRK2  KBUG-FLAG-ADDRK2 + PRIMITIVES KBUG-BASE-ADDRK2  KBUG-LEFT-ADDRK2 + PRIMITIVES KBUG-BASE-ADDRK2  KBUG-RIGHT-ADDRK2 + PRIMITIVES KBUG-BASE-ADDRK2  KBUG-ALU-STATUS-ADDRK2 + PRIMITIVES KBUG-BASE-ADDRK2 KBUG-LEFT-BOXED-ADDRK2 + PRIMITIVES KBUG-BASE-ADDRK2 KBUG-RIGHT-BOXED-ADDRK2 + PRIMITIVES KBUG-BASE-ADDRK2  KBUG-VMA-ADDRK2 + PRIMITIVES KBUG-BASE-ADDRK2 KBUG-VMA-BOXED-ADDRK2 + PRIMITIVES KBUG-BASE-ADDRK2  KBUG-MD-ADDRK2 + PRIMITIVES KBUG-BASE-ADDRK2 KBUG-MD-BOXED-ADDRK2 + PRIMITIVES KBUG-BASE-ADDRK2 KBUG-MSTAT-ADDRK2 + PRIMITIVES KBUG-BASE-ADDRK2 KBUG-DATA-TRANSFER-AREA-ADDRK2 + PRIMITIVES KBUG-BASE-ADDRK2 KBUG-K-OUTPUT-STREAMK2p KBUG-K-INPUT-FASL-STREAMK2u KBUG-K-INPUT-CHARACTER-STREAMK2z KBUG-STREAM-BUFFER-SIZEK2* KBUG-OUTPUT-STREAM-BASEK2 KBUG-INPUT-FASL-STREAM-BASEK2 + PRIMITIVES KBUG-OUTPUT-STREAM-BASEK2 KBUG-STREAM-BUFFER-SIZEK2  KBUG-INPUT-CHARACTER-STREAM-BASEK2 + PRIMITIVES KBUG-INPUT-FASL-STREAM-BASEK2 KBUG-STREAM-BUFFER-SIZEK2 %%KBUG-TRACE-FLAGK2 BYTE PRIMITIVES %%KBUG-ENTERED-FLAGK2 BYTE PRIMITIVES %%KBUG-ERROR-FLAGK2 BYTE PRIMITIVES %%KBUG-WARM-BOOT-COMPLETE-FLAGK2 BYTE PRIMITIVES %%COMMAND-BYTEK2 BYTE PRIMITIVES KBUG-COMMAND-IDLEK2 KBUG-COMMAND-CONTINUEK2  KBUG-COMMAND-READ-REGISTER-FRAMEK2 KBUG-COMMAND-READ-CALL-STACKK2 KBUG-COMMAND-READ-MAPK2 KBUG-COMMAND-READ-PCK2 KBUG-COMMAND-WRITE-PCK2 KBUG-COMMAND-WRITE-STEP-MODEK2 KBUG-COMMAND-READ-MEMORYK2 KBUG-COMMAND-WRITE-MEMORYK2  KBUG-COMMAND-MAKE-STRINGK2  KBUG-COMMAND-INTERNK2  KBUG-COMMAND-LOAD-COLD-INFOK2  KBUG-COMMAND-FASL-STREAMK2  KBUG-COMMAND-PC-TO-FUNCTIONK2 KBUG-COMMAND-READ-MISCK2 %%MISC-COMMAND-BYTEK2 BYTE PRIMITIVES KBUG-COMMAND-WRITE-MISCK2 !KBUG-COMMAND-WRITE-REGISTER-FRAMEK2 KBUG-COMMAND-LOAD-FBINK2 KBUG-COMMAND-LAST-COMMANDK2 KBUG-STATUS-BUSYK2 KBUG-STATUS-DONEK2 KBUG-STATUS-BAD-COMMANDK2 KBUG-STATUS-BAD-PARAMETERK2 KBUG-STATUS-BAD-ADDRESSK2 KBUG-STREAM-FLAGSK2 KBUG-STREAM-BASEK2GOffset in communication area of the first word of this stream's buffer. KBUG-STREAM-ENDK2TOne more than the offset in the communication area of the last word stream's buffer. KBUG-STREAM-IN-POINTERK2GLocation in buffer where next character to be written to stream is put. KBUG-STREAM-OUT-POINTERK2ALocation in buffer from which next character from stream is read. %%KBUG-STREAM-FLAGS-DIRECTIONK2 BYTE PRIMITIVES "$$KBUG-STREAM-FLAGS-DIRECTION-TO-KK2 $$$KBUG-STREAM-FLAGS-DIRECTION-FROM-KK2 KBUG-GET-COMM-WORDK2 KBUG-GET-COMM-WORDK2   ERRORLISP-INTERNALS@!0@A @AB@@B0@A @A@@ !`8@ATD@ aDE!F 'location not in kbug communication area KBUG-SET-COMM-WORDK2 KBUG-SET-COMM-WORDK2   ERRORLISP-INTERNALS@!0@A @AB@@B0@A @A"T@B@ BX8@AjDE!F 'location not in kbug communication area DEFINE-KBUG-STREAM-SLOTK2 DEFINE-KBUG-STREAM-SLOTK2? ;; < <> MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS:  XR-BQ-LISTSYSTEM-INTERNALS8  XR-BQ-LISTSYSTEM-INTERNALS5  XR-BQ-LISTSYSTEM-INTERNALS1  XR-BQ-LIST*SYSTEM-INTERNALS-  XR-BQ-LISTSYSTEM-INTERNALS)  XR-BQ-LISTSYSTEM-INTERNALS'  XR-BQ-LISTSYSTEM-INTERNALS&  XR-BQ-LISTSYSTEM-INTERNALS"  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS CARCONS CDRCONS CDRCONS CDRCONS CDRCONS CDRCONS CDRCONS CARCONS CDRCONS CDRCONS CARCONS CDRCONS LENGTHARRAY LENGTHARRAY@j"@ C@q0@A<@A C@s0@A @A<@A C(@ B C(@B(@ B C(@B(@BD@@A;@A C(@B(@B(A B'C(@AB(@@@@B(@@AB(@(@@AB('C(@AB(@@@@B(@@@AB(@$@@@BA(@%B@AF(&@  Af@pB @A 9 PROGN PRIMITIVES6 DEFSETF PRIMITIVES4 STREAMK2 VALUE PRIMITIVES2 DEFMACRO PRIMITIVES0 VALUE PRIMITIVES/ QUOTE PRIMITIVES KBUG-SET-COMM-WORDK2.  XR-BQ-LISTSYSTEM-INTERNALS, STREAMK2+ QUOTE PRIMITIVES + PRIMITIVES*  XR-BQ-LIST*SYSTEM-INTERNALS( QUOTE PRIMITIVES% STREAMK2# DEFMACRO PRIMITIVES! QUOTE PRIMITIVES KBUG-GET-COMM-WORDK2  XR-BQ-LISTSYSTEM-INTERNALS STREAMK2 QUOTE PRIMITIVES + PRIMITIVES  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES KBUG-STREAM-FLAGSK2 KBUG-STREAM-FLAGSK2   MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LIST*SYSTEM-INTERNALS CARCONS CDRCONS LENGTHARRAY LENGTHARRAYj"@ C@g0@A@A C@g0@A @A@A C(@ BA$@@AB(@AF Ab@bB @A  KBUG-GET-COMM-WORDK2 KBUG-STREAM-FLAGSK2 + PRIMITIVES SET-KBUG-STREAM-FLAGSK2 SET-KBUG-STREAM-FLAGSK2    MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LIST*SYSTEM-INTERNALS CARCONS CDRCONS CDRCONS CARCONS CDRCONS LENGTHARRAY LENGTHARRAYj"@ C@q0@A@A C@q0@A @A@A C(A B C(@B(@ BA&@@AB(@%F Af@fB @A  KBUG-SET-COMM-WORDK2 KBUG-STREAM-FLAGSK2 + PRIMITIVES SETQ PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF CONSCONS QUOTE PRIMITIVES KBUG-STREAM-FLAGSK2 LAMBDA PRIMITIVES &REST PRIMITIVES ARGS14K2 LET* PRIMITIVES SINGLE-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS QUOTE PRIMITIVES  REST-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS ARGS14K2 STOREVARSETF GENSYMLISP-INTERNALS TEMPVARSSETF APPEND PRIMITIVES SINGLE-TEMPVARSSETF  REST-TEMPVARSSETF VALUES PRIMITIVES TEMPVARSSETF APPEND PRIMITIVES LISTLISP-INTERNALS  COPY-LISTLISP-INTERNALS ARGS14K2 LISTLISP-INTERNALS STOREVARSETF LET PRIMITIVES VALUE15K2 STOREVARSETF ARGS14K2  REST-TEMPVARSSETF  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES SET-KBUG-STREAM-FLAGSK2  XR-BQ-APPENDSYSTEM-INTERNALS ARGS14K2  XR-BQ-LISTSYSTEM-INTERNALS VALUE15K2  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES KBUG-STREAM-FLAGSK2 TEMPVARSSETF IFLISP BOUNDPSYMBOL QUOTE PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF *GRODY-SETF-MACRO-TABLE*SETF QUOTE PRIMITIVES KBUG-STREAM-FLAGSK2 KBUG-STREAM-BASEK2 KBUG-STREAM-BASEK2   MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LIST*SYSTEM-INTERNALS CARCONS CDRCONS LENGTHARRAY LENGTHARRAYj"@ C@g0@A@A C@g0@A @A@A C(@ BA$@@AB(@AF Ab@bB @A  KBUG-GET-COMM-WORDK2 KBUG-STREAM-BASEK2 + PRIMITIVES SET-KBUG-STREAM-BASEK2 SET-KBUG-STREAM-BASEK2    MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LIST*SYSTEM-INTERNALS CARCONS CDRCONS CDRCONS CARCONS CDRCONS LENGTHARRAY LENGTHARRAYj"@ C@q0@A@A C@q0@A @A@A C(A B C(@B(@ BA&@@AB(@%F Af@fB @A  KBUG-SET-COMM-WORDK2 KBUG-STREAM-BASEK2 + PRIMITIVES SETQ PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF CONSCONS QUOTE PRIMITIVES KBUG-STREAM-BASEK2 LAMBDA PRIMITIVES &REST PRIMITIVES ARGS16K2 LET* PRIMITIVES SINGLE-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS QUOTE PRIMITIVES  REST-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS ARGS16K2 STOREVARSETF GENSYMLISP-INTERNALS TEMPVARSSETF APPEND PRIMITIVES SINGLE-TEMPVARSSETF  REST-TEMPVARSSETF VALUES PRIMITIVES TEMPVARSSETF APPEND PRIMITIVES LISTLISP-INTERNALS  COPY-LISTLISP-INTERNALS ARGS16K2 LISTLISP-INTERNALS STOREVARSETF LET PRIMITIVES VALUE17K2 STOREVARSETF ARGS16K2  REST-TEMPVARSSETF  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES SET-KBUG-STREAM-BASEK2  XR-BQ-APPENDSYSTEM-INTERNALS ARGS16K2  XR-BQ-LISTSYSTEM-INTERNALS VALUE17K2  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES KBUG-STREAM-BASEK2 TEMPVARSSETF IFLISP BOUNDPSYMBOL QUOTE PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF *GRODY-SETF-MACRO-TABLE*SETF QUOTE PRIMITIVES KBUG-STREAM-BASEK2 KBUG-STREAM-ENDK2 KBUG-STREAM-ENDK2   MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LIST*SYSTEM-INTERNALS CARCONS CDRCONS LENGTHARRAY LENGTHARRAYj"@ C@g0@A@A C@g0@A @A@A C(@ BA$@@AB(@AF Ab@bB @A  KBUG-GET-COMM-WORDK2 KBUG-STREAM-ENDK2 + PRIMITIVES SET-KBUG-STREAM-ENDK2 SET-KBUG-STREAM-ENDK2    MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LIST*SYSTEM-INTERNALS CARCONS CDRCONS CDRCONS CARCONS CDRCONS LENGTHARRAY LENGTHARRAYj"@ C@q0@A@A C@q0@A @A@A C(A B C(@B(@ BA&@@AB(@%F Af@fB @A  KBUG-SET-COMM-WORDK2 KBUG-STREAM-ENDK2 + PRIMITIVES SETQ PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF CONSCONS QUOTE PRIMITIVES KBUG-STREAM-ENDK2 LAMBDA PRIMITIVES &REST PRIMITIVES ARGS18K2 LET* PRIMITIVES SINGLE-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS QUOTE PRIMITIVES  REST-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS ARGS18K2 STOREVARSETF GENSYMLISP-INTERNALS TEMPVARSSETF APPEND PRIMITIVES SINGLE-TEMPVARSSETF  REST-TEMPVARSSETF VALUES PRIMITIVES TEMPVARSSETF APPEND PRIMITIVES LISTLISP-INTERNALS  COPY-LISTLISP-INTERNALS ARGS18K2 LISTLISP-INTERNALS STOREVARSETF LET PRIMITIVES VALUE19K2 STOREVARSETF ARGS18K2  REST-TEMPVARSSETF  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES SET-KBUG-STREAM-ENDK2  XR-BQ-APPENDSYSTEM-INTERNALS ARGS18K2  XR-BQ-LISTSYSTEM-INTERNALS VALUE19K2  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES KBUG-STREAM-ENDK2 TEMPVARSSETF IFLISP BOUNDPSYMBOL QUOTE PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF *GRODY-SETF-MACRO-TABLE*SETF QUOTE PRIMITIVES KBUG-STREAM-ENDK2 KBUG-STREAM-IN-POINTERK2 KBUG-STREAM-IN-POINTERK2   MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LIST*SYSTEM-INTERNALS CARCONS CDRCONS LENGTHARRAY LENGTHARRAYj"@ C@g0@A@A C@g0@A @A@A C(@ BA$@@AB(@AF Ab@bB @A  KBUG-GET-COMM-WORDK2 KBUG-STREAM-IN-POINTERK2 + PRIMITIVES SET-KBUG-STREAM-IN-POINTERK2 SET-KBUG-STREAM-IN-POINTERK2    MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LIST*SYSTEM-INTERNALS CARCONS CDRCONS CDRCONS CARCONS CDRCONS LENGTHARRAY LENGTHARRAYj"@ C@q0@A@A C@q0@A @A@A C(A B C(@B(@ BA&@@AB(@%F Af@fB @A  KBUG-SET-COMM-WORDK2 KBUG-STREAM-IN-POINTERK2 + PRIMITIVES SETQ PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF CONSCONS QUOTE PRIMITIVES KBUG-STREAM-IN-POINTERK2 LAMBDA PRIMITIVES &REST PRIMITIVES ARGS20K2 LET* PRIMITIVES SINGLE-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS QUOTE PRIMITIVES  REST-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS ARGS20K2 STOREVARSETF GENSYMLISP-INTERNALS TEMPVARSSETF APPEND PRIMITIVES SINGLE-TEMPVARSSETF  REST-TEMPVARSSETF VALUES PRIMITIVES TEMPVARSSETF APPEND PRIMITIVES LISTLISP-INTERNALS  COPY-LISTLISP-INTERNALS ARGS20K2 LISTLISP-INTERNALS STOREVARSETF LET PRIMITIVES VALUE21K2 STOREVARSETF ARGS20K2  REST-TEMPVARSSETF  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES SET-KBUG-STREAM-IN-POINTERK2  XR-BQ-APPENDSYSTEM-INTERNALS ARGS20K2  XR-BQ-LISTSYSTEM-INTERNALS VALUE21K2  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES KBUG-STREAM-IN-POINTERK2 TEMPVARSSETF IFLISP BOUNDPSYMBOL QUOTE PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF *GRODY-SETF-MACRO-TABLE*SETF QUOTE PRIMITIVES KBUG-STREAM-IN-POINTERK2 KBUG-STREAM-OUT-POINTERK2 KBUG-STREAM-OUT-POINTERK2   MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LIST*SYSTEM-INTERNALS CARCONS CDRCONS LENGTHARRAY LENGTHARRAYj"@ C@g0@A@A C@g0@A @A@A C(@ BA$@@AB(@AF Ab@bB @A  KBUG-GET-COMM-WORDK2 KBUG-STREAM-OUT-POINTERK2 + PRIMITIVES SET-KBUG-STREAM-OUT-POINTERK2 SET-KBUG-STREAM-OUT-POINTERK2    MACRO-REPORT-ARGS-ERRORSYSTEM-INTERNALS  XR-BQ-LISTSYSTEM-INTERNALS  XR-BQ-LIST*SYSTEM-INTERNALS CARCONS CDRCONS CDRCONS CARCONS CDRCONS LENGTHARRAY LENGTHARRAYj"@ C@q0@A@A C@q0@A @A@A C(A B C(@B(@ BA&@@AB(@%F Af@fB @A  KBUG-SET-COMM-WORDK2 KBUG-STREAM-OUT-POINTERK2 + PRIMITIVES SETQ PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF CONSCONS QUOTE PRIMITIVES KBUG-STREAM-OUT-POINTERK2 LAMBDA PRIMITIVES &REST PRIMITIVES ARGS22K2 LET* PRIMITIVES SINGLE-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS QUOTE PRIMITIVES  REST-TEMPVARSSETF MAPCARLISP-INTERNALS FUNCTION PRIMITIVES LAMBDA PRIMITIVES IGNORE PRIMITIVES GENTEMPLISP-INTERNALS ARGS22K2 STOREVARSETF GENSYMLISP-INTERNALS TEMPVARSSETF APPEND PRIMITIVES SINGLE-TEMPVARSSETF  REST-TEMPVARSSETF VALUES PRIMITIVES TEMPVARSSETF APPEND PRIMITIVES LISTLISP-INTERNALS  COPY-LISTLISP-INTERNALS ARGS22K2 LISTLISP-INTERNALS STOREVARSETF LET PRIMITIVES VALUE23K2 STOREVARSETF ARGS22K2  REST-TEMPVARSSETF  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES SET-KBUG-STREAM-OUT-POINTERK2  XR-BQ-APPENDSYSTEM-INTERNALS ARGS22K2  XR-BQ-LISTSYSTEM-INTERNALS VALUE23K2  XR-BQ-LIST*SYSTEM-INTERNALS QUOTE PRIMITIVES KBUG-STREAM-OUT-POINTERK2 TEMPVARSSETF IFLISP BOUNDPSYMBOL QUOTE PRIMITIVES *GRODY-SETF-MACRO-TABLE*SETF *GRODY-SETF-MACRO-TABLE*SETF QUOTE PRIMITIVES KBUG-STREAM-OUT-POINTERK2