EXPORT PRIMITIVES QUOTE PRIMITIVES KBUG-STREAM-INITIALIZEK2 KBUG-STREAM-PEEK-BYTEK2 KBUG-STREAM-PEEK-CHARACTERK2 KBUG-STREAM-READ-BYTEK2 KBUG-STREAM-READ-CHARACTERK2 KBUG-STREAM-WRITE-BYTEK2 KBUG-STREAM-WRITE-CHARACTERK2 LDBK2 LDBK2   NO-CASE-ERRORLISP-INTERNALS  LDB-HARD-CASEK2 TYPEPLISP-INTERNALSFs!@A @A B@0CBPC `D A@@BD@@A@A E#FjE@@ @@AF OR PRIMITIVES  BYTE-SPECK2 BYTE PRIMITIVES  ETYPECASE PRIMITIVES  BYTE-SPECK2 KBUG-INPUT-STREAM?K2 KBUG-INPUT-STREAM?K2 LDBK2 KBUG-GET-COMM-WORDK2!C(@@BpE0@A @AhDjD KBUG-OUTPUT-STREAM?K2 KBUG-OUTPUT-STREAM?K2 LDBK2 KBUG-GET-COMM-WORDK2!C(@@Bp E0@A @AhDjD KBUG-STREAM-POINTER-1+K2 KBUG-STREAM-POINTER-1+K2 KBUG-GET-COMM-WORDK2 KBUG-GET-COMM-WORDK2 0 "$xp y@B@D0@A@A0 }AF$D KBUG-STREAM-ADVANCE-IN-POINTERK2 KBUG-STREAM-ADVANCE-IN-POINTERK2 KBUG-SET-COMM-WORDK2 KBUG-STREAM-POINTER-1+K2 KBUG-GET-COMM-WORDK2 pyAB(!B p}#F KBUG-STREAM-ADVANCE-OUT-POINTERK2 KBUG-STREAM-ADVANCE-OUT-POINTERK2 KBUG-SET-COMM-WORDK2 KBUG-STREAM-POINTER-1+K2 KBUG-GET-COMM-WORDK20 yAB(!B0 }#F INITIALIZE-KBUG-STREAMK2 INITIALIZE-KBUG-STREAMK2 KBUG-SET-COMM-WORDK2 KBUG-GET-COMM-WORDK2 KBUG-SET-COMM-WORDK2 KBUG-SET-COMM-WORDK20 y$Bp y&B C D(@ E)F KBUG-STREAM-NEEDS-INPUTK2 KBUG-STREAM-NEEDS-INPUTK2 KBUG-GET-COMM-WORDK2 py@Bp#0@A@AjD KBUG-STREAM-NEEDS-OUTPUTK2 KBUG-STREAM-NEEDS-OUTPUTK2 KBUG-GET-COMM-WORDK20 y@Bp#0@A@AjD KBUG-STREAM-PEEK-BYTEK2 KBUG-STREAM-PEEK-BYTEK2 %KBUG-STREAM-PEEK-BYTEK2 KBUG-GET-COMM-WORDK2 ILLOP-FUNCTIONTRAP KBUG-INPUT-STREAM?K2 CD@@A @AGA@B0 yAB(!F %KBUG-STREAM-PEEK-BYTEK2 %KBUG-STREAM-PEEK-BYTEK2 KBUG-STREAM-NEEDS-INPUTK2 A"B@@ #`8@ATD@ aD KBUG-STREAM-PEEK-CHARACTERK2 KBUG-STREAM-PEEK-CHARACTERK2 KBUG-STREAM-PEEK-BYTEK2 C@@F#ED KBUG-STREAM-READ-BYTEK2 KBUG-STREAM-READ-BYTEK2 KBUG-STREAM-ADVANCE-OUT-POINTERK2 KBUG-STREAM-PEEK-BYTEK2!C C@A"D KBUG-STREAM-READ-CHARACTERK2 KBUG-STREAM-READ-CHARACTERK2 KBUG-STREAM-READ-BYTEK2 ILLOP-FUNCTIONTRAP KBUG-INPUT-STREAM?K2 CD@@A @AHA@B C@@F#ED KBUG-STREAM-WRITE-CHARACTERK2 KBUG-STREAM-WRITE-CHARACTERK2 KBUG-SET-COMM-WORDK2 KBUG-STREAM-POINTER-1+K2 KBUG-SET-COMM-WORDK2 KBUG-STREAM-NEEDS-OUTPUTK2 KBUG-STREAM-POINTER-1+K2 KBUG-GET-COMM-WORDK2 ILLOP-FUNCTIONTRAP KBUG-OUTPUT-STREAM?K2 CD@@A @AIA@B py@ B A) B A&B(A"B A( B p}%F KBUG-STREAM-WRITE-BYTEK2 KBUG-STREAM-WRITE-BYTEK2 KBUG-SET-COMM-WORDK2 KBUG-STREAM-POINTER-1+K2 KBUG-SET-COMM-WORDK2 KBUG-STREAM-NEEDS-OUTPUTK2 KBUG-STREAM-POINTER-1+K2 KBUG-GET-COMM-WORDK2 ILLOP-FUNCTIONTRAP KBUG-OUTPUT-STREAM?K2 CD@@A @AIA@B py@ B A) B A&B(A"B A( B p}%F KBUG-STREAM-INITIALIZEK2 KBUG-STREAM-INITIALIZEK2 KBUG-SET-COMM-WORDK2 KBUG-SET-COMM-WORDK2 KBUG-SET-COMM-WORDK2 KBUG-SET-COMM-WORDK2 KBUG-SET-COMM-WORDK2 0 y$Bp y&B py$B0 y$B E#F