(progn (setq foo '
(LISP-INTERNALS:DO*-NAMED LISP-INTERNALS:DO-NAMED LISP-INTERNALS:INTERLEAVE LISP-INTERNALS:EXPAND-DO-MACRO LISP-INTERNALS:SEPARATE-DO-BINDINGS LISP-INTERNALS:READ-PRINT PRIMITIVES:NOT LISP-INTERNALS:MAKE-GRINDER LISP-INTERNALS:GRIND-ARRAY LISP-INTERNALS:GRIND-VECTOR LISP-INTERNALS:GRIND-LIST LISP-INTERNALS:CONSTANT LISP-INTERNALS:VAR-DOCUMENTATION USER:PARSE-AUX-PARAMETER USER:PARSE-KEY-PARAMETER LISP-INTERNALS:MAKE-LET-BINDINGS-MAKE-BINDING-OR-RECURSE LISP-INTERNALS:MAKE-LET-BINDINGS-DO-OPTIONAL-VARIABLE LISP-INTERNALS:REQUIRE-AMPLE-MACRO-ARGUMENTS LISP-INTERNALS:MAKE-LET-BINDINGS-DUMMY-BIND LISP-INTERNALS:MAKE-LET-BINDINGS-DO-WHOLE-ENV-BINDINGS-OPTIONALS LISP-INTERNALS:MAKE-LET-BINDINGS-DO-KEY-PARAMETER LISP-INTERNALS:MAKE-LET-BINDINGS-DO-AUX-PARAMETER LISP-INTERNALS:*MOBY-PARSE-REQUIRED* LISP-INTERNALS:*MOBY-PARSE-OPTIONAL* LISP-INTERNALS:*MOBY-PARSE-REST* LISP-INTERNALS:*MOBY-PARSE-KEY* LISP-INTERNALS:*MOBY-PARSE-ALLOW-OTHER-KEYS* LISP-INTERNALS:*MOBY-PARSE-AUX* LISP-INTERNALS:*MOBY-PARSE-BODY* LISP-INTERNALS:*MOBY-PARSE-WHOLE* LISP-INTERNALS:*MOBY-PARSE-ENVIRONMENT* USER:MOBY-PARSE-LAMBDA-LIST LISP-INTERNALS:MAKE-LET-BINDINGS-PARSE LISP-INTERNALS:MAKE-LET-BINDINGS-FOR-NESTED-LAMBDA-LIST LISP-INTERNALS:MACROFORM LISP-INTERNALS:MACROENV LISP-INTERNALS:DOCUMENTATION SYSTEM-INTERNALS:GOBBLE-DECLARATIONS LISP-INTERNALS:MAKE-DEFMACRO-LET-BINDINGS LISP-INTERNALS:NEW-EXPAND-DEFMACRO LISP-INTERNALS:MACRO-NAME LISP-INTERNALS:MACRO-DEFINITION LISP-INTERNALS:NEW-DEFMACRO LISP-INTERNALS:INTERPRETER-NAMED-LAMBDA LISP-INTERNALS:NAMED-LAMBDA LISP-INTERNALS:FOO-APPLYHOOK LISP-INTERNALS:FOO-EVALHOOK LISP-INTERNALS:RELINQUISH-TO-APPLYHOOK LISP-INTERNALS:INTERMEDIATE-EXPRESSION-PREPROCESSOR-ENV LISP-INTERNALS:PREPROCESS LISP-INTERNALS:INTERMEDIATE-EXPRESSION-ORIGINAL-FORM LISP-INTERNALS:DESCRIBE-PP LISP-INTERNALS:DESCRIBE-FRAME LISP-INTERNALS:IMPLEMENTATION-SPECIAL-FORM-P LISP-INTERNALS:SPECIAL-DECL-SPEC-P LISP-INTERNALS:SPECIAL-VARS-IN-DECL-SPEC LISP-INTERNALS:EXTRACT-SPECIAL-VARIABLES LISP-INTERNALS:GOBBLE-DECLARATIONS LISP-INTERNALS:EXTRACT-SPECIAL-VARIABLE-LIST LISP-INTERNALS:LAMBDA-LIST-KEYWORD-P LISP-INTERNALS:CERROR LISP-INTERNALS:*ALLOW-LOSING-&-SYMBOLS?* USER:PARSE-OPTIONAL-PARAMETER LISP-INTERNALS:EXECUTE-CLOSURE-BODY-CODE LISP-INTERNALS:BIND-OPTIONAL-PARAMETERS LISP-INTERNALS:BIND-REST-PARAMETER LISP-INTERNALS:BIND-KEY-PARAMETERS LISP-INTERNALS:BIND-AUX-PARAMETERS LISP-INTERNALS:LOOKS-LIKE-LAMBDA-LIST-KEYWORD? LISP-INTERNALS:BIND-VARIABLE LISP-INTERNALS:BIND-REQUIRED-PARAMETERS LISP-INTERNALS:REBIND-GOTAGS LISP-INTERNALS:BIND-GOTAGS LISP-INTERNALS:EVAL-SUBPROBLEM LISP-INTERNALS:FUNCTIONP LISP-INTERNALS:EVAL-MULTIPLE-VALUE-CALL-ARGS LISP-INTERNALS:EVAL-FUNCTION-SYMBOL LISP-INTERNALS:EVAL-FUNCTION-LAMBDA LISP-INTERNALS:NAMED-LAMBDA-EXPRESSION-P LISP-INTERNALS:EVAL-FUNCTION-NAMED-LAMBDA LISP-INTERNALS:EXPAND-DEFMACRO LISP-INTERNALS:FLET-BINDING-NAME LISP-INTERNALS:FLET-BINDING-LAMBDA-LIST LISP-INTERNALS:FLET-BINDING-FUNCTION-BODY KEYWORD:LOAD KEYWORD:COMPILE KEYWORD:EVAL LISP-INTERNALS:ESL-LOOP LISP-INTERNALS:REQUIRE-BINDABLE-SYMBOL LISP-INTERNALS:LET-BINDING-VALUE LISP-INTERNALS:LET-BINDING-VARIABLE LISP-INTERNALS:EVAL-SEQUENTIAL-LET LISP-INTERNALS:EXAMINE-DECLARATIONS LISP-INTERNALS:EVAL-PARALLEL-LET LISP-INTERNALS:BLOCK- LISP-INTERNALS:REQUIRE-N-ARGUMENTS LISP-INTERNALS:EVAL-BLOCK LISP-INTERNALS:EVAL-CATCH LISP-INTERNALS:EVAL-COMPILER-LET LISP-INTERNALS:EVAL-DECLARE LISP-INTERNALS:EVAL-EVAL-WHEN LISP-INTERNALS:EVAL-FLET LISP-INTERNALS:EVAL-FUNCTION LISP-INTERNALS:EVAL-GO LISP-INTERNALS:EVAL-IF LISP-INTERNALS:EVAL-LABELS LISP-INTERNALS:EVAL-LET LISP-INTERNALS:EVAL-LET* LISP-INTERNALS:EVAL-MACROLET LISP-INTERNALS:EVAL-MULTIPLE-VALUE-CALL LISP-INTERNALS:EVAL-MULTIPLE-VALUE-PROG1 LISP-INTERNALS:EVAL-PROGN LISP-INTERNALS:EVAL-PROGV LISP-INTERNALS:EVAL-QUOTE LISP-INTERNALS:EVAL-RETURN-FROM LISP-INTERNALS:EVAL-SETQ LISP-INTERNALS:EVAL-TAGBODY LISP-INTERNALS:EVAL-THE LISP-INTERNALS:EVAL-THROW LISP-INTERNALS:EVAL-UNWIND-PROTECT LISP-INTERNALS:EVAL-BOGUS-SPECIAL-FORM KEYWORD:FUNCTION KEYWORD:MACRO LISP-INTERNALS:OTHERWISE LISP-INTERNALS:EVAL-NAMED-FUNCTION-APPLICATION-OR-MACRO-LEXICALLY KEYWORD:SPECIAL LISP-INTERNALS:PROCLAIMED-SPECIAL-P LISP-INTERNALS:SAFE-SYMBOL-VALUE LISP-INTERNALS:EVAL-FREE-VARIABLE LISP-INTERNALS:KEYWORDP LISP-INTERNALS:EVAL-SEQUENCE PRIMITIVES:IF LISP-INTERNALS:RELINQUISH-TO-EVALHOOK LISP-INTERNALS:SELF-EVALUATING? LISP-INTERNALS:EVAL-VARIABLE LISP-INTERNALS:COMMON-LISP-SPECIAL-FORM-P LISP-INTERNALS:EVAL-SPECIAL-FORM LISP-INTERNALS:EVAL-NAMED-FUNCTION-APPLICATION-OR-MACRO LISP-INTERNALS:LAMBDA-EXPRESSION-P LISP-INTERNALS:EVAL-LAMBDA-EXPRESSION-APPLICATION LISP-INTERNALS:UNWIND-PROTECT-CLEANUP-FORMS LISP-INTERNALS:UNWIND-PROTECT-EXPR LISP-INTERNALS:UNWIND-PROTECT-PROTECTED-FORM LISP-INTERNALS:THROW-RESULT LISP-INTERNALS:THROW-EXPR LISP-INTERNALS:THROW-TAG LISP-INTERNALS:THE-FORM LISP-INTERNALS:THE-EXPR LISP-INTERNALS:THE-VALUE-TYPE LISP-INTERNALS:TAGBODY-EXPR LISP-INTERNALS:TAGBODY-BODY LISP-INTERNALS:SETQ-EXPR LISP-INTERNALS:SETQ-ARGS LISP-INTERNALS:RETURN-FROM-RESULT LISP-INTERNALS:RETURN-FROM-EXPR LISP-INTERNALS:RETURN-FROM-NAME LISP-INTERNALS:QUOTE-EXPR LISP-INTERNALS:QUOTE-OBJECT LISP-INTERNALS:PROGV-FORMS LISP-INTERNALS:PROGV-VALUES LISP-INTERNALS:PROGV-EXPR LISP-INTERNALS:PROGV-SYMBOLS LISP-INTERNALS:PROGN-EXPR LISP-INTERNALS:PROGN-FORMS LISP-INTERNALS:MULTIPLE-VALUE-PROG1-OTHER-FORMS LISP-INTERNALS:MULTIPLE-VALUE-PROG1-EXPR LISP-INTERNALS:MULTIPLE-VALUE-PROG1-FIRST-FORM LISP-INTERNALS:MULTIPLE-VALUE-CALL-FORMS LISP-INTERNALS:MULTIPLE-VALUE-CALL-EXPR LISP-INTERNALS:MULTIPLE-VALUE-CALL-FUNCTION LISP-INTERNALS:LET-BODY LISP-INTERNALS:LET-EXPR LISP-INTERNALS:LET-BINDINGS LISP-INTERNALS:IF-ALTERNATE LISP-INTERNALS:IF-CONSEQUENT LISP-INTERNALS:IF-EXPR LISP-INTERNALS:IF-PREDICATE LISP-INTERNALS:GO-EXPR LISP-INTERNALS:GO-GOTAG LISP-INTERNALS:FUNCTION-EXPR LISP-INTERNALS:FUNCTION-FN LISP-INTERNALS:EVAL-WHEN-FORMS LISP-INTERNALS:EVAL-WHEN-EXPR LISP-INTERNALS:EVAL-WHEN-SITUATION-LIST LISP-INTERNALS:CATCH-FORMS LISP-INTERNALS:CATCH-EXPR LISP-INTERNALS:CATCH-TAG LISP-INTERNALS:BLOCK-BODY LISP-INTERNALS:BLOCK-EXPR LISP-INTERNALS:BLOCK-NAME LISP-INTERNALS:INTERPRETER-CLOSURE-OPTIMIZED-BODY LISP-INTERNALS:INTERPRETER-CLOSURE-ENVIRONMENT LISP-INTERNALS:INTERPRETER-CLOSURE-BODY LISP-INTERNALS:INTERPRETER-CLOSURE-LAMBDA-LIST LISP-INTERNALS:INTERPRETER-CLOSURE-NAME KEYWORD:UNNAMED KEYWORD:UNOPTIMIZED LISP-INTERNALS:MAKE-INTERPRETER-CLOSURE LISP-INTERNALS:MAKE-I-CLOSURE SYSTEM:PRINTING-RANDOM-OBJECT LISP-INTERNALS:PRINT-NFRAME LISP-INTERNALS:LOOKUP-BINDING-IN-LIST LISP-INTERNALS:LOOKUP-BINDING-IN-ENVIRONMENT PRIMITIVES:FERROR LISP-INTERNALS:BIND-IN-FRAME KEYWORD:PLACEHOLDER LISP-INTERNALS:ADJOIN-JUNK-FRAME KEYWORD:GOTAG LISP-INTERNALS:ADJOIN-GOTAG-FRAME KEYWORD:BLOCK LISP-INTERNALS:ADJOIN-BLOCK-FRAME KEYWORD:FUNMAC LISP-INTERNALS:ADJOIN-FUNMAC-FRAME KEYWORD:VARIABLE LISP-INTERNALS:PARENT-ENV LISP-INTERNALS:ADJOIN-VARIABLE-FRAME LISP-INTERNALS:COPY-BINDING LISP-INTERNALS:BINDING-P NIL:STRUCT2839 LISP-INTERNALS:BINDING-IDENTIFIER NIL:STRUCT2840 LISP-INTERNALS:BINDING-TYPE NIL:STRUCT2841 LISP-INTERNALS:BINDING-VALUE LISP-INTERNALS:IDENTIFIER LISP-INTERNALS:MAKE-BINDING LISP-INTERNALS:BINDING LISP-INTERNALS:COPY-NFRAME LISP-INTERNALS:NFRAME-P NIL:FORM2835 LISP-INTERNALS:NFRAME-PARENT NIL:FORM2836 LISP-INTERNALS:NFRAME-TYPE NIL:FORM2837 LISP-INTERNALS:NFRAME-BINDINGS LISP-INTERNALS:BINDINGS LISP-INTERNALS:PARENT LISP-INTERNALS:MAKE-NFRAME LISP-INTERNALS:NFRAME LISP-INTERNALS:REP LISP-INTERNALS:MAKE-EMPTY-ENVIRONMENT LISP-INTERNALS:MAIN-EVAL LISP-INTERNALS:FOO-*MACROEXPAND-HOOK* LISP-INTERNALS:FOO-*APPLYHOOK* LISP-INTERNALS:FOO-*EVALHOOK* LISP-INTERNALS:*VANILLA-ALLOW-FREE-VARIABLES?* LISP-INTERNALS:*VANILLA-EVALHOOK-FIRST-POSITION-FUNCTIONS?* LISP-INTERNALS:BOGUS-COMPILER-FORM? LISP-INTERNALS:EXPORT-FORM? LISP-INTERNALS:DEFMACRO-FORM? LISP-INTERNALS:CONTAINS-BIG-NUMBER? LISP-INTERNALS:DEFUN-K LISP-INTERNALS:DEFVAR-K LISP-INTERNALS:DEFPARAMETER-K LISP-INTERNALS:DEFCONSTANT-K LISP-INTERNALS:HOT-BOOT KEYWORD:ZL LISP-INTERNALS:INSTALL-TOP-LEVEL-MACROS LISP-INTERNALS:CENSOR-AND-REVERSE-LIST LISP-INTERNALS:MAP-EVAL-ONTO-LIST LISP-INTERNALS:WARM-BOOT-COMPLETE LISP-INTERNALS:WARM-BOOT NEW-MATH:CONJGATE NEW-MATH:IMAGPART NEW-MATH:REALPART NEW-MATH:INTEGER-DECODE-FLOAT NEW-MATH:DECODE-FLOAT NEW-MATH:LCM NEW-MATH:GCD PRIMITIVES:EVAL-WHEN LISP-INTERNALS:LAMBDA-PARAMETERS-LIMIT LISP-INTERNALS:LAMBDA-LIST-KEYWORDS PRIMITIVES:&ENVIRONMENT PRIMITIVES:&BODY LISP-INTERNALS:&ALLOW-OTHER-KEYS PRIMITIVES:&AUX LISP-INTERNALS:/// LISP-INTERNALS:// LISP-INTERNALS:*** LISP-INTERNALS:** LISP-INTERNALS:+++ LISP-INTERNALS:++ LISP-INTERNALS:CONSTANTP LISP-INTERNALS:*APPLYHOOK* LISP-INTERNALS:*EVALHOOK* PRIMITIVES:EVAL LISP-INTERNALS:THE LISP-INTERNALS:DECLARATION LISP-INTERNALS:OPTIMIZE LISP-INTERNALS:NOTINLINE LISP-INTERNALS:INLINE LISP-INTERNALS:FTYPE LISP-INTERNALS:TYPE LISP-INTERNALS:SPECIAL PRIMITIVES:PROCLAIM LISP-INTERNALS:LOCALLY PRIMITIVES:DECLARE LISP-INTERNALS:*MACROEXPAND-HOOK* LISP-INTERNALS:MACROEXPAND-1 LISP-INTERNALS:MACROEXPAND LISP-INTERNALS:MACRO-FUNCTION PRIMITIVES:THROW PRIMITIVES:CATCH PRIMITIVES:MULTIPLE-VALUE-SETQ PRIMITIVES:MULTIPLE-VALUE-BIND LISP-INTERNALS:MULTIPLE-VALUE-PROG1 LISP-INTERNALS:MULTIPLE-VALUE-CALL LISP-INTERNALS:MULTIPLE-VALUE-LIMIT LISP-INTERNALS:MULTIPLE-VALUES-LIMIT PRIMITIVES:GO LISP-INTERNALS:PROG* PRIMITIVES:PROG PRIMITIVES:TAGBODY LISP-INTERNALS:MAPCON LISP-INTERNALS:MAPCAN LISP-INTERNALS:MAPL LISP-INTERNALS:MAPC LISP-INTERNALS:MAPLIST PRIMITIVES:DOTIMES PRIMITIVES:LOOP LISP-INTERNALS:TYPECASE PRIMITIVES:LABELS PRIMITIVES:FLET PRIMITIVES:COMPILER-LET LISP-INTERNALS:PROG2 LISP-INTERNALS:CALL-ARGUMENTS-LIMIT LISP-INTERNALS:GET-SETF-METHOD-MULTIPLE-VALUE LISP-INTERNALS:GET-SETF-METHOD PRIMITIVES:DEFINE-SETF-METHOD PRIMITIVES:DEFSETF PRIMITIVES:DEFINE-MODIFY-MACRO PRIMITIVES:DECF LISP-INTERNALS:ROTATEF LISP-INTERNALS:SHIFTF LISP-INTERNALS:PSETF PRIMITIVES:PSETQ LISP-INTERNALS:SPECIAL-FORM-P LISP-INTERNALS:YES-OR-NO-P LISP-INTERNALS:Y-OR-N-P LISP-INTERNALS:WRITE-BYTE LISP-INTERNALS:CLEAR-OUTPUT LISP-INTERNALS:FORCE-OUTPUT LISP-INTERNALS:FINISH-OUTPUT LISP-INTERNALS:FRESH-LINE LISP-INTERNALS:TERPRI LISP-INTERNALS:WRITE-STRING LISP-INTERNALS:WRITE-CHAR LISP-INTERNALS:PRINC-TO-STRING LISP-INTERNALS:PRIN1-TO-STRING LISP-INTERNALS:WRITE-TO-STRING LISP-INTERNALS:PRINC LISP-INTERNALS:PPRINT LISP-INTERNALS:PRINT LISP-INTERNALS:PRIN1 LISP-INTERNALS:READ-BYTE LISP-INTERNALS:PARSE-INTEGER LISP-INTERNALS:READ-FROM-STRING LISP-INTERNALS:CLEAR-INPUT LISP-INTERNALS:READ-CHAR-NO-HANG LISP-INTERNALS:LISTEN LISP-INTERNALS:PEEK-CHAR LISP-INTERNALS:UNREAD-CHAR LISP-INTERNALS:READ-CHAR LISP-INTERNALS:READ-LINE LISP-INTERNALS:READ-DELIMITED-LIST LISP-INTERNALS:READ-PRESERVING-WHITESPACE LISP-INTERNALS:*READ-DEFAULT-FLOAT-FORMAT* LISP-INTERNALS:READ LISP-INTERNALS:*PRINT-ARRAY* LISP-INTERNALS:*PRINT-LENGTH* LISP-INTERNALS:*PRINT-LEVEL* LISP-INTERNALS:*PRINT-GENSYM* LISP-INTERNALS:*PRINT-CASE* LISP-INTERNALS:*PRINT-RADIX* LISP-INTERNALS:*PRINT-BASE* LISP-INTERNALS:*PRINT-CIRCLE* LISP-INTERNALS:*PRINT-PRETTY* LISP-INTERNALS:*PRINT-ESCAPE* LISP-INTERNALS:CLOSE LISP-INTERNALS:STREAM-ELEMENT-TYPE LISP-INTERNALS:OUTPUT-STREAM-P LISP-INTERNALS:INPUT-STREAM-P LISP-INTERNALS:STREAMP LISP-INTERNALS:WITH-OUTPUT-TO-STREAM LISP-INTERNALS:WITH-INPUT-FROM-STREAM LISP-INTERNALS:WITH-OPEN-STREAM LISP-INTERNALS:GET-OUTPUT-STREAM-STRING LISP-INTERNALS:MAKE-STRING-OUTPUT-STREAM LISP-INTERNALS:MAKE-STRING-INPUT-STREAM LISP-INTERNALS:MAKE-ECHO-STREAM LISP-INTERNALS:MAKE-TWO-WAY-STREAM LISP-INTERNALS:MAKE-CONCATENATED-STREAM LISP-INTERNALS:MAKE-BROADCAST-STREAM LISP-INTERNALS:MAKE-SYNONYM-STREAM LISP-INTERNALS:*TRACE-OUTPUT* LISP-INTERNALS:*DEBUG-IO* LISP-INTERNALS:*QUERY-IO* LISP-INTERNALS:*ERROR-OUTPUT* LISP-INTERNALS:*TERMINAL-IO* LISP-INTERNALS:*STANDARD-INPUT* LISP-INTERNALS:*STANDARD-OUTPUT* LISP-INTERNALS:GET-DISPATCH-MACRO-CHARACTER LISP-INTERNALS:SET-DISPATCH-MACRO-CHARACTER LISP-INTERNALS:MAKE-DISPATCH-MACRO-CHARACTER LISP-INTERNALS:GET-MACRO-CHARACTER LISP-INTERNALS:SET-MACRO-CHARACTER LISP-INTERNALS:SET-SYNTAX-FROM-CHAR LISP-INTERNALS:READTABLEP LISP-INTERNALS:COPY-READTABLE LISP-INTERNALS:*READTABLE* LISP-INTERNALS:*READ-SUPPRESS* LISP-INTERNALS:*READ-BASE* LISP-INTERNALS:REQUIRE LISP-INTERNALS:PROVIDE LISP-INTERNALS:*MODULES* LISP-INTERNALS:FIND-ALL-SYMBOLS LISP-INTERNALS:LIST-ALL-PACAKGES LISP-INTERNALS:IN-PAACKAGE LISP-INTERNALS:STABLE-SORT LISP-INTERNALS:SORT LISP-INTERNALS:SEARCH LISP-INTERNALS:MISMATCH LISP-INTERNALS:DELETE-DUPLICATES LISP-INTERNALS:DEFSTRUCT LISP-INTERNALS:BOOLE-XOREQV PRIMITIVES:LOGANDC2 LISP-INTERNALS:/= SYMBOL:REMF ARRAY:ARRAY-TOTAL-SIZE-LIMIT ARRAY:ARRAY-RANK-LIMIT ARRAY:ARRAY-DIMENSION-LIMIT LISP-INTERNALS:LISP-SYMBOLS LISP-INTERNALS:SETQ-GLOBALLY LISP-INTERNALS:PKG-GOTO-GLOBALLY LISP-INTERNALS:CHECK-FOR-NAME-CONFLICT-1 LISP-INTERNALS:PKG-INTERN-EXTERNAL LISP-INTERNALS:FIND-SYMBOL KEYWORD:EXTERNAL KEYWORD:INHERITED LISP-INTERNALS:PKG-INTERN-STORE LISP-INTERNALS:PKG-ADD-NICKNAMES LISP-INTERNALS:PKG-GOTO PRIMITIVES:IN-PACKAGE LISP-INTERNALS:UNUSE-PACKAGE LISP-INTERNALS:USE-PKG-1-CHECK-CONFLICTS-LOCAL LISP-INTERNALS:USE-PKG-1-CHECK-CONFLICTS LISP-INTERNALS:USE-PACKAGE-1 LISP-INTERNALS:SHADOW LISP-INTERNALS:UNINTERN LISP-INTERNALS:SHADOWING-IMPORT LISP-INTERNALS:INTERN-SOFT LISP-INTERNALS:INTERN-SYMBOL LISP-INTERNALS:UNEXPORT LISP-INTERNALS:CHECK-FOR-NAME-CONFLICT LISP-INTERNALS:EXPORT-GENERATE-CONFLICT-LIST LISP-INTERNALS:INTERN-LOCAL-SOFT LISP-INTERNALS:REMOB LISP-INTERNALS:EXPORT-CHECK-FOR-CONFLICTS PRIMITIVES:IMPORT LISP-INTERNALS:PKG-INTERN-INTERNAL LISP-INTERNALS:INTERN-LOCAL LISP-INTERNALS:UNUSE-PACKAGE-1 LISP-INTERNALS:KILL-PACKAGE LISP-INTERNALS:RENAME-PACKAGE LISP-INTERNALS:REHASH-INTERN-STORE LISP-INTERNALS:PKG-REHASH LISP-INTERNALS:PKG-GOOD-SIZES LISP-INTERNALS:PKG-GOOD-SIZE LISP-INTERNALS:USE-PACKAGE KEYWORD:FIND KEYWORD:ERROR KEYWORD:ASK LISP-INTERNALS:%MAKE-PACKAGE KEYWORD:USE LISP-INTERNALS:MAKE-PACKAGE LISP-INTERNALS:STRING-LENGTH LISP-INTERNALS:PKG-SHORTEST-NAME LISP-INTERNALS:DO-LOCAL-EXTERNAL-SYMBOLS LISP-INTERNALS:PACKAGE-SHADOWING-SYMBOLS LISP-INTERNALS:PACKAGE-USED-BY-LIST LISP-INTERNALS:PACKAGE-USE-LIST LISP-INTERNALS:PACKAGE-NICKNAMES LISP-INTERNALS:DO-ALL-SYMBOLS LISP-INTERNALS:ONCE-ONLY LISP-INTERNALS:DO-EXTERNAL-SYMBOLS LISP-INTERNALS:DO-LOCAL-SYMBOLS LISP-INTERNALS:FIND-PACKAGE LISP-INTERNALS:DO-SYMBOLS LISP-INTERNALS:PKG-FIND-PACKAGE LISP-INTERNALS:PKG-BIND LISP-INTERNALS:READ-LOCK LISP-INTERNALS:PKG-READ-LOCK-P LISP-INTERNALS:DECLARED-P LISP-INTERNALS:PKG-DECLARED-P LISP-INTERNALS:PKG-STRING-HASH-CODE LISP-INTERNALS:PKG-SLOT-SYMBOL VINCULUM:%%FIXNUM-SIGN-BIT LISP-INTERNALS:HASH-CODE LISP-INTERNALS:EXTERNAL-FLAG LISP-INTERNALS:PKG-MAKE-CODE LISP-INTERNALS:PKG-CODE-VALID-P LISP-INTERNALS:PKG-CODE-EXTERNAL-P VINCULUM:%%FIXNUM-FIELD LISP-INTERNALS:CODE LISP-INTERNALS:PKG-CODE-HASH-CODE LISP-INTERNALS:SLOTNUM LISP-INTERNALS:PKG LISP-INTERNALS:PKG-SLOT-CODE KEYWORD:NEW-SYMBOL-FUNCTION KEYWORD:PLIST KEYWORD:MAX-NUMBER-OF-SYMBOLS KEYWORD:NUMBER-OF-SYMBOLS KEYWORD:SHADOWING-SYMBOLS KEYWORD:USED-BY-LIST KEYWORD:USE-LIST KEYWORD:NICKNAMES KEYWORD:NAME KEYWORD:REFNAME-ALIST KEYWORD:NUMBER-OF-SLOTS KEYWORD:HASH-TABLE-SYMBOLS KEYWORD:HASH-TABLE-CODES LISP-INTERNALS:COPY-STRUCTURE-OBJECT LISP-INTERNALS:COPY-PACKAGE LISP-INTERNALS:PACKAGE-P NIL:FIND-IF-NOT4005 LISP-INTERNALS:PKG-HASH-TABLE-CODES NIL:FIND-IF-NOT4006 LISP-INTERNALS:PKG-HASH-TABLE-SYMBOLS NIL:FIND-IF-NOT4007 LISP-INTERNALS:PKG-NUMBER-OF-SLOTS NIL:FIND-IF-NOT4008 LISP-INTERNALS:PKG-REFNAME-ALIST NIL:FIND-IF-NOT4009 LISP-INTERNALS:PKG-NAME NIL:FIND-IF-NOT4010 LISP-INTERNALS:PKG-NICKNAMES NIL:FIND-IF-NOT4011 LISP-INTERNALS:PKG-USE-LIST NIL:FIND-IF-NOT4012 LISP-INTERNALS:PKG-USED-BY-LIST NIL:FIND-IF-NOT4013 LISP-INTERNALS:PKG-SHADOWING-SYMBOLS NIL:FIND-IF-NOT4014 LISP-INTERNALS:PKG-NUMBER-OF-SYMBOLS NIL:FIND-IF-NOT4015 LISP-INTERNALS:PKG-MAX-NUMBER-OF-SYMBOLS NIL:FIND-IF-NOT4016 LISP-INTERNALS:PKG-PLIST NIL:FIND-IF-NOT4017 LISP-INTERNALS:PKG-NEW-SYMBOL-FUNCTION LISP-INTERNALS:NEW-SYMBOL-FUNCTION LISP-INTERNALS:PLIST LISP-INTERNALS:MAX-NUMBER-OF-SYMBOLS LISP-INTERNALS:NUMBER-OF-SYMBOLS LISP-INTERNALS:SHADOWING-SYMBOLS LISP-INTERNALS:USED-BY-LIST LISP-INTERNALS:USE-LIST LISP-INTERNALS:NICKNAMES KEYWORD:DOCUMENTATION LISP-INTERNALS:REFNAME-ALIST LISP-INTERNALS:NUMBER-OF-SLOTS LISP-INTERNALS:HASH-TABLE-SYMBOLS LISP-INTERNALS:HASH-TABLE-CODES LISP-INTERNALS:PKG-MAKE-PACKAGE LISP-INTERNALS:PACKAGE LISP-INTERNALS:LIST-ALL-PACKAGES LISP-INTERNALS:PKG-AREA LISP-INTERNALS:PKG-COMPILER-PACKAGE LISP-INTERNALS:PKG-SYSTEM-INTERNALS-PACKAGE LISP-INTERNALS:PKG-SYSTEM-PACKAGE LISP-INTERNALS:PKG-LISP-PACKAGE LISP-INTERNALS:PKG-GLOBAL-PACKAGE LISP-INTERNALS:PKG-USER-PACKAGE LISP-INTERNALS:PKG-KEYWORD-PACKAGE LISP-INTERNALS:*ALL-PACKAGES* LISP-INTERNALS:*PACKAGE* LISP-INTERNALS:REALLY-FAKE-WITHOUT-INTERRUPTS LISP-INTERNALS:FAKE-WITHOUT-INTERRUPTS LISP-INTERNALS:BOOT-STACK-GROUPS LISP-INTERNALS:ILLOP-FUNCTION LISP-INTERNALS:CLEAR-R-FRAME LISP-INTERNALS:WRITE-OPEN-FRAME LISP-INTERNALS:WRITE-OPEN-CALL-FRAME HARDWARE:ACCUMULATE-BOX-BITS LISP-INTERNALS:SAVE-BOX-BIT HARDWARE:VMA-START-WRITE-NO-GC-TRAP-UNBOXED HARDWARE:WRITE-MD-UNBOXED K:REGISTER LISP-INTERNALS:SAVE-REGISTER GLOBAL-REGISTERS:*CH-TEMP-5* LISP-INTERNALS:WORD-1 GLOBAL-REGISTERS:*CH-TEMP-4* LISP-INTERNALS:THIS-RPC GLOBAL-REGISTERS:*CH-TEMP-3* LISP-INTERNALS:PROTECTION-COUNT GLOBAL-REGISTERS:*CH-TEMP-2* LISP-INTERNALS:SAVED-CSP GLOBAL-REGISTERS:*CH-TEMP-1* LISP-INTERNALS:ACCUMULATED-BOX-BITS GLOBAL-REGISTERS:*CH-TEMP-0* LISP-INTERNALS:PREVIOUS-A-FRAME LISP-INTERNALS:WITH-DUMPER-MACROS LISP-INTERNALS:TRAP-CALL-PROTECTION-COUNT LISP-INTERNALS:WHERE-TO-RESTORE-FROM-CONTROL-PDL LISP-INTERNALS:CALL-HARDWARE-UNDERFLOW-RETURN-MULTIPLE-VALUES LISP-INTERNALS:CALL-HARDWARE-UNDERFLOW-RETURN-1-VALUE LISP-INTERNALS:RESTORE-CALL-HARDWARE HARDWARE:%%I-REG-OFFSET HARDWARE:%%I-REG-BASE HARDWARE:$$I-REG-BASE-ACTIVE LISP-INTERNALS:CALL-HARDWARE-UNDERFLOW-CATCHER LISP-INTERNALS:FORGE-CATCHER-FRAME HARDWARE:DPB HARDWARE:%%CH-RPCD-RETURN-DEST VINCULUM:DPB-MULTIPLE-UNBOXED HARDWARE:%%PROCESSOR-CONTROL-MISC HARDWARE:TRAP-OFF HARDWARE:READ-MEMORY-CONTROL HARDWARE:%%MEMORY-CONTROL-MASTER-TRAP-ENABLE HARDWARE:$$TRAP-ENABLE HARDWARE:WRITE-MEMORY-CONTROL HARDWARE:READ-PROCESSOR-CONTROL HARDWARE:%%PROCESSOR-CONTROL-SPARE-17 HARDWARE:DPB-UNBOXED HARDWARE:WRITE-PROCESSOR-CONTROL HARDWARE:CH-OPEN-CALL LISP-INTERNALS:RPC-RDEST HARDWARE:WRITE-RETURN-PC-RETURN-DEST HARDWARE:NOP LISP-INTERNALS:SET-RPC-RDEST TRAP:ILLOP GLOBAL-REGISTERS:*CH-DUMPER-RETURN-PC* LISP-INTERNALS:DUMPING-OR-RESTORING-CALL-HARDWARE LISP-INTERNALS:SELECT-CONTROL-PDL GLOBAL-REGISTERS:*CONTROL-PDL-LIMIT* VINCULUM:$$DTP-UNBOXED-LOCATIVE CONS:MAKE-POINTER LISP-INTERNALS:INDEX LISP-INTERNALS:INDEX-TO-ADDRESS PRIMITIVES:MACROLET LISP-INTERNALS:LOAD-CONTROL-PDL-STATE GLOBAL-REGISTERS:*CONTROL-PDL-POINTER* HARDWARE:24- GLOBAL-REGISTERS:*CONTROL-PDL* LISP-INTERNALS:SAVE-CONTROL-PDL-STATE LISP-INTERNALS:GROW-CONTROL-PDL LISP-INTERNALS:CONTROL-PDL-ASSURE-ROOM ARRAY:%%BOUNDS LISP-INTERNALS:CONTROL-PDL-LIMIT PRIMITIVES:WHEN LISP-INTERNALS:CONTROL-PDL-EMPTY-P LISP-INTERNALS:MAKE-CONTROL-PDL LISP-INTERNALS:CONTROL-PDL-BASE LISP-INTERNALS:SET-CONTROL-PDL-POINTER LISP-INTERNALS:CONTROL-PDL-POINTER LISP-INTERNALS:SET-CONTROL-PDL-STACK-GROUP HARDWARE:24+ LISP-INTERNALS:CONTROL-PDL-STACK-GROUP LISP-INTERNALS:CONTROL-PDL-ALLOCATION-QUANTUM LISP-INTERNALS:MAKE-CONTROL-PDL-AREA LISP-INTERNALS:CONTROL-PDL-AREA LISP-INTERNALS:MAX-CALL-HARDWARE-DUMP LISP-INTERNALS:CONTROL-PDL-FRAME-OFFSET-TO-REGISTERS LISP-INTERNALS:CONTROL-PDL-FRAME-SIZE LISP-INTERNALS:$$CPDL0-TYPE-PROTECTED-OPEN-CALL LISP-INTERNALS:$$CPDL0-TYPE-TOPEN LISP-INTERNALS:$$CPDL0-TYPE-OPEN-CALL LISP-INTERNALS:$$CPDL0-TYPE-OPEN LISP-INTERNALS:%%CPDL0-BOX-BITS LISP-INTERNALS:%%CPDL0-GLOBAL-FRAME LISP-INTERNALS:%%CPDL0-RDEST LISP-INTERNALS:%%CPDL0-TYPE-CODE KEYWORD:EXTRANEOUS-PDL-SIZE KEYWORD:SPECIAL-PDL-SIZE LISP-INTERNALS:%MAKE-STACK-GROUP LISP-INTERNALS:THING LISP-INTERNALS:STACK-GROUP-P LISP-INTERNALS:SATISFIES LISP-INTERNALS:TYPE-EXPANDER NIL:FIND-IF-NOT7740 LISP-INTERNALS:SG-NAME NIL:FIND-IF-NOT7741 LISP-INTERNALS:SG-SPECIAL-PDL NIL:FIND-IF-NOT7742 LISP-INTERNALS:SG-SPECIAL-PDL-PTR NIL:FIND-IF-NOT7743 LISP-INTERNALS:SG-SPECIAL-PDL-LIMIT NIL:FIND-IF-NOT7744 LISP-INTERNALS:SG-EXTRANEOUS-PDL NIL:FIND-IF-NOT7745 LISP-INTERNALS:SG-EXTRANEOUS-PDL-PTR NIL:FIND-IF-NOT7746 LISP-INTERNALS:SG-EXTRANEOUS-PDL-LIMIT NIL:FIND-IF-NOT7747 LISP-INTERNALS:SG-CONTROL-PDL LISP-INTERNALS:CONTROL-PDL LISP-INTERNALS:EXTRANEOUS-PDL-LIMIT LISP-INTERNALS:EXTRANEOUS-PDL-PTR LISP-INTERNALS:EXTRANEOUS-PDL LISP-INTERNALS:SPECIAL-PDL-LIMIT LISP-INTERNALS:SPECIAL-PDL-PTR LISP-INTERNALS:SPECIAL-PDL LISP-INTERNALS:UNDEFINED LISP-INTERNALS:NAME LISP-INTERNALS:MAKE-STACK-GROUP LISP-INTERNALS:DEFSTRUCT-DESCRIPTOR LISP-INTERNALS:STACK-GROUP NC:PUT-GLOBAL-DECLARATION LISP-INTERNALS:VARIABLE-LIST- LISP-INTERNALS:VALUE-LIST- LISP-INTERNALS:VARS- LISP-INTERNALS:VALS- LISP-INTERNALS:G KEYWORD:UNBOUND LISP-INTERNALS:PROGV LISP-INTERNALS:UNWIND-PROTECT-CONTINUE LISP-INTERNALS:UNWIND-PROTECT LISP-INTERNALS:GET-STACK-POINTER LISP-INTERNALS:GET-SPECIAL-PDL-PTR LISP-INTERNALS:GET-UNWIND-PROTECT-TAG LISP-INTERNALS:GET-UNWIND-MARKER LISP-INTERNALS:CATCH-CONTINUE-MV LISP-INTERNALS:CATCH-CONTINUE-SV LISP-INTERNALS:CATCH-CONTINUE LISP-INTERNALS:DO-FOREVER LISP-INTERNALS:MULTIPLE-VALUES HARDWARE:CH-CALL LISP-INTERNALS:UNWIND-MARKER LISP-INTERNALS:UNWIND-PROTECT-TAG LISP-INTERNALS:SINGLE-VALUE LISP-INTERNALS:FLUSH-OPEN-FRAME LISP-INTERNALS:GET-CS-OA LISP-INTERNALS:THROW-MV LISP-INTERNALS:THROW-SV LISP-INTERNALS:THROW-INTERNAL LISP-INTERNALS:REHASH-SIZE LISP-INTERNALS:HASH-TABLE-COUNT LISP-INTERNALS:CLRHASH LISP-INTERNALS:MAPHASH LISP-INTERNALS:REMHASH LISP-INTERNALS:DEFAULT PRIMITIVES:&OPTIONAL LISP-INTERNALS:HASH-TABLE LISP-INTERNALS:%REHASH LISP-INTERNALS:%SETHASH LISP-INTERNALS:GETHASH LISP-INTERNALS:%CMPHASH LISP-INTERNALS:%INC-PTR LISP-INTERNALS:%LOCHASH LISP-INTERNALS:SXHASH LISP-INTERNALS:REALPART LISP-INTERNALS:IMAGPART LISP-INTERNALS:NUMERATOR LISP-INTERNALS:DENOMINATOR LISP-INTERNALS:STRUCT LISP-INTERNALS:%SXHASH-STRUCTURE LISP-INTERNALS:%SXHASH-1 LISP-INTERNALS:%SXHASH-ARRAY LISP-INTERNALS:FLOAT LISP-INTERNALS:%SXHASH-DOUBLE-FLOAT LISP-INTERNALS:%SXHASH-SINGLE-FLOAT LISP-INTERNALS:%SXHASH-BIGNUM LISP-INTERNALS:%SXHASH-STRING LISP-INTERNALS:%SXHASH-FIXNUM HARDWARE:UNBOXED-CONSTANT LISP-INTERNALS:MAGIC-NUMBER LISP-INTERNALS:%SXHASH-NIL HARDWARE:DPB-XOR HARDWARE:32-ROTATE-UP HARDWARE:32+ LISP-INTERNALS:RAW-32 LISP-INTERNALS:%SXHASH-RAW-32 VINCULUM:$$DTP-HASH-TABLE VINCULUM:TYPE-TEST LISP-INTERNALS:OBJECT LISP-INTERNALS:HASH-TABLE-P KEYWORD:REHASH-THRESHOLD KEYWORD:REHASH-SIZE KEYWORD:SIZE LISP-INTERNALS:MAKE-HASH-TABLE LISP-INTERNALS:VALUE325 LISP-INTERNALS:ARGS324 LISP-INTERNALS:%HASH-TABLE-DATA-PTR-SET LISP-INTERNALS:%HASH-TABLE-DATA-PTR LISP-INTERNALS:VALUE323 LISP-INTERNALS:ARGS322 LISP-INTERNALS:%HASH-TABLE-REHASH-THRESHOLD-SET LISP-INTERNALS:%HASH-TABLE-REHASH-THRESHOLD LISP-INTERNALS:VALUE321 LISP-INTERNALS:ARGS320 LISP-INTERNALS:%HASH-TABLE-REHASH-SIZE-SET LISP-INTERNALS:%HASH-TABLE-REHASH-SIZE LISP-INTERNALS:VALUE319 LISP-INTERNALS:ARGS318 LISP-INTERNALS:%HASH-TABLE-TEST-SET LISP-INTERNALS:%HASH-TABLE-TEST LISP-INTERNALS:VALUE317 LISP-INTERNALS:ARGS316 LISP-INTERNALS:%HASH-TABLE-USE-COUNT-SET LISP-INTERNALS:%HASH-TABLE-USE-COUNT LISP-INTERNALS:VALUE315 LISP-INTERNALS:ARGS314 LISP-INTERNALS:DATA LISP-INTERNALS:%HASH-TABLE-SIZE-SET CONS:CONTENTS-OFFSET LISP-INTERNALS:HT LISP-INTERNALS:%HASH-TABLE-SIZE LISP-INTERNALS:HASH-TABLE-MAX-SIZE LISP-INTERNALS:HASH-TABLE-HEADER-SIZE LISP-INTERNALS:EQUALP LISP-INTERNALS:SEQUENCE1 LISP-INTERNALS:SEQUENCE2 LISP-INTERNALS:MERGE-1-LIST LISP-INTERNALS:MERGE-1-VEC LISP-INTERNALS:MERGE LISP-INTERNALS:FIND-EQ LISP-INTERNALS:FIND-EQL LISP-INTERNALS:FIND-IF-NOT LISP-INTERNALS:FIND-IF LISP-INTERNALS:FIND-1 LISP-INTERNALS:FIND LISP-INTERNALS:TEST-NOT LISP-INTERNALS:POSITION-EQ LISP-INTERNALS:POSITION-IF-NOT LISP-INTERNALS:POSITION-IF LISP-INTERNALS:POSITION-1 LISP-INTERNALS:POSITION LISP-INTERNALS:KEY LISP-INTERNALS:FROM-END LISP-INTERNALS:COUNT-IF-NOT-NOKEY LISP-INTERNALS:COUNT-IF-NOKEY LISP-INTERNALS:COUNT-EQ LISP-INTERNALS:COUNT-EQL LISP-INTERNALS:COUNT-IF-NOT LISP-INTERNALS:COUNT-IF LISP-INTERNALS:COUNT LISP-INTERNALS:NSUBSTITUTE-IF-NOT LISP-INTERNALS:NSUBSTITUTE-IF LISP-INTERNALS:NSUBSTITUTE LISP-INTERNALS:SUBSTITUTE-IF-NOT LISP-INTERNALS:SUBSTITUTE-IF LISP-INTERNALS:SUBSTITUTE-IN-ARRAY LISP-INTERNALS:SUBSTITUTE LISP-INTERNALS:NSUBSTITUTE-IN-LIST LISP-INTERNALS:SUBSTITUTE-IN-LIST-1 LISP-INTERNALS:SUBSTITUTE-IN-LIST LISP-INTERNALS:DELETE-DUPLICATES-FROM-ARRAY LISP-INTERNALS:DELETE-DUPLICATES-FROM-LIST LISP-INTERNALS:REMOVE-DUPLICATES LISP-INTERNALS:REMOVE-DUPLICATES-FROM-LIST LISP-INTERNALS:SUBLIST-MEMBER LISP-INTERNALS:ARRAY-TYPE LISP-INTERNALS:REMOVE-DUPLICATES-FROM-ARRAY-INTERNAL LISP-INTERNALS:REMOVE-DUPLICATES-FROM-ARRAY LISP-INTERNALS:POS-1 LISP-INTERNALS:DELETE-IF-NOT LISP-INTERNALS:DELETE-IF LISP-INTERNALS:DELETE-EQ LISP-INTERNALS:DELETE-EQL LISP-INTERNALS:DELETE LISP-INTERNALS:DELETE-FROM-ARRAY LISP-INTERNALS:DELETE-FROM-LIST-EQ LISP-INTERNALS:DELETE-FROM-LIST-EQL LISP-INTERNALS:DELETE-FROM-LIST LISP-INTERNALS:REMOVE-EQ LISP-INTERNALS:REMOVE-EQL LISP-INTERNALS:REMOVE LISP-INTERNALS:REMOVE-IF-NOT KEYWORD:COUNT LISP-INTERNALS:REMOVE-IF LISP-INTERNALS:REMOVE-FROM-LIST-EQL LISP-INTERNALS:REMOVE-FROM-LIST-EQ LISP-INTERNALS:COUNT-1 LISP-INTERNALS:REMOVE-FROM-LIST LISP-INTERNALS:REMOVE-FROM-ARRAY-INTERNAL LISP-INTERNALS:REMOVE-FROM-ARRAY LISP-INTERNALS:INTO-SEQUENCE-1 LISP-INTERNALS:FROM-SEQUENCE-2 LISP-INTERNALS:REPLACE LISP-INTERNALS:REPLACE-1 LISP-INTERNALS:ARRAY-INITIALIZE LISP-INTERNALS:FILL KEYWORD:FROM-END LISP-INTERNALS:REDUCE-LIST-BACKWARDS LISP-INTERNALS:REDUCE LISP-INTERNALS:SEQ LISP-INTERNALS:NOTEVERY LISP-INTERNALS:NOTANY LISP-INTERNALS:EVERY LISP-INTERNALS:SOME LISP-INTERNALS:SEQ-PREDICATE LISP-INTERNALS:MORE-SEQUENCES LISP-INTERNALS:SEQ-PREDICATE-1 LISP-INTERNALS:PREDICATE LISP-INTERNALS:DEFINE-SEQ-PREDICATE LISP-INTERNALS:MAP LISP-INTERNALS:SEQUENCE-LENGTH ARRAY:COPY-ARRAY-PORTION LISP-INTERNALS:SIMPLE-VECTOR LISP-INTERNALS:SIMPLE-STRING LISP-INTERNALS:SIMPLE-ARRAY KEYWORD:INITIAL-VALUE LISP-INTERNALS:SIZE LISP-INTERNALS:TYPE-CANONICALIZE LISP-INTERNALS:NREVERSE PRIMITIVES:ETYPECASE LISP-INTERNALS:ARRAY NC:NO-CASE-ERROR LISP-INTERNALS:REVERSE LISP-INTERNALS:COPY-SEQ LISP-INTERNALS:TYPE-OF-SEQUENCE LISP-INTERNALS:MAKE-SEQUENCE LISP-INTERNALS:ELT LISP-INTERNALS:APPLY-PREDICATE-AND-KEY LISP-INTERNALS:SEQ-END LISP-INTERNALS:SEQ-START LISP-INTERNALS:SEQ-STORE LISP-INTERNALS:KEY-FETCH-INC LISP-INTERNALS:TEM LISP-INTERNALS:KEY-FETCH PRIMITIVES:PROG1 LISP-INTERNALS:POP LISP-INTERNALS:SEQ-FETCH-INC LISP-INTERNALS:SEQ-FETCH LISP-INTERNALS:TYPEP LISP-INTERNALS:FIXNUM PRIMITIVES:INCF LISP-INTERNALS:SEQ-INC LISP-INTERNALS:SEQUENCE LISP-INTERNALS:END LISP-INTERNALS:START LISP-INTERNALS:INTEGER LISP-INTERNALS:CHECK-SEQUENCE-ARGS LISP-INTERNALS:NSET-EXCLUSIVE-OR LISP-INTERNALS:SET-EXCLUSIVE-OR LISP-INTERNALS:NSET-DIFFERENCE LISP-INTERNALS:SET-DIFFERENCE LISP-INTERNALS:SUBSETP LISP-INTERNALS:NSET-INTERSECTION LISP-INTERNALS:SET-INTERSECTION LISP-INTERNALS:NUNION LISP-INTERNALS:UNION PRIMITIVES:SETF LISP-INTERNALS:PUSHNEW LISP-INTERNALS:ADJOIN LISP-INTERNALS:RASSOC-IF-NOT LISP-INTERNALS:RASSOC-IF LISP-INTERNALS:RASSOC LISP-INTERNALS:A-LIST LISP-INTERNALS:ASSOC-IF-NOT LISP-INTERNALS:ASSOC-IF LISP-INTERNALS:ASSOC-EQ LISP-INTERNALS:ASSOC-EQL LISP-INTERNALS:MEMBER-IF-NOT LISP-INTERNALS:MEMBER-IF K:TEST LISP-INTERNALS:ITEM NC:DEF-REWRITE-PATTERNS LISP-INTERNALS:EQUAL LISP-INTERNALS:MEMBER-EQUAL LISP-INTERNALS:NSUBLIS-1 LISP-INTERNALS:NSUBLIS LISP-INTERNALS:ASSOC LISP-INTERNALS:SUBLIS-1 LISP-INTERNALS:SUBLIS LISP-INTERNALS:NSUBST-IF-NOT LISP-INTERNALS:NSUBST-IF LISP-INTERNALS:NSUBST-IF-1 LISP-INTERNALS:NSUBST LISP-INTERNALS:SUBST-IF-NOT LISP-INTERNALS:SUBST-IF KEYWORD:KEY LISP-INTERNALS:IDENTITY LISP-INTERNALS:SUBST-IF-1 PRIMITIVES:SUBST KEYWORD:TEST-NOT PRIMITIVES:EQL LISP-INTERNALS:TREE-EQUAL-1 LISP-INTERNALS:TREE-EQUAL LISP-INTERNALS:PAIRLIS LISP-INTERNALS:TAILP LISP-INTERNALS:LDIFF LISP-INTERNALS:NBUTLAST LISP-INTERNALS:BUTLAST LISP-INTERNALS:NRECONC LISP-INTERNALS:NCONC LISP-INTERNALS:REVAPPEND LISP-INTERNALS:LIST-NREVERSE LISP-INTERNALS:LIST-REVERSE LISP-INTERNALS:COPY-TREE LISP-INTERNALS:COPY-ALIST LISP-INTERNALS:ACONS LISP-INTERNALS:LIST*-IN-AREA LISP-INTERNALS:%SET-CDR LISP-INTERNALS:NCONS-IN-AREA LISP-INTERNALS:LIST-IN-AREA LISP-INTERNALS:LISTN LISP-INTERNALS:LIST4 LISP-INTERNALS:LIST3 LISP-INTERNALS:LIST2 LISP-INTERNALS:MAKE-LIST LISP-INTERNALS:NTHCDR LISP-INTERNALS:CARELESS-NTHCDR LISP-INTERNALS:LAST PRIMITIVES:REST LISP-INTERNALS:TENTH LISP-INTERNALS:NINTH LISP-INTERNALS:EIGHTH LISP-INTERNALS:SEVENTH LISP-INTERNALS:SIXTH LISP-INTERNALS:FIFTH LISP-INTERNALS:FOURTH LISP-INTERNALS:THIRD LISP-INTERNALS:VALUE190 LISP-INTERNALS:ARGS189 LISP-INTERNALS:LIST-LENGTH LISP-INTERNALS:POSITION-EQL LISP-INTERNALS:STRING-TRIM-RIGHT LISP-INTERNALS:STRING-TRIM-LEFT LISP-INTERNALS:STRING-TRIM-SCAN-LEFT-TO-RIGHT LISP-INTERNALS:STRING-TRIM-SCAN-RIGHT-TO-LEFT LISP-INTERNALS:SUBSEQ LISP-INTERNALS:STRING-TRIM LISP-INTERNALS:NSTRING-CAPITALIZE LISP-INTERNALS:STRING-CAPITALIZE LISP-INTERNALS:NSTRING-DOWNCASE NC:CHECK-TYPE-INTERNAL LISP-INTERNALS:NSTRING-UPCASE LISP-INTERNALS:STRING-DOWNCASE KEYWORD:END KEYWORD:START LISP-INTERNALS:STRING-UPCASE LISP-INTERNALS:STRING-NOT-GREATERP LISP-INTERNALS:STRING-GREATERP LISP-INTERNALS:STRING-NOT-LESSP LISP-INTERNALS:STRING-LESSP LISP-INTERNALS:STRING-NOT-EQUAL LISP-INTERNALS:STRING-EQUAL LISP-INTERNALS:STRING>= LISP-INTERNALS:STRING> LISP-INTERNALS:STRING<= LISP-INTERNALS:STRING< LISP-INTERNALS:STRING/= KEYWORD:END2 KEYWORD:START2 KEYWORD:END1 KEYWORD:START1 LISP-INTERNALS:STRING-COMPARE LISP-INTERNALS:SCHAR LISP-INTERNALS:MAKE-STRING-WITH-INIT LISP-INTERNALS:CHAR-NAME LISP-INTERNALS:CHARACTER LISP-INTERNALS:CODE-CHAR LISP-INTERNALS:CHAR-NOT-EQUAL LISP-INTERNALS:CHAR-NOT-EQUAL-3-ARGS LISP-INTERNALS:CHAR-NOT-EQUAL-2-ARGS LISP-INTERNALS:CHAR-NOT-GREATERP LISP-INTERNALS:CHAR-NOT-GREATERP-3-ARGS LISP-INTERNALS:CHAR-NOT-GREATERP-2-ARGS LISP-INTERNALS:CHAR-NOT-LESSP LISP-INTERNALS:CHAR-NOT-LESSP-3-ARGS LISP-INTERNALS:CHAR-NOT-LESSP-2-ARGS LISP-INTERNALS:CHAR-GREATERP LISP-INTERNALS:CHAR-GREATERP-3-ARGS LISP-INTERNALS:CHAR-GREATERP-2-ARGS LISP-INTERNALS:CHAR-LESSP LISP-INTERNALS:CHAR-LESSP-3-ARGS LISP-INTERNALS:CHAR-LESSP-2-ARGS LISP-INTERNALS:CHAR-EQUAL LISP-INTERNALS:CHAR-EQUAL-3-ARGS LISP-INTERNALS:CHAR-EQUAL-2-ARGS LISP-INTERNALS:C2 LISP-INTERNALS:CHAR3 LISP-INTERNALS:CHAR2 LISP-INTERNALS:CHAR1 PRIMITIVES:DO* LISP-INTERNALS:NEXT-CHAR LISP-INTERNALS:CHAR LISP-INTERNALS:CHARS LISP-INTERNALS:FIRST-CHAR LISP-INTERNALS:DEFINE-CHAR-????-PREDICATE-FUNCTIONS LISP-INTERNALS:CHAR/= LISP-INTERNALS:CHAR> LISP-INTERNALS:CHAR>= LISP-INTERNALS:CHAR= LISP-INTERNALS:CHAR< LISP-INTERNALS:FIRST PRIMITIVES:RETURN LISP-INTERNALS:ARGS LISP-INTERNALS:DEFINE-N-ARG-COMPARE-FUNCTION LISP-INTERNALS:SET-CHAR-BIT KEYWORD:CONTROL KEYWORD:META KEYWORD:SUPER KEYWORD:HYPER LISP-INTERNALS:CHAR-BIT LISP-INTERNALS:CHAR-DOWNCASE LISP-INTERNALS:CHAR-UPCASE LISP-INTERNALS:ALPHANUMERICP LISP-INTERNALS:MAKE-CHAR LISP-INTERNALS:DIGIT-CHAR LISP-INTERNALS:DIGIT-CHAR-P LISP-INTERNALS:BOTH-CASE-P LISP-INTERNALS:ALPHA-CHAR-P LISP-INTERNALS:LOWER-CASE-P LISP-INTERNALS:CHAR<= LISP-INTERNALS:UPPER-CASE-P LISP-INTERNALS:STANDARD-CHAR-P LISP-INTERNALS:GRAPHIC-CHAR-P LISP-INTERNALS:STRING-CHAR-P VINCULUM:CHARACTERP GLOBAL-REGISTERS:*DTP-CHARACTER* LISP-INTERNALS:I LISP-INTERNALS:INT-CHAR HARDWARE:DPB-BOXED LISP-INTERNALS:CHAR-INT LISP-INTERNALS:CHAR-FONT LISP-INTERNALS:CHAR-BITS HARDWARE:LDB LISP-INTERNALS:%TRAP-IF-NOT-CHARACTER LISP-INTERNALS:C LISP-INTERNALS:CHAR-CODE LISP-INTERNALS:CHAR-INT-UPPER-Z LISP-INTERNALS:CHAR-INT-UPPER-A LISP-INTERNALS:CHAR-INT-LOWER-Z LISP-INTERNALS:CHAR-INT-LOWER-A LISP-INTERNALS:CHAR-INT-9 LISP-INTERNALS:CHAR-INT-0 LISP-INTERNALS:%FAT-CHAR-INT LISP-INTERNALS:%CHAR-INT LISP-INTERNALS:CHAR-HYPER-BIT LISP-INTERNALS:CHAR-SUPER-BIT LISP-INTERNALS:CHAR-META-BIT LISP-INTERNALS:CHAR-CONTROL-BIT LISP-INTERNALS:%%CH-FAT LISP-INTERNALS:%%CH-FONT-AND-BITS LISP-INTERNALS:%%CH-FONT LISP-INTERNALS:%%CH-BITS LISP-INTERNALS:%%CH-CHAR LISP-INTERNALS:CHAR-BITS-LIMIT LISP-INTERNALS:CHAR-FONT-LIMIT LISP-INTERNALS:CHAR-CODE-LIMIT ARRAY:CAR ARRAY:CDR ARRAY:MAKE-STRING ARRAY:ART-STRING ARRAY:ART-Q VINCULUM:CONSP PRIMITIVES:OR ARRAY:TYPE PRIMITIVES:AND ARRAY:ELEMENT-TYPE-P ARRAY:ELEMENT-TYPE PRIMITIVES:&KEY ARRAY:OPTIONS ARRAY:DIMENSIONS ARRAY:MAKE-EASY-ARRAY-WITH-ELEMENT-TYPE ARRAY:MAKE-EASY-ARRAY KEYWORD:AREA KEYWORD:LEADER-LIST KEYWORD:ADJUSTABLE KEYWORD:DISPLACED-INDEX-OFFSET KEYWORD:FILL-POINTER KEYWORD:INITIAL-CONTENTS KEYWORD:INITIAL-ELEMENT KEYWORD:TYPE ARRAY:SIMPLE-ERROR-CHECKS ARRAY:MAKE-ARRAY-INTERNAL ARRAY:CHECK-DISPLACED-LEGALITY ARRAY:GET-ARRAY-AND-ARRAY-HEADER ARRAY:BUILD-ARRAY-HEADERS ARRAY:ARRAY-DIMENSIONS-AND-DATA-LENGTH-IN-Q-S LISP-INTERNALS:SIGNED-BYTE LISP-INTERNALS:STRING-CHAR LISP-INTERNALS:FAT-STRING ARRAY:ARRAY-TOTAL-DATA-SIZE ARRAY:ARRAY-BOXED-WORDS-PER-ELEMENT LISP-INTERNALS:NTH PRIMITIVES:VALUE PRIMITIVES:CASE ARRAY:SUBSCRIPTS ARRAY:ARRAY ARRAY:FORM ARRAY:ASET-LINEAR-DANGEROUSLY ARRAY:AREF-LINEAR-DANGEROUSLY ARRAY:ASET-N ARRAY:AREF-N ARRAY:ASET-2 ARRAY:AREF-2 ARRAY:DECODE-1D-DISPLACED-ARRAY ARRAY:DECODE-2D-ARRAY ARRAY:ALOC-HARD ARRAY:DECODE-ARRAY ARRAY:DECODE-DISPLACED-ARRAY ARRAY:GET ARRAY:APPLY ARRAY:NAMED-STRUCTURE-INVOKE ARRAY:SET-FILL-POINTER ARRAY:INC-FILL-POINTER ARRAY:LOCK-ARRAY-AND-GET-FILL-POINTER-LOC SYSTEM-INTERNALS:XR-BQ-APPEND ARRAY:VALUE552 LISP-INTERNALS:COPY-LIST PRIMITIVES:APPEND SETF:TEMPVARS LISP-INTERNALS:GENSYM SETF:STOREVAR SETF:REST-TEMPVARS LISP-INTERNALS:GENTEMP PRIMITIVES:IGNORE PRIMITIVES:FUNCTION LISP-INTERNALS:MAPCAR SETF:SINGLE-TEMPVARS PRIMITIVES:LET* ARRAY:ARGS551 PRIMITIVES:LAMBDA SETF:*GRODY-SETF-MACRO-TABLE* ARRAY:STORE-ARRAY-LEADER ARRAY:SET-ARRAY-LEADER ARRAY:ARRAY-LEADER ARRAY:ARRAY-HAS-LEADER-P ARRAY:COMPUTE-LINEARIZED-INDEX ARRAY:ARRAY-IN-BOUNDS-P-INTERNAL ARRAY:ARRAY-ACTIVE-LENGTH ARRAY:ARRAY-LENGTH ARRAY:%ARRAY-TOTAL-SIZE ARRAY:%ARRAY-DIMENSIONS ARRAY:INTERNAL-ARRAY-RANK ARRAY:%ARRAY-RANK ARRAY:%ADDITIONAL-HEADER-DIMENSIONS ARRAY:LOCK-ARRAY-HARD-P K:DOUBLE-FLOAT K:SINGLE-FLOAT ARRAY:CHARACTER ARRAY:STRING-CHAR ARRAY:SIGNED-BYTE ARRAY:UNSIGNED-BYTE ARRAY:%ADDITIONAL-HEADER-WORD ARRAY:ARRAY-TYPE ARRAY:SIMPLE-BIT-VECTOR-P ARRAY:BIT-VECTOR-P ARRAY:VECTOR-PUSH-EXTEND ARRAY:VECTOR-PUSH ARRAY:VECTOR-POP ARRAY:ARRAY-HAS-FILL-POINTER-P ARRAY:ADJUSTABLE-ARRAY-P ARRAY:ARRAY-ROW-MAJOR-INDEX ARRAY:ARRAY-IN-BOUNDS-P ARRAY:ARRAY-TOTAL-SIZE ARRAY:ARRAY-DIMENSIONS ARRAY:ARRAY-DIMENSION ARRAY:ARRAY-ELEMENT-TYPE ARRAY:ASET NEW-MATH:SHRINK-BIGNUM-STRUCTURE NEW-MATH:%ASH-FIXNUM NEW-MATH:RESOLVE-BYTE-SPEC-INTERNAL NEW-MATH:RESOLVE-BYTE-SPEC NEW-MATH:FIELD-PASS-BIGNUM-INTERNAL NEW-MATH:CEILING-FIXNUM NEW-MATH:FLOOR-FIXNUM NEW-MATH:TRUNCATE-FIXNUM NEW-MATH:MAKE-BIGNUM-32-GET-NEG-STATUS NEW-MATH:MAKE-BIGNUM-64-GET-NEG-STATUS NEW-MATH:MAKE-DOUBLE-FLOAT NEW-MATH:MAKE-SINGLE-FLOAT NEW-MATH:FLOAT-ILLOP NEW-MATH:GET-NORMALIZED-BIGNUM-INFO NEW-MATH:%ALLOCATE-BIGNUM LISP-INTERNALS:MOST-POSITIVE-FIXNUM LISP-INTERNALS:DEPOSIT-FIELD LISP-INTERNALS:MASK-FIELD LISP-INTERNALS:LDB-TEST PRIMITIVES:BYTE-POSITION LISP-INTERNALS:BYTE-POSITION-FIXNUM PRIMITIVES:BYTE-SIZE PRIMITIVES:BYTE LISP-INTERNALS:EIGHT-BIT-FIXNUMP LISP-INTERNALS:LOGBITP LISP-INTERNALS:%COUNT-BITS LISP-INTERNALS:LOGCOUNT LISP-INTERNALS:INTEGER-LENGTH PRIMITIVES:ASH LISP-INTERNALS:LDB NEW-MATH:FIELD-PASS-FIXNUM NEW-MATH:FIELD-PASS-BIGNUM LISP-INTERNALS:DPB LISP-INTERNALS:BOOLE LISP-INTERNALS:BOOLE-ORC2 LISP-INTERNALS:BOOLE-ORC1 LISP-INTERNALS:BOOLE-ANDC2 LISP-INTERNALS:BOOLE-ANDC1 LISP-INTERNALS:BOOLE-NOR LISP-INTERNALS:BOOLE-NAND LISP-INTERNALS:BOOLE-EQV LISP-INTERNALS:BOOLE-XOR LISP-INTERNALS:BOOLE-IOR LISP-INTERNALS:BOOLE-AND LISP-INTERNALS:BOOLE-C2 LISP-INTERNALS:BOOLE-C1 LISP-INTERNALS:BOOLE-2 LISP-INTERNALS:BOOLE-1 LISP-INTERNALS:BOOLE-SET LISP-INTERNALS:BOOLE-CLR PRIMITIVES:LOGORC2 PRIMITIVES:LOGORC1 LISP-INTERNALS:LOGANDC PRIMITIVES:LOGANDC1 PRIMITIVES:LOGNOR PRIMITIVES:LOGNAND PRIMITIVES:LOGEQV PRIMITIVES:LOGAND PRIMITIVES:LOGXOR PRIMITIVES:LOGIOR LISP-INTERNALS:/ PRIMITIVES:* PRIMITIVES:SETQ LISP-INTERNALS:DOLIST LISP-INTERNALS:RESULT LISP-INTERNALS:N LISP-INTERNALS:DEFINE-PLUS-LIKE-FUNCTION LISP-INTERNALS:ABS LISP-INTERNALS:MIN-2 LISP-INTERNALS:MIN PRIMITIVES:QUOTE LISP-INTERNALS:SECOND LISP-INTERNALS:LENGTH-FORM PRIMITIVES:LET LISP-INTERNALS:FORM PRIMITIVES:&WHOLE NC:DEFREWRITE LISP-INTERNALS:MAX-2 PRIMITIVES:MAX LISP-INTERNALS://= PRIMITIVES:>= PRIMITIVES:<= PRIMITIVES:> PRIMITIVES:< PRIMITIVES:= PRIMITIVES:UNLESS LISP-INTERNALS:N2 PRIMITIVES:DO PRIMITIVES:RETURN-FROM LISP-INTERNALS:N1 PRIMITIVES:BLOCK LISP-INTERNALS:FOO PRIMITIVES:COND PRIMITIVES:T LISP-INTERNALS:NUMBERS PRIMITIVES:&REST SYSTEM-INTERNALS:XR-BQ-LIST* SYSTEM-INTERNALS:MACRO-REPORT-ARGS-ERROR LISP-INTERNALS:DEFINE-ARITHMETIC-COMPARATOR LISP-INTERNALS:EVENP LISP-INTERNALS:ODDP PRIMITIVES:MINUSP PRIMITIVES:PLUSP PRIMITIVES:ZEROP NEW-MATH:ASH-BIGNUM NEW-MATH:ASH-FIXNUM NEW-MATH:TEST-COMPLEX NEW-MATH:TEST-RATIONAL NEW-MATH:TEST-DOUBLE NEW-MATH:TEST-SINGLE NEW-MATH:TEST-SHORT NEW-MATH:TEST-BIGNUM NEW-MATH:TEST-FIXNUM NEW-MATH:COMPARE-COMPLEX NEW-MATH:COMPARE-RATIONAL NEW-MATH:COMPARE-DOUBLE NEW-MATH:COMPARE-SINGLE NEW-MATH:COMPARE-SHORT NEW-MATH:COMPARE-BIGNUM NEW-MATH:COMPARE-FIXNUM NEW-MATH:NEGATE-COMPLEX NEW-MATH:NEGATE-RATIONAL NEW-MATH:NEGATE-DOUBLE NEW-MATH:NEGATE-SINGLE NEW-MATH:NEGATE-SHORT NEW-MATH:NEGATE-BIGNUM NEW-MATH:NEGATE-FIXNUM NEW-MATH:LOGNOT-BIGNUM NEW-MATH:LOGNOT-FIXNUM NEW-MATH:LOGXNOR-BIGNUM NEW-MATH:LOGXNOR-FIXNUM NEW-MATH:LOGXOR-BIGNUM NEW-MATH:LOGXOR-FIXNUM NEW-MATH:LOGIOR-BIGNUM NEW-MATH:LOGIOR-FIXNUM NEW-MATH:LOGAND-BIGNUM NEW-MATH:LOGAND-FIXNUM NEW-MATH:GCD-BIGNUM NEW-MATH:GCD-FIXNUM NEW-MATH:GCD-GENERIC PRIMITIVES:MOD NEW-MATH:REM NEW-MATH:EVENP NEW-MATH:ROUND PRIMITIVES:CEILING PRIMITIVES:FLOOR PRIMITIVES:+ PRIMITIVES:1- NEW-MATH:INT-ADJUST-NEGATIVE PRIMITIVES:- PRIMITIVES:1+ PRIMITIVES:VALUES NEW-MATH:DIVISOR PRIMITIVES:REMAINDER NEW-MATH:QUOTIENT NC:NAMED-LAMBDA NEW-MATH:INT-ADJUST-POSITIVE NEW-MATH:DENOMINATOR NEW-MATH:NUMERATOR NEW-MATH:TRUNCATE-DOUBLE NEW-MATH:TRUNCATE-SINGLE NEW-MATH:TRUNCATE-SHORT NEW-MATH:DIVIDE-BIGNUM NEW-MATH:DIVIDE-FIXNUM NEW-MATH:TRUNCATE NEW-MATH:DIVIDE-COMPLEX NEW-MATH:DIVIDE-RATIONAL NEW-MATH:DIVIDE-DOUBLE NEW-MATH:DIVIDE-SINGLE NEW-MATH:DIVIDE-SHORT NEW-MATH:MAKE-CANONICAL-RATIONAL NEW-MATH:DIVIDE-GENERIC NEW-MATH:MULTIPLY-COMPLEX NEW-MATH:MULTIPLY-RATIONAL NEW-MATH:MULTIPLY-DOUBLE NEW-MATH:MULTIPLY-SINGLE NEW-MATH:MULTIPLY-SHORT NEW-MATH:MULTIPLY-BIGNUM NEW-MATH:MULTIPLY-GENERIC NEW-MATH:SUBTRACT-COMPLEX NEW-MATH:SUBTRACT-RATIONAL NEW-MATH:SUBTRACT-DOUBLE NEW-MATH:SUBTRACT-SINGLE NEW-MATH:SUBTRACT-SHORT NEW-MATH:SUBTRACT-BIGNUM NEW-MATH:SUBTRACT-FIXNUM NEW-MATH:FOO NEW-MATH:ADD-COMPLEX NEW-MATH:ADD-RATIONAL NEW-MATH:ADD-DOUBLE NEW-MATH:ADD-SINGLE NEW-MATH:ADD-SHORT NEW-MATH:ADD-BIGNUM NEW-MATH:ADD-FIXNUM NEW-MATH:CONVERT-DOUBLE-TO-COMPLEX NEW-MATH:CONVERT-SINGLE-TO-COMPLEX NEW-MATH:CONVERT-SINGLE-TO-DOUBLE NEW-MATH:CONVERT-SHORT-TO-COMPLEX NEW-MATH:CONVERT-SHORT-TO-DOUBLE NEW-MATH:CONVERT-SHORT-TO-SINGLE NEW-MATH:CONVERT-RATIONAL-TO-COMPLEX NEW-MATH:CONVERT-RATIONAL-TO-DOUBLE NEW-MATH:CONVERT-RATIONAL-TO-SINGLE NEW-MATH:CONVERT-RATIONAL-TO-SHORT NEW-MATH:CONVERT-BIGNUM-TO-COMPLEX NEW-MATH:CONVERT-BIGNUM-TO-DOUBLE NEW-MATH:CONVERT-BIGNUM-TO-SINGLE NEW-MATH:CONVERT-BIGNUM-TO-SHORT NEW-MATH:CONVERT-BIGNUM-TO-RATIONAL NEW-MATH:GENERIC-MATH-COERCION-FAIL NEW-MATH:CONVERT-FIXNUM-TO-COMPLEX NEW-MATH:CONVERT-FIXNUM-TO-DOUBLE NEW-MATH:CONVERT-FIXNUM-TO-SINGLE NEW-MATH:CONVERT-FIXNUM-TO-SHORT NEW-MATH:CONVERT-FIXNUM-TO-RATIONAL NEW-MATH:CONVERT-FIXNUM-TO-BIGNUM NEW-MATH:GENERIC-MATH-TYPE-COERCER NEW-MATH:COMPARE-GENERIC NEW-MATH:EQUAL-GENERIC NEW-MATH:SUBTRACT-GENERIC NEW-MATH:LOGXNOR-GENERIC NEW-MATH:LOGXOR-GENERIC NEW-MATH:LOGIOR-GENERIC NEW-MATH:LOGAND-GENERIC NEW-MATH:TEST-GENERIC NEW-MATH:ADD-GENERIC NEW-MATH:NEGATE-GENERIC NEW-MATH:LOGNOT-GENERIC HARDWARE:$$I-FD-VMA-START-READ HARDWARE:$$I-FD-VMA-START-READ-CDR VINCULUM:$$DTP-SYMBOL VINCULUM:$$DTP-LOCATIVE VINCULUM:$$DTP-INSTANCE HARDWARE:$$I-FD-VMA-START-READ-WILL-WRITE HARDWARE:$$I-FD-VMA-START-READ-CDR-WILL-WRITE NEW-MATH:OTHERWISE NEW-MATH:PC->UNBOXED-LOCATIVE NEW-MATH:DECODE-ALU-OP NEW-MATH:HANDLE-BINARY-OP NEW-MATH:HANDLE-UNARY-OP NEW-MATH:GENERIC-ARITHMETIC-CODE NEW-MATH:GENERIC-LOGICAL-CODE NEW-MATH:GENERIC-BINARY-CODE NEW-MATH:GENERIC-UNARY-RIGHT-CODE NEW-MATH:GENERIC-UNARY-LEFT-CODE NEW-MATH:GENERIC-BROKEN-CODE NEW-MATH:BINARY-OP NEW-MATH:UNARY-RIGHT-OP NEW-MATH:UNARY-LEFT-OP NEW-MATH:NONARY-OP NEW-MATH:GENERIC-EQUAL-CODE NEW-MATH:GENERIC-ASH-DOWN-CODE NEW-MATH:GENERIC-ASH-UP-CODE NEW-MATH:GENERIC-COMPARER-CODE NEW-MATH:GENERIC-COMPARE-CODE NEW-MATH:GENERIC-TEST-CODE NEW-MATH:GENERIC-SUB4-CODE NEW-MATH:GENERIC-SUB2-CODE NEW-MATH:GENERIC-SUB1-CODE NEW-MATH:GENERIC-ADD4-CODE NEW-MATH:GENERIC-ADD2-CODE NEW-MATH:GENERIC-ADD1-CODE NEW-MATH:GENERIC-SUBR-CODE NEW-MATH:GENERIC-SUB-CODE NEW-MATH:GENERIC-ADD-CODE NEW-MATH:GENERIC-NEGATE-CODE NEW-MATH:GENERIC-FIELD-PASS-CODE NEW-MATH:GENERIC-LOGXNOR-CODE NEW-MATH:GENERIC-LOGXOR-CODE NEW-MATH:GENERIC-LOGIOR-CODE NEW-MATH:GENERIC-LOGAND-CODE NEW-MATH:GENERIC-LOGNOT-CODE TRAP:TRAP TRAP:DIAGNOSTIC-TRAP-EXIT TRAP:TRAP-VECTOR-TABLE GC-RAM:ADDRESS-GC-RAM GC-RAM:FLIP GC-RAM:DUMP-RAM GC-RAM:LOAD-RAM DATATYPE-RAM:WRITE-DT-RAM-DISPATCH DATATYPE-RAM:READ-DT-RAM DATATYPE-RAM:READ-DT-RAM-DISPATCH DATATYPE-RAM:WRITE-DT-RAM DATATYPE-RAM:LOAD-DT-RAM-PATTERN VIRTUAL-MEMORY:VMA-START-WRITE-GENERIC TIMERS:PULSE-TIMER-INTERRUPT-ENABLE TIMERS:RESET-SEQUENCE-BREAK-COUNT TIMERS:UPDATE-SEQUENCE-BREAK-COUNT TIMERS:UPDATE-TIME PHYSICAL-CLUSTER-DATA:PCD-STATUS PHYSICAL-CLUSTER-DATA:PCD-VIRTUAL-CLUSTER-NUMBER PHYSICAL-CLUSTER-DATA:CLEAN-CLUSTER? PHYSICAL-CLUSTER-DATA:READ-PCD PHYSICAL-CLUSTER-DATA:WRITE-PCD PHYSICAL-CLUSTER-DATA:FINDCORE PHYSICAL-CLUSTER-DATA:AGE-CLUSTER PHYSICAL-CLUSTER-DATA:INIT-READ-ONLY? PHYSICAL-CLUSTER-DATA:INIT-WIRED? VIRTUAL-MEMORY:BOOT-ALLOCATE-PHYSICAL-CLUSTERS PHYSICAL-CLUSTER-DATA:READ-PCD-INIT-ENTRY PHYSICAL-CLUSTER-DATA:INIT-PCD QUANTUM-MAP:QUANTUM-DQIN QUANTUM-MAP:QUANTUM-DEVICE QUANTUM-MAP:QUANTUM-VALID? QUANTUM-MAP:QUANTUM-STATUS-BITS QUANTUM-MAP:QUANTUM-EMPTY? QUANTUM-MAP:REGION-ORIGIN QUANTUM-MAP:READ-QUANTUM-MAP QUANTUM-MAP:WRITE-QUANTUM-MAP QUANTUM-MAP:ZONE-ORIGIN-IN-QUANTA QUANTUM-MAP:LOCATE-CONTIGUOUS-QUANTA GC-RAM:INITIALIZE-QUANTUM QUANTUM-MAP:QUANTUM-REGION MEMORY-MANAGEMENT:REGION-TABLE-REF MEMORY-MANAGEMENT:REGION-TABLE-STORE MEMORY-MANAGEMENT:REGION-ORIGIN MEMORY-MANAGEMENT:REGION-NUMBER REGION-BITS:REGION-EXTERNAL-BUS REGION-BITS:REGION-EXTERNAL-BUS? REGION-BITS:REGION-SWAPIN-QUANTUM REGION-BITS:REGION-SCAVENGE-ENABLE REGION-BITS:REGION-SCAVENGE-ENABLE? REGION-BITS:REGION-READ-ONLY REGION-BITS:REGION-READ-ONLY? REGION-BITS:REGION-SPACE-TYPE REGION-BITS:REGION-COPY-SPACE REGION-BITS:REGION-COPY-SPACE? REGION-BITS:REGION-FLIPPABLE REGION-BITS:REGION-FLIPPABLE? QUANTUM-MAP:QUANTUM-REGION-ORIGIN REGION-BITS:READ-REGION-BITS REGION-BITS:WRITE-REGION-BITS REGION-BITS:REGION-VALID? REGION-BITS:REGION-FREE? REGION-BITS:ENCODE-REGION-BITS QUANTUM-MAP:ALLOCATE-QUANTA MEMORY-MANAGEMENT:FREE-CLUSTER REGION-BITS:VERIFY-REGION REGION-BITS:ZAP-REGION-BITS REGION-BITS:FREE-CLUSTERS-IN-REGION QUANTUM-MAP:DEALLOCATE-QUANTA QUANTUM-MAP:CLUSTER-REGION REGION-BITS:INITIALIZE-UNKNOWN-CLUSTER REGION-BITS:INITIALIZE-CODE-CLUSTER REGION-BITS:INITIALIZE-STRUCTURE-CLUSTER REGION-BITS:INITIALIZE-CONS-CLUSTER REGION-BITS:INITIALIZE-UNBOXED-CLUSTER REGION-BITS:INITIALIZE-INVALID-CLUSTER REGION-BITS:INITIALIZE-FREE-CLUSTER REGION-DATA:REGION-GC-POINTER REGION-DATA:CONS-CACHE-INVALID? REGION-DATA:INVALIDATE-STRUCTURE-CONS-CACHE REGION-BITS:FREE-REGION QUANTUM-MAP:VALID-QUANTUM? REGION-DATA:ACCUMULATE-REGION-DATA REGION-DATA:RECORD-INITIAL-REGION-DATA REGION-DATA:ZAP-ALL-REGIONS REGION-DATA:FIND-REGION GC-FAULT:HANDLE-NORMAL-GC-FAULT AREA-DATA:THREAD-CONTINUES? AREA-DATA:AREA-TABLE-REF AREA-DATA:AREA-TABLE-STORE AREA-DATA:AREA-REGION-DATA AREA-DATA:AREA-DATA-REGION-THREAD AREA-DATA:AREA-DATA-STATUS AREA-DATA:AREA-FREE? AREA-DATA:AREA-HAS-REGIONS? AREA-DATA:AREA-REGION-BITS AREA-DATA:AREA-VOLATILITY AREA-DATA:AREA-REGION-SIZE AREA-DATA:FIND-FREE-AREA GC-RAM:QUANTUM-VOLATILITY-AND-OLDSPACE AREA-DATA:VOLATILITY-ACCEPTABLE? AREA-DATA:REGION-ACCEPTABLE? REGION-DATA:UNSAFE-REGION-FREE-POINTER AREA-DATA:MAYBE-LOAD-CONS-CACHE AREA-DATA:PLACE-REGION-IN-AREA AREA-DATA:ZAP-ALL-AREAS AREA-DATA:INITIALIZE-AREA REGION-DATA:FREE-REGION AREA-DATA:REGION-LIST-THREAD AREA-DATA:RESET-TEMPORARY-AREA PRIMITIVES:NULL VINCULUM:ATOM VINCULUM:COMPLEXP VINCULUM:ARRAYP VINCULUM:COMPILED-FUNCTION-P VINCULUM:RATIOP VINCULUM:%RATIONALP VINCULUM:%SHORT-FLOAT-P VINCULUM:%SINGLE-FLOAT-P VINCULUM:%DOUBLE-FLOAT-P VINCULUM:INTEGERP VINCULUM:RATIONALP VINCULUM:FLOATP VINCULUM:NUMBERP VINCULUM:LISTP VINCULUM:COMMONP CONS:STORE-CONTENTS CONS:SET-CAR CONS:SET-CDR PRIMITIVES:DEFUN LISP-INTERNALS:LIST PRIMITIVES:%CAR LISP-INTERNALS:STRING PRIMITIVES:%CDR PRIMITIVES:PROGN LISP-INTERNALS:FORMAT LISP-INTERNALS:CONCATENATE SYSTEM-INTERNALS:XR-BQ-LIST LISP:IF USER:MAKE-C.N.R CONS:CAAR CONS:CDAR CONS:CAAAR CONS:CDAAR CONS:CADAR CONS:CDDAR CONS:CAADR CONS:CDADR CONS:CDDDR CONS:CAAAAR CONS:CDAAAR CONS:CADAAR CONS:CDDAAR CONS:CAADAR CONS:CDADAR CONS:CADDAR CONS:CDDDAR CONS:CAAADR CONS:CDAADR CONS:CADADR CONS:CDDADR CONS:CAADDR CONS:CDADDR CONS:CADDDR CONS:CDDDDR CONS:WRITE-STRUCTURE-HANDLES CONS:READ-STRUCTURE-HANDLES CONS:MODIFY-STRUCTURE-HANDLES CONS:STRUCTURE-HANDLE-FIRST-HEADER CONS:STRUCTURE-HANDLE-BOXED-QS CONS:WRITE-STRUCTURE-HANDLE-BOXED-QS CONS:WRITE-STRUCTURE-HANDLE-FIRST-HEADER AREA-DATA:MAKE-REGION-IN-AREA AREA-DATA:MAKE-AREA-FIXED CONS:ENDP CONS:LOAD-CONS-CACHE CONS:CONS-NEW-CLUSTER CONS:SET-DEFAULT-CONS-AREA CONS:LOAD-CONS-CACHE-FOR-AREA CONS:CONS-IN-AREA REGION-DATA:STRUCTURE-CONS-CACHE-INVALID? CONS:SET-DEFAULT-STRUCTURE-CONS-AREA CONS:LOAD-STRUCTURE-CONS-CACHE-FOR-AREA AREA-DATA:GET-ACTIVE-REGION REGION-DATA:REGION-FREE-POINTER ARRAY:%VM-READ32 ARRAY:%VM-READ ARRAY:%VM-WRITE32 ARRAY:%VM-WRITE ARRAY:AREF-1 ARRAY:ASET-QUICK ARRAY:ASET-HARD ARRAY:SVSET-DISPATCH ARRAY:AREF-QUICK ARRAY:AREF-HARD ARRAY:SVREF-DISPATCH CONS:ALLOCATE-STRUCTURE-IN-AREA ARRAY:MAKE-1D-ARRAY ARRAY:VECTOR ARRAY:UNLOCK-ARRAY ARRAY:LOCK-ARRAY ARRAY:MAKE-BIGNUM-32 ARRAY:MAKE-BIGNUM-64 ARRAY:BAD-SUBSCRIPT ARRAY:BAD-DATA ARRAY:ARRAY-TEST ARRAY:VECTORP ARRAY:SIMPLE-VECTOR-P ARRAY:SIMPLE-STRING-P ARRAY:%HARD-HEADER-P ARRAY:FILL-POINTER ARRAY:%HEADER-BOUNDS ARRAY:%STRING-LENGTH ARRAY:%FAST-STRING= ARRAY:%FAST-GET-4-CHARS ARRAY:READ-AND-LOCK-ARRAY-HEADER ARRAY:CONTROL-PDL-P SYMBOL:%SYMBOL? SYMBOL:SYMBOL? SYMBOL:%SYMBOL-PNAME SYMBOL:SYMBOL-VALUE SYMBOL:%%SET SYMBOL:%SET SYMBOL:CELL-BOUND? SYMBOL:MAKUNBOUND SYMBOL:%SET-SYMBOL-FUNCTION SYMBOL:FMAKUNBOUND SYMBOL:%FBOUNDP SYMBOL:GETF CONS:RPLACA SYMBOL:%PUTF SYMBOL:%PUT SYMBOL:SYMBOL-PLIST SYMBOL:REMPROP SYMBOL:%REMPROP SYMBOL:GET-PROPERTIES SYMBOL:%MAKE-UNBOUND ARRAY:STRINGP SYMBOL:MAKE-SYMBOL LISP-INTERNALS:STRUCTURE-REF LISP-INTERNALS:MEMBER-EQ LISP-INTERNALS:STRUCTURE-REF-WRONG-TYPE LISP-INTERNALS:STRUCTURE-SET LISP-INTERNALS:STRUCTURE-SET-WRONG-TYPE PRIMITIVES:EQ KEYWORD:TEST LISP-INTERNALS:MEMBER LISP-INTERNALS:TYPEP-STRUCTURE K2:KBUG-GET-COMM-WORD K2:KBUG-SET-COMM-WORD K2:LDB K2:KBUG-STREAM-END K2:KBUG-STREAM-BASE K2:KBUG-STREAM-ADVANCE-IN-POINTER K2:KBUG-STREAM-ADVANCE-OUT-POINTER K2:KBUG-STREAM-FLAGS K2:INITIALIZE-KBUG-STREAM K2:KBUG-STREAM-EMPTY? K2:KBUG-STREAM-NEEDS-INPUT K2:KBUG-STREAM-FULL? K2:KBUG-STREAM-NEEDS-OUTPUT K2:KBUG-STREAM-PEEK-CHARACTER K2:KBUG-STREAM-PEEK-BYTE K2:KBUG-INPUT-STREAM? K2:KBUG-STREAM-READ-BYTE K2:KBUG-OUTPUT-STREAM? K2:KBUG-STREAM-IN-POINTER K2:KBUG-STREAM-POINTER-1+ K2:KBUG-STREAM-WRITE-BYTE K2:SET-KBUG-STREAM-BASE K2:SET-KBUG-STREAM-END K2:SET-KBUG-STREAM-IN-POINTER K2:SET-KBUG-STREAM-FLAGS TRAP:DT-AND-OVF-TRAP-HANDLER-2 BOOT:COLD-BOOT-FUNCTION GC-RAM:ZERO-RAM DATATYPE-RAM:LOAD-INITIAL-DATATYPE-RAM PHYSICAL-CLUSTER-DATA:CREATE-PHYSICAL-CLUSTER-DATA-TABLE PHYSICAL-CLUSTER-DATA:INITIALIZE-PHYSICAL-CLUSTER-DATA PHYSICAL-CLUSTER-DATA:FREE-UNUSED-PHYSICAL-CLUSTERS BOOT:EVENT-HORIZON REGION-DATA:INVALIDATE-CONS-CACHE AREA-DATA:MAKE-AREA CONS:INITIALIZE-STRUCTURE-HANDLES LISP-INTERNALS:MAKE-STRUCTURE SYMBOL:%FMAKUNBOUND SYMBOL:SET-SYMBOL-PLIST BOOT:SYNTHESIZE-COLD-LOAD BOOT:NO-OPTIMIZE-CDR BOOT:WARM-START LISP-INTERNALS:FLUSH-CALL-STACK BOOT:WAIT-FOR-DEBUGGER BOOT:WRITE-BOOT-VECTOR BOOT:MAP-IN-DEBUG-AND-COMMUNICATION-ROOTS REGION-BITS:MAKE-REGION REGION-DATA:INITIALIZE-REGION-DATA BOOT:SYNTHESIZE-REGION-DATA REGION-DATA:REGION-END REGION-DATA:SET-REGION-FREE-POINTER AREA-DATA:INITIALIZE-AREA-DATA BOOT:SYNTHESIZE-AREA-DATA BOOT:ENSURE-INTERRUPTS-ARE-ON BOOT:COLD-INITIALIZE-CALL-HARDWARE BOOT:LOAD-UP-RUNTIME-GLOBAL-CONSTANTS TRAP:TRAP-RESTORE TRAP:RESET-TRAP-HANDLER TRAP:TRACE-TRAP-HANDLER TRAP:ICACHE-PARITY-TRAP-HANDLER TRAP:ICACHE-NUBUS-ERROR-TRAP-HANDLER TRAP:ICACHE-NUBUS-TIMEOUT-TRAP-HANDLER TRAP:ICACHE-MAP-FAULT-TRAP-HANDLER TRAP:ICACHE-MAP-FAULT-TRAP-HANDLER-1 TRAP:MEMORY-READ-PARITY-TRAP-HANDLER TRAP:MEMORY-READ-NUBUS-ERROR-TRAP-HANDLER TRAP:MEMORY-READ-NUBUS-TIMEOUT-TRAP-HANDLER TRAP:MEMORY-READ-TRANSPORTER-TRAP-HANDLER TRAP:TRANSPORTER-TRAP-HANDLER-RETURN-SAVED TRAP:MEMORY-WRITE-NUBUS-ERROR-TRAP-HANDLER TRAP:MEMORY-WRITE-NUBUS-TIMEOUT-TRAP-HANDLER TRAP:MEMORY-READ-PAGE-FAULT-TRAP-HANDLER TRAP:READ-PAGE-FAULT-HANDLER-RETURN-SAVED TRAP:MEMORY-WRITE-PAGE-FAULT-TRAP-HANDLER TRAP:WRITE-PAGE-FAULT-HANDLER-RETURN-SAVED TRAP:MEMORY-WRITE-GC-TRAP-HANDLER GC-FAULT:GC-FAULT-HANDLER TRAP:WRITE-GC-TRAP-HANDLER-RETURN-SAVED TRAP:FLOATING-POINT-TRAP-HANDLER TRAP:SPARE14-TRAP-HANDLER TRAP:OVERFLOW-TRAP-HANDLER TRAP:DT-AND-OVF-TRAP-HANDLER-1 TRAP:MODIFYING-EXIT TRAP:DATATYPE-TRAP-HANDLER TRAP:HEAP-EMPTY-TRAP-HANDLER LISP-INTERNALS:DUMP-CALL-HARDWARE TRAP:RESTORE-CALL-HARDWARE TRAP:HEAP-EMPTY-TRAP-HANDLER-1 TRAP:INSTRUCTION-TRAP-HANDLER TRAP:INSTRUCTION-TRAP-HANDLER-1 TRAP:SPARE11-TRAP-HANDLER TRAP:DEBUGGER-TRAP-HANDLER TRAP:INTERRUPT6-TRAP-HANDLER TRAP:INTERRUPT5-TRAP-HANDLER TRAP:IOP-TRAP-HANDLER TRAP:INTERRUPT3-TRAP-HANDLER TRAP:INTERRUPT2-TRAP-HANDLER TRAP:INTERRUPT1-TRAP-HANDLER TRAP:INTERRUPT0-TRAP-HANDLER TIMERS:HANDLE-1024-MICROSECOND-INTERRUPT TRAP:TIMER-1024-TRAP-HANDLER TIMERS:HANDLE-16384-MICROSECOND-INTERRUPT TRAP:FLUSH-OPEN-FRAME TRAP:NON-MODIFYING-EXIT TRAP:TIMER-16384-TRAP-HANDLER TRAP:SPURIOUS-TRAP-HANDLER K2:MINI-FASL-PEEK-BYTE K2:SET-KBUG-STREAM-OUT-POINTER K2:MINI-FASL-READ-OPCODE K2:MINI-FASL-PEEK-OPCODE NEW-MATH:ALLOCATE-BIGNUM CONS:RPLACD K2:MINI-FASL-READ-SIMPLE-VECTOR K2:MINI-FASL-READ-STRING-CHARACTER K2:MINI-FASL-READ-LIST K2:MINI-FASL-READ-CONS K2:MINI-FASL-READ-BIGNUM K2:MINI-FASL-READ-SIMPLE-STRING K2:MINI-FASL K2:MINI-FASL-READ-TOP-LEVEL-OBJECT K2:MINI-FASL-READ-SYMBOL LISP-INTERNALS:INTERN ARRAY:%STRING= SYMBOL:%MAKE-SYMBOL SYMBOL:SET-SYMBOL-PACKAGE K2:MINI-FASL-READ-DEFSUBST K2:MINI-FASL-READ-DEFMACRO K2:MINI-FASL-READ-DEFUN K2:MINI-FASL-READ-COLD-INFO K2:MINI-FASL-READ-16-BITS ARRAY:SVSET K2:%COMPILED-FUNCTION-HEADER K2:%SET-COMPILED-FUNCTION-HEADER K2:%COMPILED-FUNCTION-P CONS:ALLOCATE-STRUCTURE K2:%SET-COMPILED-FUNCTION-NAME K2:%SET-COMPILED-FUNCTION-ENTRY-POINTS K2:%SET-COMPILED-FUNCTION-LOCAL-REFS K2:%SET-COMPILED-FUNCTION-REFS K2:%SET-COMPILED-FUNCTION-LENGTH K2:MINI-FASL-READ-COLD-FCN-INFO K2:READ-LOCAL-REFS K2:READ-REFS K2:READ-ENTRY-POINTS K2:MAKE-COMPILED-FUNCTION K2:WARM-READ-UNBOXED-WORD SYMBOL:SET-SYMBOL-FUNCTION K2:MINI-FASL-READ-FUNCTION K2:KILL-OLD-FUNCTION K2:MINI-FASL-READ-FIXNUM K2:READ-AND-LINK-IMMEDIATES K2:LINK-FUNCTION K2:%COMPILED-FUNCTION-LOCAL-REFS K2:WRITE-BOXED-IMMEDIATE K2:%COMPILED-FUNCTION-CODE K2:DEAD-CODE-P K2:%COMPILED-FUNCTION-LENGTH K2:WRITE-INSTRUCTION K2:RELOCATE-LOCAL-REFS K2:%SET-COMPILED-FUNCTION-CODE CONS:ALLOCATE-CODE-SPACE K2:CREATE-REST-ARG-LINK K2:GET-WNA-FUNCTION-REFERENCE K2:WNA-FUNCTION K2:READ-CODE-WORD K2:WRITE-CODE-WORD K2:LINK-REFS K2:GET-UNDEFINED-FUNCTION-REFERENCE K2:UNDEFINED-FUNCTION K2:GET-ENTRY-ADDRESS K2:WRITE-CALL-ADDRESS K2:FIX-UNDEFINED-FUNCTION K2:ADDR->PC K2:GET-CALLED-FUNCTION-AND-NARGS KEYWORD:INTERNAL LISP-INTERNALS:MACRO CONS:CADDR LISP-INTERNALS:FIND-FUNCTION K2:MINI-FASL-READ-SHORT-FLOAT ARRAY:MAKE-SINGLE-FLOAT K2:MINI-FASL-READ-SINGLE-FLOAT ARRAY:MAKE-DOUBLE-FLOAT K2:MINI-FASL-READ-DOUBLE-FLOAT K2:MINI-FASL-DO-DEFCONSTANT PRIMITIVES:DEFPARAMETER K2:MINI-FASL-DO-DEFPARAMETER K2:MINI-FASL-READ-BYTE K2:MINI-FASL-READ-OBJECT-1 PRIMITIVES:DEFVAR K2:KBUG-STREAM-OUT-POINTER K2:%KBUG-STREAM-PEEK-BYTE K2:MINI-FASL-READ-SOMEONES-VALUE K2:MINI-FASL-DO-DEFVAR K2:MINI-FASL-READ-OBJECT K2:MINI-FASL-FAKE-EVAL LISP-INTERNALS:*EVALUATOR-AVAILABLE?* K2:*WARM-EVAL-LIST* LISP-INTERNALS:EVAL-SPECIAL-OK K2:EVALUATE-OR-POSTPONE K2:LIST-OF-TWO K2:LIST-OF-FOUR K2:WILL-CAUSE-EVALUATOR-BARFAGE? LISP-INTERNALS:PACKAGE-NAME ARRAY:STRING= K2:BOGUS-COMPILER-FORM? PRIMITIVES:EXPORT K2:EXPORT-FORM? PRIMITIVES:DEFMACRO K2:DEFMACRO-FORM? PRIMITIVES:DEFCONSTANT LISP-INTERNALS:MOST-NEGATIVE-FIXNUM K2:CONTAINS-BIG-NUMBER? TRANSPORTER-RAM:STORE-INTO-TRANSPORTER-RAM TRANSPORTER-RAM:MODIFY-TRANSPORTER-MODE TRANSPORTER-RAM:READ-FROM-TRANSPORTER-RAM TRANSPORTER-RAM:SET-TRANSPORTER-MODE TRANSPORTER-RAM:READ-TRANSPORTER-RAM TRANSPORTER-RAM:DECODE-TRANSPORTER-ADDRESS TRANSPORTER-RAM:READ-TRANSPORTER-RAM-DATA-FROM-MEMORY TRANSPORTER-RAM:LOAD-TRANSPORTER-RAM TRANSPORTER-RAM:WRITE-TRANSPORTER-RAM TRANSPORTER-RAM:LOAD-TRANSPORTER-RAM-PATTERN TRANSPORTER-RAM:LOAD-TRANSPORTER-RAM-DATA TRANSPORTER-RAM:TRANSPORTER-TRAP-HANDLER K2:KBUG-READ-PARAMETER-WITH-BOXED-FROM-BIT K2:FIXNUM K2:KBUG-STREAM-INITIALIZE K2:INIT-KBUG VIRTUAL-MEMORY:WRITE-MD-GENERIC K2:KBUG-TRAP-HANDLER-1 K2:TOGGLE-LED K2:MAYBE-DO-LEDS K2:GET-COMMAND-LOOP K2:GET-COMMAND LISP-INTERNALS:K-FASLOAD-INTERNAL K2:KBUG-FASL-STREAM K2:KBUG-LOAD-COLD-INFO K2:KBUG-TRAP-HANDLER-2 K2:THIS-IS-A-BREAKPOINT? K2:READ-CALL-STACK K2:READ-CALL-STACK-1 K2:READ-REG-FRAME K2:KBUG-READ-DATA-WITH-BOXED-FROM-BIT K2:WRITE-REG-FRAME K2:READ-MAP K2:READ-MEMORY K2:WRITE-MEMORY K2:WRITEABLE-ADDRESS? K2:VALID-ADDRESS? K2:GET-FUNCTION-AND-OFFSET-FROM-PC K2:%COMPILED-FUNCTION-NAME K2:KBUG-PC-TO-FUNCTION GC-RAM:READ-GC-RAM TRANSPORTER-RAM:READ-TRANSPORTER-RAM-ADDRESS K2:KBUG-COMMAND-READ-MISC GC-RAM:WRITE-GC-RAM TRANSPORTER-RAM:WRITE-TRANSPORTER-RAM-ADDRESS K2:KBUG-COMMAND-WRITE-MISC K2:SET-BOXED-BIT K2:WARM-INTERN K2:C-INTERN ARRAY:MAKE-STRING-NO-INIT ARRAY:ASET-1 K2:C-MAKE-STRING K2:KBUG-STREAM-READ-CHARACTER K2:KBUG-STREAM-TEST-ECHO K2:KBUG-STREAM-WRITE-CHARACTER SYMBOL:SYMBOL-PACKAGE K2:KBUG-PRINT-CHAR SYMBOL:SYMBOL-NAME K2:%COMPILED-FUNCTION-REFS K2:KBUG-PRINT-RETURN K2:KBUG-PRINT-STRING K2:KBUG-PRINT-SYMBOL K2:PRINT-UNDEFINED-SYMBOLS K2:*FALCON-LOWLEVEL-ROOT-REGION* K2:*FALCON-DEBUG-ROOT-CLUSTER* K2:*FALCON-COMMUNICATION-ROOT-CLUSTER* SYMBOL:BOUNDP BOOT:READ-BOOT-VECTOR SYMBOL:SET K2:INITIALIZE-DEBUG-ROOT K2:MAKE-PROCESSOR-IMAGE K2:SAVE-PROCESSOR-IMAGE K2:RESTORE-PROCESSOR-IMAGE LISP-INTERNALS:MVBIND-1 LISP-INTERNALS:MVBIND-2 LISP-INTERNALS:MVBIND-3 LISP-INTERNALS:MVBIND-4 LISP-INTERNALS:MVBIND-5 LISP-INTERNALS:MVBIND-6 LISP-INTERNALS:MVBIND-N LISP-INTERNALS:MV-LIST PRIMITIVES:VALUES-LIST LISP-INTERNALS:BIND LISP-INTERNALS:SPECIAL-PDL-OVERFLOW LISP-INTERNALS:UNBIND-1 LISP-INTERNALS:UNBIND-1V LISP-INTERNALS:UNBIND LISP-INTERNALS:UNBINDV LISP-INTERNALS:UNBIND-TO LISP-INTERNALS:UNBIND-TOV LISP-INTERNALS:DISCARD-OPEN-FRAME LISP-INTERNALS:PROG1-INTERNAL KEYWORD:ALLOW-OTHER-KEYS LISP-INTERNALS:KEYWORD-GARBAGE CONS:CADR CONS:CDDR LISP-INTERNALS:GET-KEYWORD-ARG-VALUES LISP-INTERNALS:PUT-IN-RETURN-REGISTER LISP-INTERNALS:MAKE-CONTOUR-1 LISP-INTERNALS:MAKE-CONTOUR-2 LISP-INTERNALS:MAKE-CONTOUR-3 LISP-INTERNALS:MAKE-CONTOUR-4 LISP-INTERNALS:MAKE-CONTOUR LISP-INTERNALS:SET-IN-NEW-CONTOUR LISP-INTERNALS:MAKE-CLOSURE-1 LISP-INTERNALS:MAKE-CLOSURE-2 LISP-INTERNALS:MAKE-CLOSURE-3 LISP-INTERNALS:MAKE-CLOSURE-4 ARRAY:MAKE-VECTOR LISP-INTERNALS:MAKE-CLOSURE-WITH-ENV LISP-INTERNALS:MAKE-CLOSURE LISP-INTERNALS:CLOSURE-REF-0-1 LISP-INTERNALS:CLOSURE-REF-0-2 LISP-INTERNALS:CLOSURE-REF-0-3 LISP-INTERNALS:CLOSURE-REF-0-4 LISP-INTERNALS:CLOSURE-REF-0 LISP-INTERNALS:CLOSURE-REF LISP-INTERNALS:CLOSURE-SET-0-1 LISP-INTERNALS:CLOSURE-SET-0-2 LISP-INTERNALS:CLOSURE-SET-0-3 LISP-INTERNALS:CLOSURE-SET-0-4 LISP-INTERNALS:CLOSURE-SET-0 CONS:STORE-CONTENTS-OFFSET LISP-INTERNALS:CLOSURE-SET LISP-INTERNALS:LEXICAL-CLOSURE-P K2:GET-ENTRY-ADDRESS-FOR-FUNCALL SYMBOL:FBOUNDP PRIMITIVES:FUNCALL GLOBAL:NAMED-STRUCTURE-INVOKE LISP-INTERNALS:CLOSURE-ENVIRONMENT VINCULUM:SYMBOLP SYMBOL:SYMBOL-FUNCTION LISP-INTERNALS:INTERPRETER-CLOSURE-P LISP-INTERNALS:APPLY-INTERPRETER-CLOSURE ARRAY:NAMED-STRUCTURE-P CONS:CDR ARRAY:NAMED-STRUCTURE-SYMBOL SYMBOL:GET CONS:CONS ARRAY:ARRAY-RANK CONS:CAR LISP:AREF K2:%COMPILED-FUNCTION-ENTRY-POINTS K2:RESURRECT-FUNCTION-IF-DEAD ARRAY:LENGTH LISP-INTERNALS:APPLY-ARG-SCAN LISP-INTERNALS:LIST* LISP-INTERNALS:CONS-REST SYMBOL:%SYMBOL-FUNCTION LISP-INTERNALS:APPLY-INTERNAL LISP-INTERNALS:APPLY MAP:MAP-LISP-MODE? MAP:ILLOP-IF-NOT-LISP-MAP MAP:MODIFY-L-C-MAP-SELECT MAP:LISP-MAP MAP:MAP-LISP-TRAP-BITS MAP:MAP-LISP-VALID-BIT MAP:MAP-LISP-WRITE-ENABLE-BIT MAP:MAP-LOCAL-MEMORY-BIT MAP:MAP-LOCAL-MEMORY? MAP:MAP-ON-BOARD-ADDRESS MAP:MAP-OFF-BOARD-ADDRESS MAP:MAP-CLUSTER-VOLATILITY MAP:MAP-CLUSTER-STATUS-BITS MAP:MAP-CLUSTER-FRESH-BIT MAP:CLUSTER-IS-FRESH? MAP:STATUS-S-BITS MAP:STATUS-V-WE-BITS MAP:EXTRACT-MAP-STATUS MAP:INJECT-MAP-STATUS MAP:ADDRESS-MAP MAP:AGE-VIRTUAL-CLUSTER MAP:READ-CLUSTER-VOLATILITY MAP:WRITE-CLUSTER-VOLATILITY MAP:VERIFY-MAP-STATUS MAP:PHYSICAL-BLOCK-EXISTS? MAP:WRITE-MAP-STATUS MAP:ASSOCIATE-LOCAL-MEMORY MAP:DIRECT-MAP MAP:READ-MAP-STATUS MAP:FREE-VIRTUAL-CLUSTER MAP:FLUSH-DIRECT-MAP MAP:DUMP-MAP MAP:ZERO-MAP-EXCEPTING-N-CODE-CLUSTERS NUBUS-STUFF:SLOT-AND-ADDRESS->NUBUS-CLUSTER MAP:ASSOCIATE-NUBUS-MEMORY NUBUS-STUFF:MAP-IN-K-IO-CLUSTER NUBUS-STUFF:CAUSE-NUBUS-INTERRUPT NUBUS-STUFF:ACKNOWLEDGE-NUBUS-INTERRUPT NUBUS-STUFF:CAUSE-DEBUGGER-TRAP NUBUS-STUFF:ACKNOWLEDGE-DEBUGGER-TRAP NUBUS-STUFF:MAKE-EXTERNAL-BUS-DEVICE ARRAY:ARRAY-TYPE-FROM-ELEMENT-TYPE NEW-MATH:MULTIPLY-FIXNUM LISP-INTERNALS:MEMBER-EQL KEYWORD:LEADER-LENGTH KEYWORD:NAMED-STRUCTURE-SYMBOL NUBUS-STUFF:GET-VIRTUAL-ARRAY-SIZE ARRAY:ZL-MAKE-ARRAY NUBUS-STUFF:MAKE-EXTERNAL-STRUCTURE NUBUS-STUFF:*QS-IN-CLUSTER* MAP:ASSOCIATE-CLUSTER NUBUS-STUFF:MAKE-SCREEN-BIT-ARRAY KEYWORD:ELEMENT-TYPE LISP-INTERNALS:UNSIGNED-BYTE KEYWORD:DISPLACED-TO AREA-DATA:POOR-MANS-CEILING REGION-DATA:MAKE-REGION REGION-DATA:ADVANCE-FREE-POINTER ARRAY:MAKE-ARRAY NUBUS-STUFF:MAKE-DISK-IO-BUFFER K2:BOXED-BIT VINCULUM:%FIXNUMP VINCULUM:%BIGNUMP NUBUS-STUFF:%LOCAL-MEMORY-READ NUBUS-STUFF:%LOCAL-MEMORY-WRITE NUBUS-STUFF:%CLUSTER-COPY NUBUS-STUFF:%CLUSTER-FILL NUBUS-STUFF:%BUS-READ-16 NUBUS-STUFF:%BUS-WRITE-16 NUBUS-STUFF:%SLOT-BUS-BYTE-WRITE NUBUS-STUFF:%SLOT-BUS-BYTE-READ NUBUS-STUFF:MULTIBUS-REAL-ADDRESS NUBUS-STUFF:%MULTIBUS-IO-READ-8 NUBUS-STUFF:%MULTIBUS-IO-WRITE-8 NUBUS-STUFF:%BUS-WRITE NUBUS-STUFF:%MULTIBUS-WRITE-32 NUBUS-STUFF:%BUS-READ NUBUS-STUFF:%MULTIBUS-READ-32 NUBUS-STUFF:%BUS-READ-UNSAFE NUBUS-STUFF:%BUS-BYTE-READ NUBUS-STUFF:%BUS-READ-BYTE-UNSAFE NUBUS-STUFF:%SLOT-BUS-READ NUBUS-STUFF:%BUS-QUAD-SLOT-READ-UNSAFE NUBUS-STUFF:%BUS-WRITE-UNSAFE NUBUS-STUFF:%BUS-BYTE-WRITE NUBUS-STUFF:%BUS-WRITE-BYTE-UNSAFE NUBUS-STUFF:%SLOT-BUS-WRITE NUBUS-STUFF:%BUS-QUAD-SLOT-WRITE-UNSAFE NUBUS-STUFF:LDB-TEST NUBUS-STUFF:MAP-MULTIBUS-ADDRESS HARDWARE:DPB-MULTIPLE NUBUS-STUFF:UNBOXED-32 NUBUS-STUFF:%MULTIBUS-BYTE-WRITE NUBUS-STUFF:FORMAT NUBUS-STUFF:PRINT-MULTIBUS-MAPPING-REGISTER NUBUS-STUFF:%MULTIBUS-BYTE-READ NUBUS-STUFF:MAPPING-REGISTERS-USED NUBUS-STUFF:READ-MULTIBUS-MAPPING-REGISTER NEW-MATH:ASH-GENERIC NUBUS-STUFF:DPB NUBUS-STUFF:WRITE-MULTIBUS-MAPPING-REGISTER NUBUS-STUFF:UNMAP-MULTIBUS-MAPPING-REGISTERS-POINTING-TO-SLOT VINCULUM:DISABLE-ICACHE-TRAPS VINCULUM:RESTORE-ICACHE-TRAPS VINCULUM:DISABLE-1024-INTERRUPT VINCULUM:RESTORE-1024-INTERRUPT VINCULUM:DISABLE-16384-INTERRUPT VINCULUM:RESTORE-16384-INTERRUPT VINCULUM:DISABLE-DRAM-PARITY-TRAPS VINCULUM:RESTORE-DRAM-PARITY-TRAPS VINCULUM:DISABLE-SYNCHRONOUS-TRAPS VINCULUM:RESTORE-SYNCHRONOUS-TRAPS VINCULUM:DISABLE-DATATYPE-TRAPS VINCULUM:RESTORE-DATATYPE-TRAPS VINCULUM:DISABLE-OVERFLOW-TRAPS VINCULUM:RESTORE-OVERFLOW-TRAPS VINCULUM:DISABLE-ASYNCHRONOUS-TRAPS VINCULUM:RESTORE-ASYNCHRONOUS-TRAPS VINCULUM:DISABLE-SINGLE-STEP-TRAP VINCULUM:RESTORE-SINGLE-STEP-TRAP VINCULUM:DISABLE-HEAP-UNDERFLOW-TRAPS VINCULUM:RESTORE-HEAP-UNDERFLOW-TRAPS VINCULUM:DISABLE-FLOATING-POINT-TRAPS VINCULUM:RESTORE-FLOATING-POINT-TRAPS VINCULUM:MODIFY-LEDS VINCULUM:MODIFY-LOWCORE-CACHE-ENABLE VINCULUM:MODIFY-ICACHE-ENABLES MAP-FAULT:READ-FAULT-HANDLER MAP-FAULT:READ-ILLEGAL MAP-FAULT:READ-READ-MAR MAP-FAULT:READ-AGED MAP-FAULT:READ-READ-ONLY VIRTUAL-MEMORY:VMA-START-READ-GENERIC MAP-FAULT:READ-SWAPPED-OUT MAP-FAULT:READ-DIRECT-MAPPED MAP-FAULT:READ-NORMAL MAP-FAULT:WRITE-FAULT-HANDLER MAP-FAULT:WRITE-ILLEGAL MAP-FAULT:WRITE-READ-MAR MAP-FAULT:GC-WRITE-TEST MAP-FAULT:WRITE-AGED MAP-FAULT:WRITE-DIRECT-MAPPED MAP-FAULT:WRITE-NORMAL MAP-FAULT:WRITE-READ-ONLY MAP-FAULT:WRITE-CLEAN-CLUSTER LISP-INTERNALS:FUNCALL-INTERNAL MAP-FAULT:CALL-WHILE-ALLOWING-WRITE-IN-READ-ONLY VIRTUAL-MEMORY:ASSOCIATE-TEMPORARY VIRTUAL-MEMORY:DEASSOCIATE-TEMPORARY PHYSICAL-CLUSTER-DATA:MARK-MODIFIED-IN-PCD MAP-FAULT:WRITE-REALLY-READ-ONLY MAP-FAULT:WRITE-REALLY-READ-ONLY-CLEAN VIRTUAL-MEMORY:WRITE-VMA-GENERIC VIRTUAL-MEMORY:MD-START-WRITE-GENERIC MAP-FAULT:WRITE-SWAPPED-OUT REGION-BITS:CLUSTER-REGION-BITS PHYSICAL-CLUSTER-DATA:ASSURE-FREE-PHYSICAL-CLUSTERS REGION-BITS:INITIALIZE-FRESH-CLUSTER MAP-FAULT:SWAP-IN MAP-FAULT:REGION-BITS PHYSICAL-CLUSTER-DATA:ALLOCATE-PHYSICAL-CLUSTER MAP:WRITE-MAP PHYSICAL-CLUSTER-DATA:ASSOCIATE-CLUSTER LISP-INTERNALS:BEGIN-READ LISP-INTERNALS:NEXT-READ-CLUSTER LISP-INTERNALS:DO-THE-READ LISP-INTERNALS:*PAGING-DEVICES* LISP-INTERNALS:*BOOT-BAND-PAGING-DEVICE-ID* LISP-INTERNALS:*PAGE-BAND-PAGING-DEVICE-ID* ARRAY:SVREF SYMBOL:%SYMBOL-VALUE MAP-FAULT:PAGE-OUT-PAGE-AND-CHANGE-DEVICE-FOR-QUANTUM LISP-INTERNALS:BEGIN-WRITE LISP-INTERNALS:NEXT-WRITE-CLUSTER LISP-INTERNALS:DO-THE-WRITE LISP-INTERNALS:ALLOCATE-QUANTUM MAP:FREE-SWAPPED-OUT-VIRTUAL-CLUSTER PHYSICAL-CLUSTER-DATA:FREE-PHYSICAL-CLUSTER MAP-FAULT:SWAP-OUT-INTERNAL VIRTUAL-MEMORY:SYSTEM-TABLE-REF VIRTUAL-MEMORY:SYSTEM-TABLE-STORE MAP-FAULT:SWAPIN-CLUSTER-AND-WIRE-IT K2:PC->ADDR MAP:READ-MAP VINCULUM:FLUSH-ICACHE MAP-FAULT:ICACHE-MAP-FAULT-HANDLER MAP-FAULT:ICACHE-ERROR MAP:TOUCH-AGED PHYSICAL-CLUSTER-DATA:REJUVENATE-CLUSTER MAP-FAULT:ICACHE-AGED MAP:FRESH-CLUSTER? TRAP:ILLOP-FUNCTION MAP-FAULT:SWAP-IN-INTERNAL MAP-FAULT:ICACHE-SWAPPED-OUT LISP-INTERNALS:ERROR TRAP:TRAP-ON LISP-INTERNALS:BREAK LISP:T))
nil)

()