
(COMMON-LISP::IN-PACKAGE "SYSTEM") 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION (COMMON-LISP::*) COMMON-LISP::T)
         COMMON-LISP::YES-OR-NO-P SYSTEM::GPROF-START
         SYSTEM::BREAK-LOCALS ANSI-LOOP::MAKE-LOOP-UNIVERSE
         SYSTEM::MAKE-CONTEXT SYSTEM::MAYBE-CLEAR-INPUT
         COMMON-LISP::Y-OR-N-P SLOOP::PARSE-LOOP-DECLARE
         SYSTEM::STEP-INTO SYSTEM::STEP-NEXT
         COMMON-LISP::USER-HOMEDIR-PATHNAME COMMON-LISP::ABORT
         SYSTEM::MAKE-INSTREAM COMMON-LISP::COMPUTE-RESTARTS
         SYSTEM::LOC SYSTEM::NEXT-MATCH SLOOP::PARSE-LOOP-WITH
         ANSI-LOOP::LOOP-GENTEMP SYSTEM::CURRENT-STEP-FUN
         COMMON-LISP::BREAK ANSI-LOOP::MAKE-LOOP-COLLECTOR
         SYSTEM::MAKE-RESTART COMMON-LISP::MAKE-PATHNAME
         ANSI-LOOP::MAKE-STANDARD-LOOP-UNIVERSE SYSTEM::MAKE-S-DATA
         SYSTEM::GPROF-QUIT SYSTEM::TRANSFORM-KEYWORDS
         COMMON-LISP::DRIBBLE SYSTEM::DESCRIBE-ENVIRONMENT
         COMMON-LISP::VECTOR SYSTEM::DBL-READ
         ANSI-LOOP::MAKE-LOOP-MINIMAX-INTERNAL
         ANSI-LOOP::MAKE-LOOP-PATH
         ANSI-LOOP::LOOP-DISALLOW-CONDITIONAL)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION (COMMON-LISP::T) COMMON-LISP::*)
         SYSTEM::BREAK-GO SYSTEM::END-WAITING ANSI-LOOP::NAMED-VARIABLE
         ANSI-LOOP::LOOP-OPTIMIZATION-QUANTITIES SYSTEM::INSPECT-OBJECT
         SYSTEM::GET-&ENVIRONMENT SYSTEM::BREAK-LEVEL-INVOKE-RESTART
         COMMON-LISP::INSPECT SYSTEM::DO-F COMMON-LISP::DESCRIBE
         SYSTEM::WAITING SYSTEM::FIND-DECLARATIONS
         COMMON-LISP::PRIN1-TO-STRING ANSI-LOOP::LOOP-LIST-STEP
         SYSTEM::REWRITE-RESTART-CASE-CLAUSE SYSTEM::EXPAND-RANGES
         SYSTEM::PARSE-BODY-HEADER
         COMMON-LISP::INVOKE-RESTART-INTERACTIVELY SYSTEM::INFO-SUBFILE
         COMMON-LISP::PRINC-TO-STRING SYSTEM::INSTREAM-NAME)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             ((COMMON-LISP::INTEGER -9223372036854775808
                  9223372036854775807)
              COMMON-LISP::T)
             COMMON-LISP::T)
         SYSTEM::SMALLNTHCDR)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             (COMMON-LISP::T
                 (COMMON-LISP::INTEGER -9223372036854775808
                     9223372036854775807)
                 (COMMON-LISP::INTEGER -9223372036854775808
                     9223372036854775807)
                 COMMON-LISP::T COMMON-LISP::T)
             COMMON-LISP::T)
         SYSTEM::QUICK-SORT)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             (COMMON-LISP::T
                 (COMMON-LISP::INTEGER -9223372036854775808
                     9223372036854775807)
                 COMMON-LISP::T COMMON-LISP::T)
             COMMON-LISP::T)
         SYSTEM::BIGNTHCDR)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION COMMON-LISP::NIL COMMON-LISP::T)
         ANSI-LOOP::LOOP-DO-RETURN SLOOP::PARSE-LOOP-COLLECT
         SYSTEM::READ-EVALUATED-FORM SYSTEM::INSPECT-INDENT-1
         SLOOP::PARSE-LOOP-WHEN SYSTEM::TEST-ERROR SLOOP::LOOP-POP
         SYSTEM::DM-TOO-FEW-ARGUMENTS SYSTEM::INSPECT-READ-LINE
         SYSTEM::GET-SIG-FN-NAME SLOOP::LOOP-PEEK
         COMMON-LISP::TYPE-ERROR SYSTEM::SET-UP-TOP-LEVEL
         ANSI-LOOP::LOOP-DO-REPEAT ANSI-LOOP::LOOP-GET-PROGN
         SYSTEM::GET-TEMP-DIR SLOOP::PARSE-LOOP1 SYSTEM::SHOW-RESTARTS
         SYSTEM::KCL-TOP-RESTARTS
         COMMON-LISP::LISP-IMPLEMENTATION-VERSION SYSTEM::SET-ENV
         SLOOP::PARSE-ONE-WHEN-CLAUSE SYSTEM::GET-INDEX-NODE
         ANSI-LOOP::LOOP-DO-INITIALLY SYSTEM::INSPECT-INDENT
         ANSI-LOOP::LOOP-BIND-BLOCK ANSI-LOOP::LOOP-WHEN-IT-VARIABLE
         SYSTEM::INIT-BREAK-POINTS SYSTEM::DEFAULT-INFO-HOTLIST
         SYSTEM::ILLEGAL-BOA ANSI-LOOP::LOOP-DO-FINALLY
         ANSI-LOOP::LOOP-GET-FORM SYSTEM::CURRENT-DIRECTORY-PATHNAME
         ANSI-LOOP::LOOP-ITERATION-DRIVER ANSI-LOOP::LOOP-DO-WITH
         SLOOP::PARSE-LOOP-FOR SLOOP::LOOP-UN-POP
         ANSI-LOOP::LOOP-CONTEXT SYSTEM::DBL ANSI-LOOP::LOOP-DO-DO
         SYSTEM::CLEANUP SYSTEM::DEFAULT-SYSTEM-BANNER
         SYSTEM::STEP-READ-LINE SYSTEM::ALL-TRACE-DECLARATIONS
         SLOOP::PARSE-LOOP-DO SYSTEM::SET-CURRENT
         SYSTEM::DM-TOO-MANY-ARGUMENTS ANSI-LOOP::LOOP-DO-NAMED
         ANSI-LOOP::LOOP-POP-SOURCE SYSTEM::SETUP-LINEINFO
         SYSTEM::TOP-LEVEL)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION (COMMON-LISP::T COMMON-LISP::T)
             COMMON-LISP::T)
         COMMON-LISP::LOGORC2 COMMON-LISP::WITH-PACKAGE-ITERATOR
         ANSI-LOOP::LOOP-DO-WHILE SLOOP::THEREIS-SLOOP-COLLECT
         SYSTEM::ADD-FILE SLOOP::IN-CAREFULLY-SLOOP-FOR
         SLOOP::IN-PACKAGE-SLOOP-MAP SYSTEM::MV-SETQ SYSTEM::IF-ERROR
         SYSTEM::WITHOUT-INTERRUPTS SYSTEM::DM-NTH COMMON-LISP::CASE
         ANSI-LOOP::LOOP-ACCUMULATE-MINIMAX-VALUE
         COMMON-LISP::DEFINE-MODIFY-MACRO SLOOP::COUNT-SLOOP-COLLECT
         SYSTEM::GET-MATCH COMMON-LISP::SHIFTF SYSTEM::*BREAK-POINTS*
         COMMON-LISP::RETURN COMMON-LISP::LDB
         COMMON-LISP::WITH-SIMPLE-RESTART COMMON-LISP::LOGORC1
         COMMON-LISP::MULTIPLE-VALUE-BIND FPE::RF
         COMMON-LISP::WITH-STANDARD-IO-SYNTAX
         SLOOP::MINIMIZE-SLOOP-COLLECT SYSTEM::DEFINE-SETF-METHOD
         COMMON-LISP::ECASE COMMON-LISP::DOTIMES
         SLOOP::DEF-LOOP-COLLECT COMMON-LISP::PROG1
         ANSI-LOOP::LOOP-LOOKUP-KEYWORD SYSTEM::SET-BACK
         COMMON-LISP::LDB-TEST SYSTEM::OBJLT SLOOP::NEVER-SLOOP-COLLECT
         COMMON-LISP::VECTOR-PUSH SYSTEM::DBL-UP COMMON-LISP::ASSERT
         SYSTEM::MSUB ANSI-LOOP::LOOP-BODY SYSTEM::COERCE-TO-STRING
         SYSTEM::GET-INFO-CHOICES SLOOP::IN-FRINGE-SLOOP-MAP
         COMMON-LISP::PSETF SYSTEM::ALL-MATCHES COMMON-LISP::DO
         ANSI-LOOP::MAKE-LOOP-MINIMAX SYSTEM::PARSE-SLOT-DESCRIPTION
         SYSTEM::SET-PATH-STREAM-NAME COMMON-LISP::LOOP-FINISH
         COMMON-LISP::NTHCDR COMMON-LISP::DO-ALL-SYMBOLS SYSTEM::SGEN
         SYSTEM::PUT-AUX COMMON-LISP::CCASE SYSTEM::DM-V
         COMMON-LISP::LOCALLY SLOOP::ALWAYS-SLOOP-COLLECT
         COMMON-LISP::LAMBDA COMMON-LISP::DEFMACRO
         ANSI-LOOP::LOOP-TMEMBER COMMON-LISP::WITH-OPEN-STREAM
         SLOOP::MAXIMIZE-SLOOP-COLLECT SLOOP::DESETQ1
         COMMON-LISP::TRACE SYSTEM::CHECK-SEQ-START-END
         COMMON-LISP::DEFTYPE SLOOP::MAKE-VALUE COMMON-LISP::TYPECASE
         ANSI-LOOP::LOOP-TEQUAL ANSI-LOOP::LOOP-DO-ALWAYS
         ANSI-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD SYSTEM::INFO-AUX
         COMMON-LISP::WITH-OPEN-FILE COMMON-LISP::PROG2
         COMMON-LISP::DEFSTRUCT SLOOP::DESETQ SYSTEM::QUOTATION-READER
         SYSTEM::DM-NTH-CDR SYSTEM::MATCH-DIMENSIONS COMMON-LISP::BYTE
         FPE::READ-OPERANDS COMMON-LISP::TIME COMMON-LISP::COND
         COMMON-LISP::DO-EXTERNAL-SYMBOLS
         COMMON-LISP::WITH-HASH-TABLE-ITERATOR
         COMMON-LISP::MULTIPLE-VALUE-SETQ COMMON-LISP::DEFCONSTANT
         ANSI-LOOP::LOOP-DECLARE-VARIABLE COMMON-LISP::LOGNOR
         ANSI-LOOP::LOOP-COLLECT-ANSWER COMMON-LISP::DEFVAR
         SYSTEM::SETF-LOGICAL-PATHNAME-TRANSLATIONS
         SYSTEM::LOOKUP-KEYWORD SYSTEM::SEQUENCE-CURSOR
         SLOOP::LOGXOR-SLOOP-COLLECT FPE::%-READER SLOOP::DEF-LOOP-FOR
         COMMON-LISP::PSETQ SLOOP::COLLATE-SLOOP-COLLECT
         SLOOP::PARSE-LOOP-MAP COMMON-LISP::NTH SYSTEM::SUBSTRINGP
         SYSTEM::GET-NODES SYSTEM::COERCE-TO-PACKAGE
         COMMON-LISP::PATHNAME-MATCH-P
         ANSI-LOOP::HIDE-VARIABLE-REFERENCES
         SYSTEM::OVERWRITE-SLOT-DESCRIPTIONS ANSI-LOOP::LOOP-DO-IF
         SYSTEM::INSPECT-PRINT SYSTEM::DOT-DIR-P SYSTEM::SETF-HELPER
         COMMON-LISP::ROTATEF COMMON-LISP::FILE-STRING-LENGTH
         COMMON-LISP::POP COMMON-LISP::DO-SYMBOLS
         ANSI-LOOP::LOOP-MAYBE-BIND-FORM
         COMMON-LISP::WITH-INPUT-FROM-STRING COMMON-LISP::PROG
         SLOOP::=-SLOOP-FOR ANSI-LOOP::LOOP-COLLECT-RPLACD
         COMMON-LISP::DOLIST SYSTEM::SET-DIR COMMON-LISP::WHEN
         FPE::READ-INSTRUCTION SYSTEM::ITERATE-OVER-BKPTS
         COMMON-LISP::OR COMMON-LISP::DEFPACKAGE COMMON-LISP::UNTRACE
         COMMON-LISP::ETYPECASE COMMON-LISP::DO* COMMON-LISP::LOGTEST
         SYSTEM::IN-INTERVAL-P SYSTEM::LEFT-PARENTHESIS-READER
         SLOOP::DEF-LOOP-MACRO SLOOP::SLOOP SLOOP::L-EQUAL
         SYSTEM::BREAK-STEP-NEXT COMMON-LISP::COERCE
         SYSTEM::GPROF-OUTPUT SLOOP::SUM-SLOOP-COLLECT
         COMMON-LISP::REMF ANSI-LOOP::LOOP-NOTE-MINIMAX-OPERATION
         SLOOP::LOCAL-FINISH COMMON-LISP::CHECK-TYPE
         ANSI-LOOP::LOOP-COPYLIST* COMMON-LISP::WITH-OUTPUT-TO-STRING
         SYSTEM::CONDITION-PASS SLOOP::DEF-LOOP-MAP
         COMMON-LISP::DOCUMENTATION COMMON-LISP::DECF
         COMMON-LISP::WRITE-BYTE COMMON-LISP::WITH-CONDITION-RESTARTS
         SYSTEM::INSPECT-RECURSIVELY COMMON-LISP::PUSH
         COMMON-LISP::MULTIPLE-VALUE-LIST
         ANSI-LOOP::LOOP-STORE-TABLE-DATA SYSTEM::DISPLAY-ENV
         SYSTEM::LIST-DELQ COMPILER::COMPILER-DEF-HOOK
         SLOOP::LOOP-RETURN COMMON-LISP::PROG* SYSTEM::TP-ERROR
         SYSTEM::LIST-TOGGLE-CASE COMMON-LISP::DECLAIM
         SYSTEM::SAFE-EVAL COMMON-LISP::DEFSETF COMMON-LISP::LOGANDC1
         SYSTEM::SUPER-GO COMMON-LISP::LOGNAND SYSTEM::WHILE
         SYSTEM::DISPLAY-COMPILED-ENV COMMON-LISP::AND
         COMMON-LISP::PUSHNEW SYSTEM::INCREMENT-CURSOR
         COMMON-LISP::INCF COMMON-LISP::NTH-VALUE FPE::0-READER
         COMMON-LISP::DEFPARAMETER SYSTEM::?PUSH SYSTEM::NODE
         FPE::PAREN-READER SLOOP::THE-TYPE COMMON-LISP::UNLESS
         ANSI-LOOP::LOOP-TASSOC COMMON-LISP::LOOP
         SYSTEM::GET-LINE-OF-FORM SLOOP::IN-TABLE-SLOOP-MAP
         COMMON-LISP::RESTART-BIND SYSTEM::CHECK-TYPE-EVAL
         COMMON-LISP::LOGANDC2 COMMON-LISP::STEP
         SYSTEM::KEYWORD-SUPPLIED-P SLOOP::SLOOP-FINISH SLOOP::LCASE
         ANSI-LOOP::WITH-MINIMAX-VALUE COMMON-LISP::DEFUN
         COMMON-LISP::CTYPECASE COMMON-LISP::RESTART-CASE
         SYSTEM::BREAK-STEP-INTO SLOOP::SLOOP-SWAP
         COMMON-LISP::DESTRUCTURING-BIND SYSTEM::SUB-INTERVAL-P
         SYSTEM::MV-VALUES COMMON-LISP::WITH-COMPILATION-UNIT
         SYSTEM::SETF-EXPAND)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION (COMMON-LISP::T COMMON-LISP::*)
             COMMON-LISP::*)
         COMMON-LISP::FCEILING COMMON-LISP::WRITE-TO-STRING
         COMMON-LISP::USE-VALUE COMMON-LISP::INVOKE-RESTART
         COMMON-LISP::FROUND COMMON-LISP::ENSURE-DIRECTORIES-EXIST
         COMMON-LISP::DECODE-UNIVERSAL-TIME SYSTEM::SHOW-INFO
         SYSTEM::GET-SETF-METHOD-MULTIPLE-VALUE
         COMMON-LISP::STORE-VALUE COMMON-LISP::PARSE-NAMESTRING
         SYSTEM::BREAK-FUNCTION SYSTEM::INFO COMMON-LISP::APROPOS
         COMMON-LISP::APROPOS-LIST
         ANSI-LOOP::LOOP-CONSTANT-FOLD-IF-POSSIBLE
         COMMON-LISP::READ-FROM-STRING COMMON-LISP::FFLOOR
         SYSTEM::STEPPER COMMON-LISP::FTRUNCATE
         COMMON-LISP::GET-SETF-EXPANSION SYSTEM::APROPOS-DOC
         SYSTEM::PRINT-DOC)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             ((COMMON-LISP::VECTOR COMMON-LISP::CHARACTER
                  COMMON-LISP::*)
              (COMMON-LISP::INTEGER -9223372036854775808
                  9223372036854775807))
             COMMON-LISP::FIXNUM)
         SYSTEM::ATOI)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION (COMMON-LISP::T COMMON-LISP::T)
             COMMON-LISP::FIXNUM)
         SYSTEM::RELATIVE-LINE ANSI-LOOP::DUPLICATABLE-CODE-P
         SYSTEM::FASLINK SYSTEM::LENEL SYSTEM::THE-END
         SYSTEM::GET-NODE-INDEX)) 
(COMMON-LISP::MAPC
    (COMMON-LISP::LAMBDA (COMPILER::X)
      (COMMON-LISP::SETF
          (COMMON-LISP::GET COMPILER::X 'COMPILER::PROCLAIMED-CLOSURE)
          COMMON-LISP::T))
    '(SYSTEM::CONDITIONP SYSTEM::TRACE-ONE SYSTEM::SI-FIND-CLASS
         SYSTEM::SI-CLASS-OF SYSTEM::CONDITION-CLASS-P
         FPE::BREAK-ON-FLOATING-POINT-EXCEPTIONS
         SYSTEM::SI-CLASS-PRECEDENCE-LIST SYSTEM::AUTOLOAD
         SYSTEM::UNTRACE-ONE SYSTEM::MAKE-ACCESS-FUNCTION
         SYSTEM::SI-CLASSP SYSTEM::AUTOLOAD-MACRO SYSTEM::WARNINGP
         SYSTEM::SI-CLASS-NAME SYSTEM::SIMPLE-CONDITION-CLASS-P
         SYSTEM::RECORD-FN SYSTEM::DEFINE-STRUCTURE)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             (COMMON-LISP::T COMMON-LISP::T COMMON-LISP::*)
             COMMON-LISP::*)
         SLOOP::FIND-IN-ORDERED-LIST COMMON-LISP::STABLE-SORT
         COMMON-LISP::SUBTYPEP SYSTEM::PARSE-BODY COMMON-LISP::REDUCE
         COMMON-LISP::SORT)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             (COMMON-LISP::T COMMON-LISP::T COMMON-LISP::T
                 COMMON-LISP::*)
             COMMON-LISP::*)
         COMMON-LISP::SUBST-IF COMMON-LISP::SUBST-IF-NOT
         COMMON-LISP::SUBST SYSTEM::MASET)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             (COMMON-LISP::T COMMON-LISP::T COMMON-LISP::T
                 COMMON-LISP::T COMMON-LISP::T COMMON-LISP::*)
             COMMON-LISP::*)
         SYSTEM::PARSE-DEFMACRO-LAMBDA-LIST SYSTEM::PARSE-DEFMACRO)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             (COMMON-LISP::T COMMON-LISP::T COMMON-LISP::T)
             COMMON-LISP::*)
         SYSTEM::SHARP---READER SYSTEM::LIST-MERGE-SORT
         SYSTEM::RESTART-PRINT ANSI-LOOP::LOOP-GET-COLLECTION-INFO
         SYSTEM::VERIFY-KEYWORDS SYSTEM::SHARP-+-READER
         SYSTEM::READ-INSPECT-COMMAND SYSTEM::SHARP-S-READER)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             (COMMON-LISP::T COMMON-LISP::T COMMON-LISP::T
                 COMMON-LISP::T COMMON-LISP::T COMMON-LISP::T
                 COMMON-LISP::T)
             COMMON-LISP::*)
         SYSTEM::TRACE-CALL)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             (COMMON-LISP::T COMMON-LISP::T COMMON-LISP::T
                 COMMON-LISP::T COMMON-LISP::T COMMON-LISP::T
                 COMMON-LISP::T COMMON-LISP::T)
             COMMON-LISP::*)
         SYSTEM::PUSH-OPTIONAL-BINDING)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             ((COMMON-LISP::VECTOR COMMON-LISP::CHARACTER
                  COMMON-LISP::*))
             COMMON-LISP::T)
         SYSTEM::RESET-SYS-PATHS)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION (COMMON-LISP::T)
             (COMMON-LISP::VECTOR COMMON-LISP::T))
         SYSTEM::CONTEXT-VEC)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION (COMMON-LISP::T COMMON-LISP::*)
             COMMON-LISP::T)
         COMMON-LISP::MAKE-STRING-INPUT-STREAM SYSTEM::FILE-TO-STRING
         SYSTEM::LINK-EXPAND COMMON-LISP::UPGRADED-ARRAY-ELEMENT-TYPE
         COMMON-LISP::DELETE-DUPLICATES COMMON-LISP::PATHNAME-HOST
         COMMON-LISP::ARRAY-ROW-MAJOR-INDEX SYSTEM::BAD-SEQ-LIMIT
         SYSTEM::LOGICAL-PATHNAME-PARSE COMMON-LISP::OPEN
         SYSTEM::BREAK-LEVEL COMMON-LISP::DIRECTORY
         SLOOP::LOOP-ADD-TEMPS SYSTEM::DIR-PARSE
         COMMON-LISP::TRANSLATE-LOGICAL-PATHNAME SYSTEM::MGSUB
         COMMON-LISP::MERGE-PATHNAMES SYSTEM::MGLIST
         SYSTEM::FILE-SEARCH SYSTEM::PROCESS-SOME-ARGS
         COMMON-LISP::ARRAY-IN-BOUNDS-P COMMON-LISP::SBIT
         COMMON-LISP::FILE-POSITION COMMON-LISP::PATHNAME-VERSION
         COMMON-LISP::PATHNAME-DIRECTORY COMMON-LISP::PATHNAME-DEVICE
         SYSTEM::NLOAD COMMON-LISP::WARN COMMON-LISP::ENOUGH-NAMESTRING
         SYSTEM::NTH-STACK-FRAME
         ANSI-LOOP::LOOP-COLLECT-PREPOSITIONAL-PHRASES COMMON-LISP::BIT
         COMMON-LISP::WILD-PATHNAME-P COMMON-LISP::READ-BYTE
         COMMON-LISP::BIT-NOT COMMON-LISP::REQUIRE
         ANSI-LOOP::LOOP-ERROR ANSI-LOOP::LOOP-WARN
         COMMON-LISP::PATHNAME-NAME COMMON-LISP::MAKE-ARRAY
         COMMON-LISP::REMOVE-DUPLICATES SYSTEM::INFO-SEARCH
         SLOOP::ADD-FROM-DATA SYSTEM::TO-REGEXP COMMON-LISP::LOAD
         COMMON-LISP::SIGNAL COMMON-LISP::PATHNAME-TYPE
         COMMON-LISP::FIND-RESTART SYSTEM::LIST-MATCHES
         COMMON-LISP::CONCATENATE COMMON-LISP::ERROR)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION (COMMON-LISP::T COMMON-LISP::T)
             COMMON-LISP::*)
         SYSTEM::FIND-DOC COMMON-LISP::RENAME-FILE SYSTEM::DO-REPL
         SYSTEM::RESTART-REPORT ANSI-LOOP::ESTIMATE-CODE-SIZE
         ANSI-LOOP::LOOP-REALLY-DESETQ ANSI-LOOP::ESTIMATE-CODE-SIZE-1
         SYSTEM::NEW-SEMI-COLON-READER SYSTEM::SOURCE-PORTION
         SYSTEM::NEWLINE)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION COMMON-LISP::NIL COMMON-LISP::*)
         SYSTEM::BREAK-MESSAGE SYSTEM::GCL-TOP-LEVEL
         SYSTEM::SIMPLE-BACKTRACE SYSTEM::BREAK-RESUME
         ANSI-LOOP::LOOP-DO-FOR SYSTEM::BREAK-CURRENT
         SYSTEM::BREAK-HELP)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             ((COMMON-LISP::INTEGER -9223372036854775808
                  9223372036854775807)
              (COMMON-LISP::INTEGER -9223372036854775808
                  9223372036854775807))
             COMMON-LISP::FIXNUM)
         SYSTEM::ROUND-UP)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             ((COMMON-LISP::INTEGER -9223372036854775808
                  9223372036854775807))
             COMMON-LISP::FIXNUM)
         SYSTEM::DBL-WHAT-FRAME FPE::FE-ENABLE)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION (COMMON-LISP::T)
             (COMMON-LISP::OR COMMON-LISP::NULL
                 COMMON-LISP::HASH-TABLE))
         SYSTEM::CONTEXT-HASH)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION (COMMON-LISP::T)
             COMMON-LISP::HASH-TABLE)
         SYSTEM::CONTEXT-SPICE)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             ((COMMON-LISP::INTEGER -9223372036854775808
                  9223372036854775807))
             COMMON-LISP::T)
         SYSTEM::GET-CONTEXT SYSTEM::PUSH-CONTEXT)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             (COMMON-LISP::T COMMON-LISP::T COMMON-LISP::T
                 COMMON-LISP::T)
             COMMON-LISP::T)
         SYSTEM::EXPAND-RANGE SYSTEM::SETF-STRUCTURE-ACCESS
         SYSTEM::MME3 SYSTEM::FIND-LINE-IN-FUN SYSTEM::LOAD-PATHNAME
         SYSTEM::MINMAX SYSTEM::ELSUB SYSTEM::COERCE-TO-CONDITION
         SYSTEM::DO-BREAK-LEVEL ANSI-LOOP::LOOP-FOR-ARITHMETIC
         SLOOP::FIRST-USE-SLOOP-FOR SYSTEM::CALL-TEST
         SLOOP::FIRST-SLOOP-FOR SYSTEM::MAYBE-BREAK)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             (COMMON-LISP::T COMMON-LISP::T COMMON-LISP::T
                 COMMON-LISP::*)
             COMMON-LISP::T)
         SYSTEM::WALK-DIR SYSTEM::PUSH-LET-BINDING SYSTEM::MME2
         ANSI-LOOP::LOOP-PACKAGE-SYMBOLS-ITERATION-PATH
         COMMON-LISP::SUBSTITUTE-IF-NOT
         ANSI-LOOP::LOOP-SEQUENCE-ELEMENTS-PATH SYSTEM::MATCH-COMPONENT
         SYSTEM::COMPLETE-PROP COMMON-LISP::NSUBSTITUTE-IF-NOT
         COMMON-LISP::SUBSTITUTE-IF COMMON-LISP::NSUBSTITUTE
         ANSI-LOOP::LOOP-HASH-TABLE-ITERATION-PATH
         SYSTEM::CHECK-TYPE-SYMBOL COMMON-LISP::MAP
         COMMON-LISP::TRANSLATE-PATHNAME COMMON-LISP::SUBSTITUTE
         ANSI-LOOP::ADD-LOOP-PATH ANSI-LOOP::LOOP-MAKE-VARIABLE
         SLOOP::LOOP-DECLARE-BINDING COMMON-LISP::NSUBSTITUTE-IF)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             (COMMON-LISP::T COMMON-LISP::T COMMON-LISP::T)
             COMMON-LISP::T)
         SYSTEM::SHARP-V-READER COMMON-LISP::DEPOSIT-FIELD
         ANSI-LOOP::LOOP-FOR-ON SYSTEM::SETF-EXPAND-1
         SYSTEM::SHARP-DQ-READER SYSTEM::CHECK-TRACE-ARGS
         SYSTEM::PROG?* SLOOP::LOOP-PARSE-ADDITIONAL-COLLECTIONS
         ANSI-LOOP::PRINT-LOOP-UNIVERSE ANSI-LOOP::LOOP-FOR-IN
         SYSTEM::CHECK-S-DATA SYSTEM::WARN-VERSION
         ANSI-LOOP::LOOP-MAKE-ITERATION-VARIABLE SYSTEM::DEFMACRO*
         ANSI-LOOP::LOOP-SUM-COLLECTION SYSTEM::PATHNAME-PARSE
         SYSTEM::GET-SLOT-POS SYSTEM::MAKE-T-TYPE
         SYSTEM::SHARP-A-READER
         SYSTEM::RESTART-CASE-EXPRESSION-CONDITION SYSTEM::RECURSE-DIR
         SYSTEM::SHARP-U-READER SYSTEM::APPLY-DISPLAY-FUN SYSTEM::DM-VL
         ANSI-LOOP::HIDE-VARIABLE-REFERENCE SYSTEM::MAKE-BREAK-POINT
         SYSTEM::TO-REGEXP-OR-NAMESTRING ANSI-LOOP::LOOP-FOR-BEING
         SYSTEM::FLOATING-POINT-ERROR SYSTEM::SHARP-P-READER
         ANSI-LOOP::LOOP-TRANSLATE COMMON-LISP::DPB
         ANSI-LOOP::LOOP-FOR-ACROSS FPE::REF SYSTEM::WRITE-SYMTAB
         ANSI-LOOP::LOOP-STANDARD-EXPANSION
         ANSI-LOOP::LOOP-ANSI-FOR-EQUALS)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             (COMMON-LISP::T COMMON-LISP::T COMMON-LISP::T
                 COMMON-LISP::T COMMON-LISP::T)
             COMMON-LISP::T)
         SYSTEM::DO?* SYSTEM::MAKE-PREDICATE SYSTEM::MAKE-CONSTRUCTOR)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             (COMMON-LISP::T COMMON-LISP::T COMMON-LISP::*)
             COMMON-LISP::T)
         COMMON-LISP::NSET-DIFFERENCE COMMON-LISP::COUNT-IF
         COMMON-LISP::FIND-IF-NOT SYSTEM::INTERNAL-COUNT-IF
         COMMON-LISP::INTERSECTION COMMON-LISP::REMOVE-IF-NOT
         SYSTEM::VECTOR-PUSH-STRING COMMON-LISP::EVERY
         COMMON-LISP::POSITION COMMON-LISP::POSITION-IF-NOT
         SYSTEM::FIND-IHS SYSTEM::INTERNAL-COUNT COMMON-LISP::BIT-ANDC2
         COMMON-LISP::DELETE-IF-NOT COMMON-LISP::BIT-ANDC1
         COMMON-LISP::UNION COMMON-LISP::NSET-EXCLUSIVE-OR
         COMMON-LISP::BIT-XOR SYSTEM::WREADDIR COMMON-LISP::MISMATCH
         COMMON-LISP::FIND-IF COMMON-LISP::BIT-ORC1
         COMMON-LISP::MAKE-SEQUENCE COMMON-LISP::REMOVE
         COMMON-LISP::COUNT COMMON-LISP::BIT-NOR COMMON-LISP::MAP-INTO
         COMMON-LISP::NOTEVERY SLOOP::PARSE-LOOP-MACRO
         COMMON-LISP::FIND COMMON-LISP::BIT-AND COMMON-LISP::CERROR
         ANSI-LOOP::LOOP-CHECK-DATA-TYPE COMMON-LISP::READ-SEQUENCE
         COMMON-LISP::BIT-ORC2 COMMON-LISP::FILL COMMON-LISP::SOME
         COMMON-LISP::NUNION SYSTEM::INTERNAL-COUNT-IF-NOT
         COMMON-LISP::VECTOR-PUSH-EXTEND COMMON-LISP::REPLACE
         SLOOP::LOOP-ADD-BINDING COMMON-LISP::NOTANY
         COMMON-LISP::SET-EXCLUSIVE-OR COMMON-LISP::ADJUST-ARRAY
         COMMON-LISP::SET-DIFFERENCE COMMON-LISP::BIT-NAND
         COMMON-LISP::DELETE COMMON-LISP::POSITION-IF
         COMMON-LISP::SUBSETP COMMON-LISP::DELETE-IF SYSTEM::BREAK-CALL
         COMMON-LISP::REMOVE-IF COMMON-LISP::WRITE-SEQUENCE
         COMMON-LISP::BIT-IOR SLOOP::IN-ARRAY-SLOOP-FOR
         COMMON-LISP::SEARCH COMMON-LISP::COUNT-IF-NOT
         COMMON-LISP::TYPEP COMMON-LISP::NINTERSECTION
         COMMON-LISP::BIT-EQV SYSTEM::PROCESS-ERROR)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             (COMMON-LISP::T COMMON-LISP::T COMMON-LISP::T
                 COMMON-LISP::T COMMON-LISP::*)
             COMMON-LISP::T)
         SYSTEM::PRINT-STACK-FRAME COMMON-LISP::MERGE
         SYSTEM::EXPAND-WILD-DIRECTORY SLOOP::DEF-LOOP-INTERNAL
         SYSTEM::ELEMENT)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             (COMMON-LISP::T COMMON-LISP::T
                 (COMMON-LISP::INTEGER -9223372036854775808
                     9223372036854775807))
             COMMON-LISP::T)
         SYSTEM::SHARP-EQ-READER SYSTEM::SHARP-SHARP-READER)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             (COMMON-LISP::T COMMON-LISP::T COMMON-LISP::T
                 COMMON-LISP::T COMMON-LISP::T COMMON-LISP::T
                 COMMON-LISP::*)
             COMMON-LISP::T)
         COMMON-LISP::ENCODE-UNIVERSAL-TIME)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             (COMMON-LISP::T COMMON-LISP::T COMMON-LISP::T
                 COMMON-LISP::T COMMON-LISP::T COMMON-LISP::T)
             COMMON-LISP::T)
         SYSTEM::DO-ARG-COUNT-ERROR SYSTEM::PUSH-SUB-LIST-BINDING)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             (COMMON-LISP::T COMMON-LISP::T COMMON-LISP::T
                 COMMON-LISP::T COMMON-LISP::T COMMON-LISP::T
                 COMMON-LISP::T COMMON-LISP::T COMMON-LISP::T
                 COMMON-LISP::T)
             COMMON-LISP::T)
         ANSI-LOOP::LOOP-SEQUENCER)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION
             (COMMON-LISP::T COMMON-LISP::T COMMON-LISP::T
                 COMMON-LISP::T COMMON-LISP::T COMMON-LISP::*)
             COMMON-LISP::T)
         SYSTEM::UNIVERSAL-ERROR-HANDLER)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION (COMMON-LISP::T) COMMON-LISP::T)
         ANSI-LOOP::LOOP-COLLECTOR-TEMPVARS SYSTEM::CHECK-DECLARATIONS
         COMMON-LISP::RESTART-NAME ANSI-LOOP::LOOP-COLLECTOR-P
         COMMON-LISP::LOGNOT ANSI-LOOP::LOOP-CONSTANTP
         COMMON-LISP::COMPILER-MACRO-FUNCTION SYSTEM::IDESCRIBE
         COMMON-LISP::FIRST ANSI-LOOP::LOOP-MAKE-DESETQ
         ANSI-LOOP::LOOP-COLLECTOR-DTYPE SYSTEM::S-DATA-CONC-NAME
         SYSTEM::VERSION-PARSE SYSTEM::IHS-NOT-INTERPRETED-ENV
         SYSTEM::EXPAND-HOME-DIR SYSTEM::LOAD-PATHNAME-EXISTS
         ANSI-LOOP::LOOP-UNIVERSE-P SYSTEM::SIMPLE-ARRAY-P
         COMMON-LISP::FIFTH SYSTEM::BKPT-FILE-LINE
         SYSTEM::TRACE-ONE-PREPROCESS
         SYSTEM::CANONICALIZE-PATHNAME-DIRECTORY
         COMMON-LISP::PROBE-FILE COMMON-LISP::TRUENAME
         COMMON-LISP::CONCATENATED-STREAM-STREAMS
         SYSTEM::SHOW-ENVIRONMENT COMMON-LISP::NINTH
         SYSTEM::INSPECT-NUMBER SYSTEM::DBL-RPL-LOOP
         COMMON-LISP::PROVIDE SYSTEM::SETUP-INFO
         SLOOP::AVERAGING-SLOOP-MACRO COMMON-LISP::ACOS SYSTEM::LNP
         SYSTEM::COERCE-SLASH-TERMINATED SYSTEM::FIND-KCL-TOP-RESTART
         ANSI-LOOP::LOOP-PATH-PREPOSITION-GROUPS SYSTEM::S-DATA-OFFSET
         COMMON-LISP::SECOND COMMON-LISP::PHASE SYSTEM::EVAL-FEATURE
         ANSI-LOOP::LOOP-PATH-USER-DATA
         ANSI-LOOP::LOOP-UNIVERSE-TYPE-SYMBOLS
         ANSI-LOOP::LOOP-MINIMAX-FLAG-VARIABLE SYSTEM::PATCH-SHARP
         ANSI-LOOP::LOOP-UNIVERSE-KEYWORDS
         COMMON-LISP::COMPILE-FILE-PATHNAME SYSTEM::DIR-P
         SYSTEM::PATH-STREAM-NAME COMMON-LISP::CIS SYSTEM::S-DATA-RAW
         SYSTEM::S-DATA-SLOT-DESCRIPTIONS SYSTEM::RESTART-TEST-FUNCTION
         SYSTEM::KNOWN-TYPE-P
         ANSI-LOOP::LOOP-UNIVERSE-IMPLICIT-FOR-REQUIRED
         COMMON-LISP::FILE-WRITE-DATE COMMON-LISP::RATIONAL
         ANSI-LOOP::LOOP-UNIVERSE-ITERATION-KEYWORDS
         SYSTEM::GET-NEXT-VISIBLE-FUN SLOOP::PARSE-LOOP-INITIALLY
         SYSTEM::S-DATA-STATICP COMMON-LISP::BYTE-SIZE
         COMMON-LISP::VECTOR-POP COMMON-LISP::PATHNAME
         SYSTEM::DIRECTORY-LIST-CHECK
         COMMON-LISP::BROADCAST-STREAM-STREAMS
         COMMON-LISP::SYNONYM-STREAM-SYMBOL SYSTEM::PNL1
         COMMON-LISP::SEVENTH SYSTEM::INFO-GET-TAGS
         ANSI-LOOP::LOOP-TYPED-INIT SYSTEM::WALK-THROUGH
         SYSTEM::NUMBER-OF-DAYS-FROM-1900
         ANSI-LOOP::LOOP-EMIT-FINAL-VALUE COMMON-LISP::ASINH
         SYSTEM::S-DATA-FROZEN SYSTEM::GET-STRING-INPUT-STREAM-INDEX
         SYSTEM::INSTREAM-STREAM SLOOP::LOOP-LET-BINDINGS
         COMMON-LISP::ECHO-STREAM-OUTPUT-STREAM
         ANSI-LOOP::LOOP-COLLECTOR-CLASS COMMON-LISP::DELETE-FILE
         SYSTEM::GET-PATH SYSTEM::LEAP-YEAR-P SYSTEM::REGEXP-CONV
         COMMON-LISP::SIXTH COMMON-LISP::ATANH SYSTEM::INFO-GET-FILE
         SYSTEM::S-DATA-PRINT-FUNCTION
         COMMON-LISP::DIRECTORY-NAMESTRING SYSTEM::INSPECT-CHARACTER
         SYSTEM::S-DATA-CONSTRUCTORS ANSI-LOOP::MAKE-ANSI-LOOP-UNIVERSE
         SYSTEM::INSPECT-VECTOR ANSI-LOOP::LOOP-MINIMAX-TYPE
         SYSTEM::BKPT-FILE SLOOP::REPEAT-SLOOP-MACRO COMMON-LISP::ABS
         COMMON-LISP::LOAD-LOGICAL-PATHNAME-TRANSLATIONS
         COMMON-LISP::SINH COMMON-LISP::TANH SYSTEM::RESTART-FUNCTION
         SLOOP::POINTER-FOR-COLLECT
         COMMON-LISP::ECHO-STREAM-INPUT-STREAM
         SYSTEM::PRINT-SYMBOL-APROPOS SYSTEM::CHDIR SYSTEM::MLP
         ANSI-LOOP::LOOP-MINIMAX-ANSWER-VARIABLE FPE::GREF
         COMMON-LISP::BYTE-POSITION SYSTEM::INSTREAM-STREAM-NAME
         SYSTEM::BKPT-FUNCTION ANSI-LOOP::DESTRUCTURING-SIZE
         SYSTEM::NORMALIZE-TYPE ANSI-LOOP::LOOP-EMIT-BODY
         SYSTEM::SEARCH-STACK SYSTEM::INSERT-BREAK-POINT
         SYSTEM::S-DATA-INCLUDES COMMON-LISP::FOURTH
         COMMON-LISP::TWO-WAY-STREAM-OUTPUT-STREAM FPE::ST-LOOKUP
         SYSTEM::NODE-OFFSET SYSTEM::S-DATA-TYPE SYSTEM::INSPECT-SYMBOL
         SLOOP::TRANSLATE-NAME SYSTEM::S-DATA-NAMED SYSTEM::REAL-ASINH
         SYSTEM::TOGGLE-CASE SLOOP::SLOOP-SLOOP-MACRO
         ANSI-LOOP::LOOP-DO-THEREIS FPE::LOOKUP SYSTEM::S-DATA-NAME
         ANSI-LOOP::LOOP-COLLECTOR-DATA
         SYSTEM::BREAK-FORWARD-SEARCH-STACK COMMON-LISP::EIGHTH
         ANSI-LOOP::LOOP-MINIMAX-TEMP-VARIABLE
         SYSTEM::S-DATA-SLOT-POSITION SYSTEM::INFO-NODE-FROM-POSITION
         COMMON-LISP::THIRD SYSTEM::FRS-KIND
         SYSTEM::WILD-PATH-ELEMENT-P ANSI-LOOP::LOOP-MAXMIN-COLLECTION
         SYSTEM::PRINT-FRS SYSTEM::GET-INSTREAM
         SLOOP::SUBSTITUTE-SLOOP-BODY SYSTEM::RESTART-P
         COMMON-LISP::FILE-AUTHOR SYSTEM::ADD-TO-HOTLIST
         SYSTEM::COMPUTING-ARGS-P COMMON-LISP::FILE-NAMESTRING
         SYSTEM::ENSURE-DIR-STRING COMMON-LISP::FIND-ALL-SYMBOLS
         SYSTEM::S-DATA-P SYSTEM::BREAK-BACKWARD-SEARCH-STACK
         SYSTEM::GET-BYTE-STREAM-NCHARS ANSI-LOOP::LOOP-MAKE-PSETQ
         SYSTEM::ALOAD ANSI-LOOP::LOOP-MINIMAX-INFINITY-DATA
         SYSTEM::MAKE-DEFPACKAGE-FORM COMMON-LISP::ASIN
         SYSTEM::WILD-DIR-ELEMENT-P SYSTEM::MAKE-FRAME
         ANSI-LOOP::LOOP-PSEUDO-BODY SYSTEM::DIR-CONJ SYSTEM::DBL-EVAL
         ANSI-LOOP::LOOP-COLLECTOR-NAME SYSTEM::INSPECT-ARRAY
         SYSTEM::DM-KEY-NOT-ALLOWED COMMON-LISP::ARRAY-DIMENSIONS
         ANSI-LOOP::LOOP-CONSTRUCT-RETURN COMMON-LISP::LOGICAL-PATHNAME
         COMMON-LISP::ACOSH ANSI-LOOP::LOOP-PATH-NAMES
         ANSI-LOOP::LOOP-PATH-FUNCTION SYSTEM::CHECK-TRACE-SPEC
         COMMON-LISP::ISQRT SYSTEM::NODES-FROM-INDEX SYSTEM::PRINT-IHS
         SYSTEM::INSPECT-CONS COMMON-LISP::CONSTANTLY
         ANSI-LOOP::LOOP-PATH-P SYSTEM::WILD-NAMESTRING-P
         SYSTEM::DM-BAD-KEY ANSI-LOOP::LOOP-MINIMAX-P SYSTEM::SEQTYPE
         FPE::XMM-LOOKUP SYSTEM::LOGICAL-PATHNAME-HOST-P
         COMMON-LISP::INVOKE-DEBUGGER
         ANSI-LOOP::LOOP-UNIVERSE-TYPE-KEYWORDS SYSTEM::INSPECT-STRING
         SYSTEM::NEXT-STACK-FRAME ANSI-LOOP::LOOP-UNIVERSE-FOR-KEYWORDS
         SYSTEM::LOGICAL-PATHNAMEP
         ANSI-LOOP::LOOP-PATH-INCLUSIVE-PERMITTED
         SLOOP::LOOP-COLLECT-KEYWORD-P COMMON-LISP::SIGNUM
         SYSTEM::WHICH ANSI-LOOP::LOOP-CODE-DUPLICATION-THRESHOLD
         SYSTEM::SHORT-NAME SYSTEM::SHOW-BREAK-POINT
         SYSTEM::INSPECT-STRUCTURE SYSTEM::S-DATA-INCLUDED
         SYSTEM::INSTREAM-P SYSTEM::RE-QUOTE-STRING
         SYSTEM::RESTRICT-STREAM-ELEMENT-TYPE
         SYSTEM::RESTART-INTERACTIVE-FUNCTION
         ANSI-LOOP::LOOP-UNIVERSE-PATH-KEYWORDS SYSTEM::UNIQUE-ID
         SYSTEM::FIX-LOAD-PATH SLOOP::RETURN-SLOOP-MACRO
         ANSI-LOOP::LOOP-COLLECTOR-HISTORY SYSTEM::S-DATA-DOCUMENTATION
         SYSTEM::TERMINAL-INTERRUPT COMMON-LISP::TENTH
         COMMON-LISP::COMPLEMENT SYSTEM::BEST-ARRAY-ELEMENT-TYPE
         SYSTEM::IHS-VISIBLE SYSTEM::LOGICAL-PATHNAME-DESIGNATOR-P
         COMMON-LISP::COSH COMMON-LISP::LOGICAL-PATHNAME-TRANSLATIONS
         SYSTEM::BKPT-FORM SYSTEM::FREEZE-DEFSTRUCT
         SYSTEM::INSPECT-PACKAGE ANSI-LOOP::LOOP-UNIVERSE-ANSI
         SLOOP::PARSE-NO-BODY ANSI-LOOP::LOOP-MINIMAX-OPERATIONS
         ANSI-LOOP::LOOP-LIST-COLLECTION SYSTEM::NC
         SYSTEM::FIND-DOCUMENTATION SYSTEM::S-DATA-HAS-HOLES
         COMMON-LISP::TWO-WAY-STREAM-INPUT-STREAM
         COMMON-LISP::NAMESTRING COMMON-LISP::HOST-NAMESTRING
         SYSTEM::DWIM SYSTEM::MAKE-KCL-TOP-RESTART SLOOP::PARSE-LOOP
         SYSTEM::IHS-FNAME COMMON-LISP::STREAM-EXTERNAL-FORMAT
         SYSTEM::RESTART-REPORT-FUNCTION COMMON-LISP::FILE-LENGTH
         SYSTEM::PROCESS-ARGS ANSI-LOOP::LOOP-HACK-ITERATION
         SYSTEM::CONTEXT-P SYSTEM::RESET-TRACE-DECLARATIONS)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION (COMMON-LISP::*) COMMON-LISP::*)
         SYSTEM::BREAK-LOCAL SYSTEM::BREAK-VS
         ANSI-LOOP::LOOP-OPTIONAL-TYPE COMMON-LISP::CONTINUE
         SYSTEM::BREAK-QUIT SYSTEM::BREAK-PREVIOUS
         SYSTEM::DBL-BACKTRACE SYSTEM::INFO-ERROR
         COMMON-LISP::MUFFLE-WARNING SYSTEM::SHOW-BREAK-VARIABLES
         SYSTEM::BREAK-BDS SYSTEM::IHS-BACKTRACE SYSTEM::BREAK-NEXT)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION (COMMON-LISP::T)
             (COMMON-LISP::VALUES COMMON-LISP::T COMMON-LISP::T))
         SYSTEM::MAKE-KEYWORD)) 
(COMMON-LISP::PROCLAIM
    '(COMMON-LISP::FTYPE
         (COMMON-LISP::FUNCTION (COMMON-LISP::T) COMMON-LISP::FIXNUM)
         SYSTEM::THE-START FPE::REG-LOOKUP SYSTEM::INSTREAM-LINE
         SYSTEM::S-DATA-LENGTH SYSTEM::S-DATA-SIZE)) 