Work at SourceForge, help us to make it a better place! We have an immediate need for a Support Technician in our San Francisco or Denver office.

Close

[01cc13]: package-data-list.lisp-expr Maximize Restore History

Download this file

package-data-list.lisp-expr    2952 lines (2779 with data), 135.0 kB

;;;; -*- Lisp -*-

;;;; the specifications of target packages, except for a few things
;;;; which are handled elsewhere by other mechanisms:
;;;;   * any SHADOWing and nickname hackery;
;;;;   * the standard, non-SBCL-specific packages COMMON-LISP,
;;;;     COMMON-LISP-USER, and KEYWORD.
;;;;
;;;; The packages are named SB!FOO here and elsewhere in
;;;; cross-compilation, in order to avoid collision with possible
;;;; corresponding SB-FOO packages in the cross-compilation host.
;;;; They're renamed to SB-FOO later, after we've departed from the xc
;;;; mothership and the danger of namespace collision is past.

;;;; This software is part of the SBCL system. See the README file for
;;;; more information.
;;;;
;;;; This software is derived from the CMU CL system, which was
;;;; written at Carnegie Mellon University and released into the
;;;; public domain. The software is in the public domain and is
;;;; provided with absolutely no warranty. See the COPYING and CREDITS
;;;; files for more information.

;;;; KLUDGE: To make it easier for emacs to autoindent this file nicely
;;;; (which prevents spurious conflicts in CVS) each longish list should
;;;; have only one string on the first line. Silly, but there you go.

(#s(sb-cold:package-data
    :name "SB!ALIEN"
    :doc "public: the ALIEN foreign function interface (If you're
porting CMU CL code, note that this package corresponds roughly to a union
of the packages ALIEN and C-CALL at the time of the SBCL fork. SB-C-CALL
is a deprecated nickname to help ease the transition from older versions
of SBCL which maintained the CMU-CL-style split into two packages.)"
    :use ("CL" "SB!EXT" "SB!INT" "SB!SYS" "SB!ALIEN-INTERNALS")
    :reexport ("ARRAY"
               "BOOLEAN" "CHAR" "DOUBLE-FLOAT"
               "FLOAT" "FUNCTION" "INTEGER" "LONG-FLOAT"
               "SINGLE-FLOAT"
               ;; FIXME: Do we really want to reexport
               ;; SYSTEM-AREA-POINTER here? Why?
               "SYSTEM-AREA-POINTER"
               "UNION"  "VALUES" "*")
    :export ("ADDR"
             "ALIEN"
             "ALIEN-FUNCALL" "ALIEN-SAP" "ALIEN-SIZE"
             "CAST" "C-STRING"
             "DEFINE-ALIEN-ROUTINE" "DEFINE-ALIEN-TYPE" "DEFINE-ALIEN-VARIABLE"
             "DEREF" "DOUBLE"
             "ENUM" "EXTERN-ALIEN"
             "FREE-ALIEN"
             "GET-ERRNO"
             "INT"
             "LOAD-1-FOREIGN" "LOAD-FOREIGN" "LOAD-SHARED-OBJECT" "LONG" "LONG-LONG"
             "MAKE-ALIEN"
             "MAKE-ALIEN-STRING"
             "NULL-ALIEN"
             "OFF-T"
             "SAP-ALIEN" "SHORT" "SIGNED"
             "SIZE-T"
             "SLOT" "STRUCT"
             "UNDEFINED-ALIEN-ERROR"
             "UNLOAD-SHARED-OBJECT"
             "UNSIGNED"
             "UNSIGNED-CHAR" "UNSIGNED-INT" "UNSIGNED-LONG" "UNSIGNED-LONG-LONG" "UNSIGNED-SHORT"
             "UTF8-STRING"
             "VOID"
             "WITH-ALIEN"))

   #s(sb-cold:package-data
      :name "SB!ALIEN-INTERNALS"
      :doc "private: stuff for implementing ALIENs and friends"
      :use ("CL")
      :export ("%ALIEN-VALUE"
               "%CAST"
               "%DEREF-ADDR" "%HEAP-ALIEN" "%HEAP-ALIEN-ADDR"
               "%LOCAL-ALIEN-ADDR" "%LOCAL-ALIEN-FORCED-TO-MEMORY-P" "%SAP-ALIEN"
               "%SET-DEREF" "%SET-HEAP-ALIEN" "%SET-LOCAL-ALIEN" "%SET-SLOT"
               "%SLOT-ADDR" "*SAVED-FP-AND-PCS*" "*VALUES-TYPE-OKAY*"
               "ALIEN-ARRAY-TYPE"
               "ALIEN-ARRAY-TYPE-DIMENSIONS" "ALIEN-ARRAY-TYPE-ELEMENT-TYPE"
               "ALIEN-ARRAY-TYPE-P" "ALIEN-BOOLEAN-TYPE" "ALIEN-BOOLEAN-TYPE-P"
               "ALIEN-CALLBACK"
               "ALIEN-CALLBACK-ACCESSOR-FORM"
               "ALIEN-CALLBACK-ASSEMBLER-WRAPPER"
               "ALIEN-DOUBLE-FLOAT-TYPE" "ALIEN-DOUBLE-FLOAT-TYPE-P"
               "ALIEN-ENUM-TYPE" "ALIEN-ENUM-TYPE-P" "ALIEN-FLOAT-TYPE"
               "ALIEN-FLOAT-TYPE-P" "ALIEN-FUN-TYPE"
               "ALIEN-FUN-TYPE-ARG-TYPES" "ALIEN-FUN-TYPE-P"
               "ALIEN-FUN-TYPE-RESULT-TYPE" "ALIEN-INTEGER-TYPE"
               "ALIEN-INTEGER-TYPE-P" "ALIEN-INTEGER-TYPE-SIGNED"
               "ALIEN-LONG-FLOAT-TYPE" "ALIEN-LONG-FLOAT-TYPE-P"
               "ALIEN-POINTER-TYPE" "ALIEN-POINTER-TYPE-P"
               "ALIEN-POINTER-TYPE-TO" "ALIEN-RECORD-FIELD"
               "ALIEN-RECORD-FIELD-NAME" "ALIEN-RECORD-FIELD-OFFSET"
               "ALIEN-RECORD-FIELD-P" "ALIEN-RECORD-FIELD-TYPE"
               "ALIEN-RECORD-TYPE" "ALIEN-RECORD-TYPE-FIELDS"
               "ALIEN-RECORD-TYPE-P" "ALIEN-SINGLE-FLOAT-TYPE"
               "ALIEN-SINGLE-FLOAT-TYPE-P" "ALIEN-SUBTYPE-P" "ALIEN-TYPE"
               "ALIEN-TYPE-=" "ALIEN-TYPE-ALIGNMENT" "ALIEN-TYPE-BITS"
               "ALIEN-TYPE-P" "ALIEN-TYPEP"
               "ALIEN-VALUE"
               "ALIEN-VALUE-TYPE"
               "ALIEN-VALUE-TYPEP"
               "ALIEN-VALUE-SAP" "ALIEN-VALUE-P"
               "ALIEN-VALUES-TYPE" "ALIEN-VALUES-TYPE-P"
               "ALIEN-VALUES-TYPE-VALUES" "ALIGN-OFFSET" "ALIEN-VOID-TYPE-P"
               "COMPUTE-ALIEN-REP-TYPE" "COMPUTE-DEPORT-ALLOC-LAMBDA"
               "COMPUTE-DEPORT-LAMBDA" "COMPUTE-DEPOSIT-LAMBDA"
               "COMPUTE-EXTRACT-LAMBDA" "COMPUTE-LISP-REP-TYPE"
               "COMPUTE-NATURALIZE-LAMBDA" "DEFINE-ALIEN-TYPE-CLASS"
               "DEFINE-ALIEN-TYPE-METHOD" "DEFINE-ALIEN-TYPE-TRANSLATOR"
               "DEPORT" "DEPORT-ALLOC"
               "DISPOSE-LOCAL-ALIEN"
               "*ENTER-ALIEN-CALLBACK*" "ENTER-ALIEN-CALLBACK"
               "FIND-SAVED-FP-AND-PC"
               "HEAP-ALIEN-INFO" "HEAP-ALIEN-INFO-P" "HEAP-ALIEN-INFO-SAP-FORM"
               "HEAP-ALIEN-INFO-TYPE" "INVOKE-ALIEN-TYPE-METHOD"
               "INVOKE-WITH-SAVED-FP-AND-PC" "LOCAL-ALIEN"
               "LOCAL-ALIEN-INFO" "LOCAL-ALIEN-INFO-FORCE-TO-MEMORY-P"
               "LOCAL-ALIEN-INFO-P" "LOCAL-ALIEN-INFO-TYPE"
               "MAKE-ALIEN-FUN-TYPE" "MAKE-ALIEN-POINTER-TYPE"
               "MAKE-ALIEN-VALUE" "MAYBE-WITH-PINNED-OBJECTS"
               "MAKE-LOCAL-ALIEN" "NATURALIZE"
               "NOTE-LOCAL-ALIEN-TYPE"
               "PARSE-ALIEN-TYPE" "UNPARSE-ALIEN-TYPE"))

   #s(sb-cold:package-data
      :name "SB!ASSEM"
      :doc "private: the assembler, used by the compiler"
      :use ("CL" "SB!EXT" "SB!INT")
      :export ("ASSEMBLY-UNIT"

               "*ASSEM-SCHEDULER-P*"
               "*ASSEM-INSTRUCTIONS*"
               "*ASSEM-MAX-LOCATIONS*"

               "EMIT-ALIGNMENT" "EMIT-BYTE" "EMIT-SKIP" "EMIT-BACK-PATCH"
               "EMIT-CHOOSER" "DEFINE-BITFIELD-EMITTER"
               "DEFINE-INSTRUCTION" "DEFINE-INSTRUCTION-MACRO"
               "DEF-ASSEMBLER-PARAMS" "EMIT-POSTIT"

               "MAKE-SEGMENT" "SEGMENT-TYPE" "ASSEMBLE"
               "INST" "LABEL" "LABEL-P" "GEN-LABEL"
               "EMIT-LABEL" "LABEL-POSITION" "APPEND-SEGMENT"
               "FINALIZE-SEGMENT"
               "SEGMENT-CONTENTS-AS-VECTOR" "WRITE-SEGMENT-CONTENTS"
               "READS" "WRITES" "SEGMENT"
               "WITHOUT-SCHEDULING"
               "VARIABLE-LENGTH"
               "SEGMENT-COLLECT-DYNAMIC-STATISTICS"

               ;; FIXME: These are in the SB-ASSEM package now, but
               ;; (left over from CMU CL) are defined in files which
               ;; are IN-PACKAGE SB-C. It would probably be cleaner
               ;; to move at least most of them to files which are
               ;; IN-PACKAGE SB-ASSEM.
               "BRANCH" "DO-SSET-ELEMENTS" "FLUSHABLE" "MAKE-SSET" "SSET"
               "SSET-ADJOIN" "SSET-DELETE" "SSET-ELEMENT" "SSET-EMPTY"))

   #s(sb-cold:package-data
      :name "SB!BIGNUM"
      :doc "private: bignum implementation"
      :use ("CL" "SB!KERNEL" "SB!INT" "SB!EXT")
      :export ("%ADD-WITH-CARRY"
               "%ALLOCATE-BIGNUM" "%ASHL" "%ASHR"
               "%BIGNUM-LENGTH" "%BIGNUM-REF" "%BIGNUM-REF-WITH-OFFSET"
               "%BIGNUM-SET"
               "%BIGNUM-SET-LENGTH" "%DIGIT-0-OR-PLUSP"
               "%DIGIT-LOGICAL-SHIFT-RIGHT"
               "%FIXNUM-DIGIT-WITH-CORRECT-SIGN" "%FIXNUM-TO-DIGIT"
               "%BIGFLOOR" "%LOGAND" "%LOGIOR" "%LOGNOT" "%LOGXOR"
               "%MULTIPLY" "%MULTIPLY-AND-ADD"
               "%SUBTRACT-WITH-BORROW" "ADD-BIGNUMS"
               "BIGNUM-ASHIFT-LEFT" "BIGNUM-ASHIFT-RIGHT"
               "BIGNUM-COMPARE"
               "BIGNUM-ELEMENT-TYPE" "BIGNUM-GCD" "BIGNUM-INDEX"
               "BIGNUM-INTEGER-LENGTH"
               "BIGNUM-LOGBITP"
               "BIGNUM-LOGCOUNT" "BIGNUM-LOGICAL-AND"
               "BIGNUM-LOGICAL-IOR" "BIGNUM-LOGICAL-NOT"
               "BIGNUM-LOGICAL-XOR" "BIGNUM-PLUS-P"
               "BIGNUM-TO-FLOAT" "BIGNUM-TRUNCATE" "BIGNUM-TYPE"
               "MAKE-SMALL-BIGNUM"
               "MULTIPLY-BIGNUM-AND-FIXNUM" "MULTIPLY-BIGNUMS"
               "MULTIPLY-FIXNUMS" "NEGATE-BIGNUM"
               "%RANDOM-BIGNUM" "SUBTRACT-BIGNUM" "SXHASH-BIGNUM"))

   #s(sb-cold:package-data
      :name "SB!C"
      :doc "private: implementation of the compiler"
      ;; (It seems strange to have the compiler USE SB-ALIEN-INTERNALS,
      ;; but the point seems to be to be able to express things like
      ;; SB!C:DEFTRANSFORM SB-ALIEN-INTERNALS:MAKE-LOCAL-ALIEN without
      ;; having to use a bunch of package prefixes, by putting them
      ;; in the SB-C package. Maybe it'd be tidier to define an SB-ALIEN-COMP
      ;; package for this? But it seems like a fairly low priority.)
      ;; (Probably the same considerations also explain why BIGNUM is
      ;;in the USE list.)
      :use ("CL" "SB!ALIEN-INTERNALS" "SB!ALIEN" "SB!ASSEM" "SB!BIGNUM"
                 #!+sb-dyncount "SB-DYNCOUNT" "SB!EXT" "SB!FASL" "SB!INT"
                 "SB!KERNEL" "SB!SYS")
      :reexport ("SLOT" "CODE-INSTRUCTIONS" "FLUSHABLE")
      :export ("%ALIEN-FUNCALL"
               "%CATCH-BREAKUP" "%CONTINUE-UNWIND"
               "%LISTIFY-REST-ARGS" "%MORE-ARG" "%MORE-ARG-VALUES"
               "%UNWIND-PROTECT-BREAKUP"

               "*BACKEND-BYTE-ORDER*" "*BACKEND-DISASSEM-PARAMS*"
               "*BACKEND-INSTRUCTION-FLAVORS*" "*BACKEND-INSTRUCTION-FORMATS*"
               "*BACKEND-INTERNAL-ERRORS*" "*BACKEND-PAGE-BYTES*"
               "*BACKEND-REGISTER-SAVE-PENALTY*"
               "*BACKEND-SB-LIST*" "*BACKEND-SB-NAMES*"
               "*BACKEND-SC-NAMES*" "*BACKEND-SC-NUMBERS*"
               "*BACKEND-SPECIAL-ARG-TYPES*"
               "*BACKEND-SUBFEATURES*"
               "*BACKEND-T-PRIMITIVE-TYPE*"

               "*CODE-SEGMENT*"
               "*COUNT-VOP-USAGES*" "*ELSEWHERE*" "*FREE-FUNS*"
               "*LEXENV*"
               "*SETF-ASSUMED-FBOUNDP*"
               "*SUPPRESS-VALUES-DECLARATION*"

               #!+x86 "SET-FPU-WORD-FOR-C"
               #!+x86 "SET-FPU-WORD-FOR-LISP"
               "ALIGN-STACK-POINTER"
               "ALIEN-FUNCALL-SAVES-FP-AND-PC"
               "ALLOC-ALIEN-STACK-SPACE" "ALLOC-NUMBER-STACK-SPACE"
               "ALLOCATE-CODE-OBJECT" "ALLOCATE-FRAME"
               "ALLOCATE-FULL-CALL-FRAME"
               "ALWAYS-TRANSLATABLE"
               "ANCESTOR-FRAME-REF" "ANCESTOR-FRAME-SET"
               "ANY" "ARG-COUNT-ERROR" "ASSEMBLE-FILE"
               "ATTRIBUTES" "ATTRIBUTES-INTERSECTION" "ATTRIBUTES-UNION"
               "ATTRIBUTES=" "BIND"
               "CALL" "CALL-LOCAL" "CALL-NAMED" "CALL-OUT" "CALL-VARIABLE"
               "CALLEE-NFP-TN" "CALLEE-RETURN-PC-TN"
               "CASE-BODY" "CATCH-BLOCK" "CHECK-CONS"
               "CHECK-FIXNUM" "CHECK-FUN"
               ;; FIXME: 32/64-bit issues
               "CHECK-SIGNED-BYTE-32" "CHECK-SIGNED-BYTE-64"
               "CHECK-SYMBOL"
               ;; FIXME: 32/64-bit issues
               "CHECK-UNSIGNED-BYTE-32" "CHECK-UNSIGNED-BYTE-64"
               "CLOSURE-INIT" "CLOSURE-REF" "CLOSURE-INIT-FROM-FP"
               "*CODE-COVERAGE-INFO*"
               "COMPARE-AND-SWAP-SLOT"
               "COMPILE-IN-LEXENV"
               "%COMPILER-DEFUN" "COMPILER-ERROR" "FATAL-COMPILER-ERROR"
               "COMPILER-NOTIFY"
               "COMPILER-STYLE-WARN" "COMPILER-WARN"
               "COMPONENT" "COMPONENT-HEADER-LENGTH"
               "COMPONENT-INFO" "COMPONENT-LIVE-TN" "COMPUTE-FUN"
               "COMPUTE-OLD-NFP" "COPY-MORE-ARG"
               "CURRENT-BINDING-POINTER" "CURRENT-NFP-TN"
               "CURRENT-STACK-POINTER"
               "DEALLOC-ALIEN-STACK-SPACE"
               "DEALLOC-NUMBER-STACK-SPACE"
               "DEBUG-CATCH-TAG"
               "DEF-IR1-TRANSLATOR"
               "!DEF-PRIMITIVE-TYPE" "!DEF-PRIMITIVE-TYPE-ALIAS"
               "DEFINE-SOURCE-TRANSFORM" "!DEF-VM-SUPPORT-ROUTINE"
               "DEFINE-ASSEMBLY-ROUTINE"
               "DEFINITION-SOURCE-LOCATION"
               "DEFINITION-SOURCE-LOCATION-NAMESTRING"
               "DEFINITION-SOURCE-LOCATION-TOPLEVEL-FORM-NUMBER"
               "DEFINITION-SOURCE-LOCATION-PLIST"
               "DEFINE-MODULAR-FUN"
               "DEFINE-MOVE-FUN"
               "DEFINE-MOVE-VOP" "DEFINE-STORAGE-BASE"
               "DEFINE-STORAGE-CLASS" "DEFINE-VOP"
               "DEFKNOWN" "DEFOPTIMIZER"
               "DEFTRANSFORM" "DERIVE-TYPE"
               "EMIT-BLOCK-HEADER"
               "PHYSENV-DEBUG-LIVE-TN" "PHYSENV-LIVE-TN"
               "FAST-SYMBOL-VALUE"
               "FAST-SYMBOL-GLOBAL-VALUE"
               "FIXUP-NOTE-KIND"
               "FIXUP-NOTE-FIXUP"
               "FIXUP-NOTE-POSITION"
               "FOLDABLE"
               "FORCE-TN-TO-STACK"
               "FUN-INFO-DERIVE-TYPE" "FUN-INFO-IR2-CONVERT"
               "FUN-INFO-LTN-ANNOTATE" "FUN-INFO-OPTIMIZER"
               "GET-VECTOR-SUBTYPE"
               "GET-TOPLEVELISH-FILE-INFO"
               "HALT"
               "IF-EQ"
               "IMMEDIATE-TN-P"
               "INHIBIT-SAFEPOINTS"
               "INSERT-STEP-CONDITIONS"
               "IR2-COMPONENT-CONSTANTS" "IR2-CONVERT"
               "IR2-PHYSENV-NUMBER-STACK-P"
               "KNOWN-CALL-LOCAL" "KNOWN-RETURN"
               "LAMBDA-WITH-LEXENV" "LEXENV-FIND"
               "LOCATION=" "LTN-ANNOTATE"
               "MAKE-ALIAS-TN" "MAKE-CATCH-BLOCK"
               "MAKE-CLOSURE" "MAKE-CONSTANT-TN"
               "MAKE-FIXUP-NOTE"
               "MAKE-LOAD-TIME-CONSTANT-TN" "MAKE-N-TNS" "MAKE-NORMAL-TN"
               "MAKE-RANDOM-TN"
               "MAKE-REPRESENTATION-TN" "MAKE-RESTRICTED-TN" "MAKE-SC-OFFSET"
               "MAKE-STACK-POINTER-TN" "MAKE-TN-REF" "MAKE-UNWIND-BLOCK"
               "MAKE-WIRED-TN" "MAYBE-COMPILER-NOTIFY"
               "MAYBE-INLINE-SYNTACTIC-CLOSURE"
               "META-PRIMITIVE-TYPE-OR-LOSE"
               "META-SB-OR-LOSE" "META-SC-NUMBER-OR-LOSE" "META-SC-OR-LOSE"
               "MORE-ARG-CONTEXT" "MOVABLE" "MOVE" "MULTIPLE-CALL"
               "MULTIPLE-CALL-LOCAL" "MULTIPLE-CALL-NAMED"
               "MULTIPLE-CALL-VARIABLE"
               "%%NIP-DX" "%%NIP-VALUES"
               "NLX-ENTRY" "NLX-ENTRY-MULTIPLE"
               "NODE-STACK-ALLOCATE-P"
               "NON-DESCRIPTOR-STACK" "NOTE-ENVIRONMENT-START"
               "NOTE-THIS-LOCATION" "OPTIMIZER" "PACK-TRACE-TABLE"
               "PARSE-EVAL-WHEN-SITUATIONS"
               "POLICY"
               "%%POP-DX"
               "PRIMITIVE-TYPE" "PRIMITIVE-TYPE-OF"
               "PRIMITIVE-TYPE-OR-LOSE" "PRIMITIVE-TYPE-VOP"
               "PRIMITIVE-TYPE-NAME"
               "PRIMITIVE-TYPE-INDIRECT-CELL-TYPE"
               "PUSH-VALUES"
               "READ-PACKED-BIT-VECTOR" "READ-VAR-INTEGER" "READ-VAR-STRING"
               #!+inline-constants "REGISTER-INLINE-CONSTANT"
               "RESET-STACK-POINTER" "RESTORE-DYNAMIC-STATE"
               "RETURN-MULTIPLE" "SAVE-DYNAMIC-STATE" "SB"
               "SB-ALLOCATED-SIZE" "SB-NAME" "SB-OR-LOSE" "SB-P" "SC" "SC-CASE"
               "SC-IS" "SC-NAME" "SC-NUMBER" "SC-NUMBER-OR-LOSE" "SC-OFFSET"
               "SC-OFFSET-OFFSET" "SC-OFFSET-SCN" "SC-OR-LOSE" "SC-P" "SC-SB"
               "SET-UNWIND-PROTECT" "SET-VECTOR-SUBTYPE"
               "SETUP-CLOSURE-ENVIRONMENT" "SETUP-ENVIRONMENT"
               "SOURCE-LOCATION"
               "SOURCE-TRANSFORM-LAMBDA"
               "SPECIFY-SAVE-TN"
               "STORE-COVERAGE-DATA"
               "TAIL-CALL" "TAIL-CALL-NAMED"
               "TAIL-CALL-VARIABLE" "TEMPLATE-OR-LOSE"
               "TN" "TN-OFFSET" "TN-P" "TN-REF" "TN-REF-ACROSS" "TN-REF-LOAD-TN"
               "TN-REF-NEXT" "TN-REF-NEXT-REF" "TN-REF-P" "TN-REF-TARGET"
               "TN-REF-TN" "TN-REF-VOP" "TN-REF-WRITE-P" "TN-SC" "TN-VALUE"
               "TRACE-TABLE-ENTRY" "TYPE-CHECK-ERROR" "UNBIND" "UNBIND-TO-HERE"
               "UNSAFE" "UNSAFELY-FLUSHABLE" "UNWIND" "UWP-ENTRY"
               "VERIFY-ARG-COUNT" "WRITE-PACKED-BIT-VECTOR"
               "WRITE-VAR-INTEGER" "WRITE-VAR-STRING" "XEP-ALLOCATE-FRAME"
               "LABEL-ID" "FIXUP" "FIXUP-FLAVOR" "FIXUP-NAME" "FIXUP-OFFSET"
               "FIXUP-P" "MAKE-FIXUP"
               "DEF-ALLOC"
               "VAR-ALLOC"
               "SAFE-FDEFN-FUN"
               "NOTE-FIXUP"
               "DEF-CASSER"
               "DEF-REFFER"
               "EMIT-CONSTANT"
               "EMIT-NOP"
               "DEF-SETTER"
               "FIXED-ALLOC"
               "MAKE-UNBOUND-MARKER"
               "MAKE-FUNCALLABLE-INSTANCE-TRAMP"
               "RETURN-SINGLE"
               "NOTE-NEXT-INSTRUCTION"
               "SET-SLOT" "INIT-SLOT"
               "LOCATION-NUMBER"
               "*COMPONENT-BEING-COMPILED*"
               "BLOCK-NUMBER"
               "IR2-BLOCK-BLOCK"
               "VOP-BLOCK"
               "*ASSEMBLY-OPTIMIZE*"

               "IMMEDIATE-CONSTANT-SC"
               "BOXED-IMMEDIATE-SC-P"
               "COMBINATION-IMPLEMENTATION-STYLE"
               "CONVERT-CONDITIONAL-MOVE-P"
               "LOCATION-PRINT-NAME"
               "PRIMITIVE-TYPE-OF"
               "PRIMITIVE-TYPE"
               "MAKE-CALL-OUT-TNS"
               "STANDARD-ARG-LOCATION"
               "MAKE-RETURN-PC-PASSING-LOCATION"
               "MAKE-OLD-FP-PASSING-LOCATION"
               "MAKE-OLD-FP-SAVE-LOCATION"
               "MAKE-RETURN-PC-SAVE-LOCATION"
               "MAKE-ARG-COUNT-LOCATION"
               "MAKE-NFP-TN"
               "MAKE-STACK-POINTER-TN"
               "MAKE-NUMBER-STACK-POINTER-TN"
               "MAKE-UNKNOWN-VALUES-LOCATIONS"
               "SELECT-COMPONENT-FORMAT"
               "MAKE-NLX-SP-TN"
               "MAKE-DYNAMIC-STATE-TNS"
               "MAKE-NLX-ENTRY-ARG-START-LOCATION"
               "GENERATE-CALL-SEQUENCE"
               "GENERATE-RETURN-SEQUENCE"
               "LOCATION-NUMBER"
               "WITH-COMPILER-ERROR-RESIGNALLING"
               "WITH-SOURCE-LOCATION"
               "*SOURCE-LOCATION-THUNKS*"

               "BRANCH-IF"))

   #s(sb-cold:package-data
      :name "SB!DEBUG"
      :doc
      "sorta public: Eventually this should become the debugger interface, with
basic stuff like BACKTRACE and ARG. For now, the actual supported interface
is still mixed indiscriminately with low-level internal implementation stuff
like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*."
      :use ("CL" "SB!EXT" "SB!INT" "SB!SYS" "SB!KERNEL")
      :reexport ("*DEBUG-PRINT-VARIABLE-ALIST*")
      :export ("*BACKTRACE-FRAME-COUNT*"
               "*DEBUG-BEGINNER-HELP-P*"
               "*DEBUG-CONDITION*"
               "*DEBUG-READTABLE*" "*DEBUG-HELP-STRING*"
               "*FLUSH-DEBUG-ERRORS*" "*IN-THE-DEBUGGER*"
               "*METHOD-FRAME-STYLE*"
               "*TRACE-INDENTATION-STEP*" "*MAX-TRACE-INDENTATION*"
               "ARG"
               "INTERNAL-DEBUG" "VAR"
               "*STACK-TOP-HINT*"
               "*TRACE-VALUES*"
               "*TRACE-ENCAPSULATE-DEFAULT*"
               "FRAME-HAS-DEBUG-TAG-P"
               "UNWIND-TO-FRAME-AND-CALL"
               ;; Deprecated
               "BACKTRACE" "BACKTRACE-AS-LIST" "*SHOW-ENTRY-POINT-DETAILS*"
               ;; Replaced by
               "PRINT-BACKTRACE" "LIST-BACKTRACE"))

   #s(sb-cold:package-data
      :name "SB!DI"
      :doc "private: primitives used to write debuggers"
      :use ("CL" "SB!EXT" "SB!INT" "SB!KERNEL" "SB!SYS" "SB!VM")
      :import-from (("SB!C"
                     "DEBUG-SOURCE-FORM" "DEBUG-SOURCE-NAMESTRING"
                     "DEBUG-SOURCE-CREATED" "DEBUG-SOURCE-COMPILED"
                     "DEBUG-SOURCE-START-POSITIONS" "MAKE-DEBUG-SOURCE"
                     "DEBUG-SOURCE" "DEBUG-SOURCE-P"))
      :reexport ("DEBUG-SOURCE-FORM"
                 "DEBUG-SOURCE-NAMESTRING"
                 "DEBUG-SOURCE-CREATED" "DEBUG-SOURCE-COMPILED"
                 "DEBUG-SOURCE-START-POSITIONS" "DEBUG-SOURCE"
                 "DEBUG-SOURCE-P")
      :export ("ACTIVATE-BREAKPOINT"
               "AMBIGUOUS-DEBUG-VARS" "AMBIGUOUS-VAR-NAME" "BREAKPOINT"
               "BREAKPOINT-ACTIVE-P" "BREAKPOINT-HOOK-FUN" "BREAKPOINT-INFO"
               "BREAKPOINT-KIND" "BREAKPOINT-P" "BREAKPOINT-WHAT" "CODE-LOCATION"
               "CODE-LOCATION-DEBUG-BLOCK" "CODE-LOCATION-DEBUG-FUN"
               "CODE-LOCATION-DEBUG-SOURCE" "CODE-LOCATION-FORM-NUMBER"
               "CODE-LOCATION-P" "CODE-LOCATION-TOPLEVEL-FORM-OFFSET"
               "CODE-LOCATION-UNKNOWN-P" "CODE-LOCATION=" "DEACTIVATE-BREAKPOINT"
               "DEBUG-BLOCK" "DEBUG-BLOCK-ELSEWHERE-P" "DEBUG-BLOCK-P"
               "DEBUG-BLOCK-SUCCESSORS" "DEBUG-CONDITION" "DEBUG-ERROR"
               "DEBUG-FUN" "DEBUG-FUN-FUN" "DEBUG-FUN-KIND"
               "DEBUG-FUN-LAMBDA-LIST" "DEBUG-FUN-NAME"
               "DEBUG-FUN-P" "DEBUG-FUN-START-LOCATION"
               "DEBUG-FUN-SYMBOL-VARS"
               "DEBUG-SOURCE-ROOT-NUMBER" "DEBUG-VAR"
               "DEBUG-VAR-ID" "DEBUG-VAR-INFO-AVAILABLE"
               "DEBUG-VAR-SYMBOL-NAME" "DEBUG-VAR-P" "DEBUG-VAR-PACKAGE-NAME"
               "DEBUG-VAR-SYMBOL" "DEBUG-VAR-VALID-VALUE"
               "DEBUG-VAR-VALIDITY" "DEBUG-VAR-VALUE"
               "DELETE-BREAKPOINT"
               "DO-DEBUG-BLOCK-LOCATIONS" "DO-DEBUG-FUN-BLOCKS"
               "DO-DEBUG-FUN-VARS"
               "FORM-NUMBER-TRANSLATIONS"
               "FRAME" "FRAME-CATCHES" "FRAME-CODE-LOCATION"
               "FRAME-DEBUG-FUN" "FRAME-DOWN"
               "FRAME-FUN-MISMATCH" "FRAME-NUMBER" "FRAME-P" "FRAME-UP"
               "GET-TOPLEVEL-FORM"
               "REPLACE-FRAME-CATCH-TAG"
               "FUN-DEBUG-FUN" "FUN-END-COOKIE-VALID-P"
               "INVALID-CONTROL-STACK-POINTER" "INVALID-VALUE"
               "LAMBDA-LIST-UNAVAILABLE" "MAKE-BREAKPOINT" "NO-DEBUG-BLOCKS"
               "NO-DEBUG-FUN-RETURNS" "PREPROCESS-FOR-EVAL"
               "EVAL-IN-FRAME" "RETURN-FROM-FRAME" "SOURCE-PATH-CONTEXT"
               "TOP-FRAME" "UNHANDLED-DEBUG-CONDITION"
               "UNKNOWN-DEBUG-VAR"
               "CODE-LOCATION-KIND" "FLUSH-FRAMES-ABOVE"))

   #s(sb-cold:package-data
      :name "SB!DISASSEM"
      :doc "private: stuff related to the implementation of the disassembler"
      :use ("CL" "SB!EXT" "SB!INT")
      :export ("*DISASSEM-INST-ALIGNMENT-BYTES*"
               "*DISASSEM-NOTE-COLUMN*" "*DISASSEM-OPCODE-COLUMN-WIDTH*"
               "*DISASSEM-LOCATION-COLUMN-WIDTH*"
               "ARG-VALUE" "DISASSEM-STATE"
               "DISASSEMBLE-CODE-COMPONENT"
               "DISASSEMBLE-FUN" "DISASSEMBLE-MEMORY"
               "DISASSEMBLE-SEGMENT" "DISASSEMBLE-SEGMENTS"
               "DSTATE-GET-INST-PROP"
               "DSTATE-GET-PROP" "DSTATE-PUT-INST-PROP"
               "DSTATE-SEGMENT-SAP"
               "FIND-INST"
               "GET-CODE-SEGMENTS" "GET-FUN-SEGMENTS"
               "GET-INST-SPACE" "HANDLE-BREAK-ARGS"
               "LABEL-SEGMENTS"
               "MAYBE-NOTE-ASSEMBLER-ROUTINE"
               "MAYBE-NOTE-ASSOCIATED-STORAGE-REF"
               "MAYBE-NOTE-NIL-INDEXED-OBJECT"
               "MAYBE-NOTE-NIL-INDEXED-SYMBOL-SLOT-REF"
               "MAYBE-NOTE-SINGLE-STORAGE-REF" "NOTE"
               "NOTE-CODE-CONSTANT" "PARAMS" "PRIN1-QUOTED-SHORT"
               "PRIN1-SHORT" "PRINT-BYTES"
               "PRINT-CURRENT-ADDRESS" "PRINT-INST"
               "PRINT-NOTES-AND-NEWLINE"
               "PRINT-WORDS" "SAP-REF-DCHUNK"
               "SEG-LENGTH" "SEGMENT"
               "SET-DISASSEM-PARAMS"
               "SIGN-EXTEND" "SPECIALIZE"
               "GEN-PRINTER-DEF-FORMS-DEF-FORM" "MAKE-DSTATE"
               "DEFINE-ARG-TYPE" "GEN-ARG-TYPE-DEF-FORM"
               "READ-SIGNED-SUFFIX" "ADD-OFFS-HOOK"
               "MAKE-MEMORY-SEGMENT" "GEN-PREAMBLE-FORM"
               "MAKE-SEGMENT" "SEG-VIRTUAL-LOCATION"
               "DCHUNK" "*DEFAULT-DSTATE-HOOKS*"
               "MAKE-CODE-SEGMENT" "MAKE-OFFS-HOOK"
               "DSTATE-SEGMENT" "DSTATE-CUR-OFFS"
               "PRINC16" "INSTRUCTION" "DEFINE-INSTRUCTION-FORMAT"
               "DSTATE-NEXT-OFFS" "INSTALL-INST-FLAVORS"
               "SEG-SAP-MAKER" "DISASSEMBLE-ASSEM-SEGMENT"
               "READ-SUFFIX"
               "MAP-SEGMENT-INSTRUCTIONS" "GEN-FORMAT-DEF-FORM"
               "SET-LOCATION-PRINTING-RANGE" "MAKE-VECTOR-SEGMENT"
               "ADD-OFFS-NOTE-HOOK" "ADD-OFFS-COMMENT-HOOK"
               "DSTATE-CUR-ADDR" "DSTATE-NEXT-ADDR"))

   #!+sb-dyncount
   #s(sb-cold:package-data
      :name "SB!DYNCOUNT"
      :doc "private: some somewhat-stale code for collecting runtime statistics"
      :use ("CL" "SB!ALIEN-INTERNALS" "SB!ALIEN" "SB!BIGNUM"
                 "SB!EXT" "SB!INT" "SB!KERNEL" "SB!ASSEM" "SB!SYS")
      :export ("*COLLECT-DYNAMIC-STATISTICS*"
               "COUNT-ME"
               "DYNCOUNT-INFO-COUNTS" "DYNCOUNT-INFO-COSTS"
               "IR2-COMPONENT-DYNCOUNT-INFO"
               "DYNCOUNT-INFO" "DYNCOUNT-INFO-P"))

   #s(sb-cold:package-data
      :name "SB!FASL"
      :doc "private: stuff related to FASL load/dump logic (and GENESIS)"
      :use ("CL" "SB!ALIEN" "SB!ASSEM" "SB!BIGNUM" "SB!C"
                 "SB!EXT" "SB!INT" "SB!KERNEL" "SB!SYS")
      :export ("*ASSEMBLER-ROUTINES*"
               "+BACKEND-FASL-FILE-IMPLEMENTATION+"
               "BUILD-ID-CORE-ENTRY-TYPE-CODE"
               "*FASL-FILE-TYPE*"
               "CLOSE-FASL-OUTPUT"
               "DEFLATED-CORE-SPACE-ID-FLAG"
               "DUMP-ASSEMBLER-ROUTINES"
               "DUMP-OBJECT"
               "DYNAMIC-CORE-SPACE-ID"
               "END-CORE-ENTRY-TYPE-CODE"
               "FASL-CONSTANT-ALREADY-DUMPED-P"
               "+FASL-FILE-VERSION+"
               "FASL-DUMP-COMPONENT"
               "FASL-DUMP-COLD-FSET"
               "FASL-DUMP-LOAD-TIME-VALUE" "FASL-DUMP-LOAD-TIME-VALUE-LAMBDA"
               "FASL-DUMP-SOURCE-INFO" "FASL-DUMP-TOPLEVEL-LAMBDA-CALL"
               "FASL-NOTE-HANDLE-FOR-CONSTANT"
               "FASL-OUTPUT" "FASL-OUTPUT-P"
               "FASL-OUTPUT-ENTRY-TABLE" "FASL-OUTPUT-STREAM"
               "FASL-VALIDATE-STRUCTURE"
               "INITIAL-FUN-CORE-ENTRY-TYPE-CODE"
               "*!LOAD-TIME-VALUES*"
               "MAX-CORE-SPACE-ID"
               ;; FIXME: this are listed here so that genesis
               ;; puts them into .h files, but they are not present in the resulting core
               "NEW-DIRECTORY-CORE-ENTRY-TYPE-CODE"
               "OPEN-FASL-OUTPUT" "PAGE-TABLE-CORE-ENTRY-TYPE-CODE"
               "READ-ONLY-CORE-SPACE-ID"
               "*!REVERSED-COLD-TOPLEVELS*"
               "STATIC-CORE-SPACE-ID"
               "VERSION-CORE-ENTRY-TYPE-CODE"))

   ;; This package is a grab bag for things which used to be internal
   ;; symbols in package COMMON-LISP. Lots of these symbols are accessed
   ;; with explicit SB!IMPL:: prefixes in the code. It would be nice to
   ;; reduce the use of this practice, so if symbols from here which are
   ;; accessed that way are found to belong more appropriately in an
   ;; existing package (e.g. SB!KERNEL or SB!SYS or SB!EXT or SB!FASL),
   ;; I (WHN 19990223) encourage maintainers to move them there..
   #s(sb-cold:package-data
      :name "SB!IMPL"
      :doc "private: a grab bag of implementation details"
      :use ("CL" "SB!ALIEN" "SB!BIGNUM" "SB!DEBUG" "SB!EXT"
                 "SB!FASL" "SB!GRAY" "SB!INT" "SB!KERNEL" "SB!SYS"))

   #s(sb-cold:package-data
      :name "SB!EXT"
      :doc "public: miscellaneous supported extensions to the ANSI Lisp spec"
      :use ("CL" "SB!ALIEN" "SB!INT" "SB!SYS" "SB!GRAY")
      :export ( ;; Information about how the program was invoked is
               ;; nonstandard but very useful.
               "*POSIX-ARGV*" "*CORE-PATHNAME*" "*RUNTIME-PATHNAME*"
               "POSIX-GETENV" "POSIX-ENVIRON"

               ;; Customizing initfile locations
               "*USERINIT-PATHNAME-FUNCTION*"
               "*SYSINIT-PATHNAME-FUNCTION*"

               ;; Compare and Swap support
               "CAS"
               "COMPARE-AND-SWAP"
               "DEFCAS"
               "DEFINE-CAS-EXPANDER"
               "GET-CAS-EXPANSION"

               ;; Other atomic operations and types related to them
               "ATOMIC-INCF"
               "ATOMIC-DECF"
               "ATOMIC-UPDATE"
               "ATOMIC-PUSH"
               "ATOMIC-POP"
               "WORD"
               "MOST-POSITIVE-WORD"

               ;; Not an atomic operation, but should be used with them
               "SPIN-LOOP-HINT"

               ;; Waiting for arbitrary events.
               "WAIT-FOR"

               ;; Time related things
               "CALL-WITH-TIMING"
               "GET-TIME-OF-DAY"

               ;; People have various good reasons to mess with the GC.
               "*AFTER-GC-HOOKS*"
               "BYTES-CONSED-BETWEEN-GCS"
               "GC" "GET-BYTES-CONSED"
               "*GC-RUN-TIME*"
               "PURIFY"
               "DYNAMIC-SPACE-SIZE"
               ;; Gencgc only, but symbols exist for manual building
               ;; convenience on all platforms.
               "GENERATION-AVERAGE-AGE"
               "GENERATION-BYTES-ALLOCATED"
               "GENERATION-BYTES-CONSED-BETWEEN-GCS"
               "GENERATION-MINIMUM-AGE-BEFORE-GC"
               "GENERATION-NUMBER-OF-GCS"
               "GENERATION-NUMBER-OF-GCS-BEFORE-PROMOTION"
               "GC-LOGFILE"

               ;; Stack allocation control
               "*STACK-ALLOCATE-DYNAMIC-EXTENT*"

               ;; Customizing printing of compiler and debugger messages
               "*COMPILER-PRINT-VARIABLE-ALIST*"
               "*DEBUG-PRINT-VARIABLE-ALIST*"

               ;; Hooks into init & save sequences
               "*INIT-HOOKS*" "*SAVE-HOOKS*" "*EXIT-HOOKS*"

               ;; Controlling exiting other threads.
               "*EXIT-TIMEOUT*"

               ;; There is no one right way to report progress on
               ;; hairy compiles.
               "*COMPILE-PROGRESS*"

               ;; It can be handy to be able to evaluate expressions involving
               ;; the thing under examination by CL:INSPECT.
               "*INSPECTED*"

               ;; There is no one right way to do efficiency notes.
               "*EFFICIENCY-NOTE-COST-THRESHOLD*" "*EFFICIENCY-NOTE-LIMIT*"

               ;; There's no one right way to report errors.
               "*ENCLOSING-SOURCE-CUTOFF*"
               "*UNDEFINED-WARNING-LIMIT*"

               ;; and for dedicated users who really want to customize
               ;; error reporting, we have
               "DEFINE-SOURCE-CONTEXT"

               ;; and given how many users dislike strict treatment of
               ;; DEFCONSTANT, let's give them enough rope to escape by
               "DEFCONSTANT-UNEQL" "DEFCONSTANT-UNEQL-NAME"
               "DEFCONSTANT-UNEQL-NEW-VALUE" "DEFCONSTANT-UNEQL-OLD-VALUE"

               ;; global lexicals, access to global symbol values
               "DEFGLOBAL"
               "SYMBOL-GLOBAL-VALUE"

               ;; package extensions
               ;;
               ;; locks
               #!+sb-package-locks "PACKAGE-LOCKED-P"
               #!+sb-package-locks "LOCK-PACKAGE"
               #!+sb-package-locks "UNLOCK-PACKAGE"
               #!+sb-package-locks "PACKAGE-IMPLEMENTED-BY-LIST"
               #!+sb-package-locks "PACKAGE-IMPLEMENTS-LIST"
               #!+sb-package-locks "ADD-IMPLEMENTATION-PACKAGE"
               #!+sb-package-locks "REMOVE-IMPLEMENTATION-PACKAGE"
               #!+sb-package-locks "WITH-UNLOCKED-PACKAGES"
               #!+sb-package-locks "PACKAGE-LOCK-VIOLATION"
               #!+sb-package-locks "PACKAGE-LOCKED-ERROR"
               #!+sb-package-locks "SYMBOL-PACKAGE-LOCKED-ERROR"
               #!+sb-package-locks "PACKAGE-LOCKED-ERROR-SYMBOL"
               "WITHOUT-PACKAGE-LOCKS"
               "DISABLE-PACKAGE-LOCKS"
               "ENABLE-PACKAGE-LOCKS"
               ;; local nicknames
               "ADD-PACKAGE-LOCAL-NICKNAME"
               "REMOVE-PACKAGE-LOCAL-NICKNAME"
               "PACKAGE-LOCAL-NICKNAMES"
               "PACKAGE-LOCALLY-NICKNAMED-BY-LIST"
               ;; behaviour on DEFPACKAGE variance
               "*ON-PACKAGE-VARIANCE*"

               ;; Custom conditions & condition accessors for users to handle.
               "CODE-DELETION-NOTE"
               "COMPILER-NOTE"
               "IMPLICIT-GENERIC-FUNCTION-NAME"
               "IMPLICIT-GENERIC-FUNCTION-WARNING"
               "INVALID-FASL"
               "DEPRECATION-CONDITION"

               "NAME-CONFLICT" "NAME-CONFLICT-FUNCTION"
               "NAME-CONFLICT-DATUM" "NAME-CONFLICT-SYMBOLS"
               "RESOLVE-CONFLICT"

               "PRINT-UNREADABLY"

               ;; and a mechanism for controlling same at compile time
               "MUFFLE-CONDITIONS" "UNMUFFLE-CONDITIONS"

               ;; and one for controlling same at runtime
               "*MUFFLED-WARNINGS*"

               ;; specification which print errors to ignore ala *break-on-signal*
               "*SUPPRESS-PRINT-ERRORS*"

               ;; extended declarations..
               "ALWAYS-BOUND" "FREEZE-TYPE" "GLOBAL" "INHIBIT-WARNINGS"
               "MAYBE-INLINE"

               ;; ..and variables to control compiler policy
               "*INLINE-EXPANSION-LIMIT*"
               "*DERIVE-FUNCTION-TYPES*"

               ;; ..and inspector of compiler policy
               "DESCRIBE-COMPILER-POLICY"
               "RESTRICT-COMPILER-POLICY"

               ;; a special form for breaking out of our "declarations
               ;; are assertions" default
               "TRULY-THE"

               ;; Misc. array and vector tools.
               "ARRAY-STORAGE-VECTOR"

               ;; This is something which must exist inside any Common
               ;; Lisp implementation, and which someone writing a
               ;; customized toplevel might well want. It seems perverse
               ;; to hide it from them..
               "INTERACTIVE-EVAL"

               ;; Used by LOAD and EVAL-WHEN to pass toplevel indexes
               ;; to compiler.
               "EVAL-TLF"

               ;; weak pointers and finalization
               "CANCEL-FINALIZATION"
               "FINALIZE"
               "MAKE-WEAK-POINTER"
               "WEAK-POINTER"
               "WEAK-POINTER-P"
               "WEAK-POINTER-VALUE"

               ;; Hash table extensions
               "DEFINE-HASH-TABLE-TEST"
               "HASH-TABLE-SYNCHRONIZED-P"
               "HASH-TABLE-WEAKNESS"
               "WITH-LOCKED-HASH-TABLE"

               ;; If the user knows we're doing IEEE, he might reasonably
               ;; want to do this stuff.
               "FLOAT-DENORMALIZED-P"
               "FLOAT-NAN-P" "FLOAT-TRAPPING-NAN-P"
               "FLOAT-INFINITY-P"
               "SHORT-FLOAT-NEGATIVE-INFINITY"
               "SHORT-FLOAT-POSITIVE-INFINITY"
               "SINGLE-FLOAT-NEGATIVE-INFINITY"
               "SINGLE-FLOAT-POSITIVE-INFINITY"
               "DOUBLE-FLOAT-NEGATIVE-INFINITY"
               "DOUBLE-FLOAT-POSITIVE-INFINITY"
               "LONG-FLOAT-NEGATIVE-INFINITY"
               "LONG-FLOAT-POSITIVE-INFINITY"

               ;; hacks to work around system limitations
               "*INTEXP-MAXIMUM-EXPONENT*" ; since we crash hard when
                                        ; memory is exhausted

               ;; saving Lisp images
               "SAVE-LISP-AND-DIE"

               ;; provided for completeness to make it more convenient
               ;; to use command-line --disable-debugger functionality
               ;; in oddball situations (like building core files using
               ;; scripts which run unattended, when the core files are
               ;; intended for interactive use)
               "DISABLE-DEBUGGER"
               "ENABLE-DEBUGGER"

               ;; the mechanism by which {en,dis}able-debugger works is
               ;; also exported for people writing alternative toplevels
               ;; (Emacs, CLIM interfaces, etc)
               "*INVOKE-DEBUGGER-HOOK*"

               ;; miscellaneous useful supported extensions
               "QUIT" "EXIT"
               "*ED-FUNCTIONS*"
               "*MODULE-PROVIDER-FUNCTIONS*"
               "MAP-DIRECTORY"
               "WITH-TIMEOUT" "TIMEOUT"
               "SEED-RANDOM-STATE"
               "TYPEXPAND-1" "TYPEXPAND" "TYPEXPAND-ALL"
               "DEFINED-TYPE-NAME-P" "VALID-TYPE-SPECIFIER-P"
               "DELETE-DIRECTORY"
               "SET-SBCL-SOURCE-LOCATION"
               "*DISASSEMBLE-ANNOTATE*"
               "PRINT-SYMBOL-WITH-PREFIX"

               ;; stepping interface
               "STEP-CONDITION" "STEP-FORM-CONDITION" "STEP-FINISHED-CONDITION"
               "STEP-VALUES-CONDITION" "STEP-VARIABLE-CONDITION"
               "STEP-CONDITION-FORM" "STEP-CONDITION-RESULT"
               "STEP-CONTINUE" "STEP-NEXT" "STEP-INTO"
               "STEP-CONDITION-ARGS" "*STEPPER-HOOK*" "STEP-OUT"

               ;; RUN-PROGRAM is not only useful for users, but also
               ;; useful to implement parts of SBCL itself, so we're
               ;; going to have to implement it anyway, so we might
               ;; as well support it. And then once we're committed
               ;; to implementing RUN-PROGRAM, it's nice to have it
               ;; return a PROCESS object with operations defined on
               ;; that object.
               "RUN-PROGRAM"
               "PROCESS-ALIVE-P" "PROCESS-CLOSE"
               "PROCESS-CORE-DUMPED" "PROCESS-ERROR" "PROCESS-EXIT-CODE"
               "PROCESS-INPUT" "PROCESS-KILL" "PROCESS-OUTPUT" "PROCESS-P"
               "PROCESS-PID" "PROCESS-PLIST" "PROCESS-PTY" "PROCESS-STATUS"
               "PROCESS-STATUS-HOOK" "PROCESS-WAIT"

               ;; pathnames
               "NATIVE-PATHNAME"
               "PARSE-NATIVE-NAMESTRING"
               "NATIVE-NAMESTRING"

               ;; external-format support
               "OCTETS-TO-STRING" "STRING-TO-OCTETS"

               ;; Whether to use the interpreter or the compiler for EVAL
               "*EVALUATOR-MODE*"

               ;; timer
               "TIMER" "MAKE-TIMER" "TIMER-NAME" "TIMER-SCHEDULED-P"
               "SCHEDULE-TIMER" "UNSCHEDULE-TIMER" "LIST-ALL-TIMERS"

               ;; SIMD pack
               #!+sb-simd-pack "SIMD-PACK"
               #!+sb-simd-pack "SIMD-PACK-P"
               #!+sb-simd-pack "%MAKE-SIMD-PACK-UB32"
               #!+sb-simd-pack "%MAKE-SIMD-PACK-UB64"
               #!+sb-simd-pack "%MAKE-SIMD-PACK-DOUBLE"
               #!+sb-simd-pack "%MAKE-SIMD-PACK-SINGLE"
               #!+sb-simd-pack "%SIMD-PACK-UB32S"
               #!+sb-simd-pack "%SIMD-PACK-UB64S"
               #!+sb-simd-pack "%SIMD-PACK-DOUBLES"
               #!+sb-simd-pack "%SIMD-PACK-SINGLES"))

   #s(sb-cold:package-data
      :name "SB!FORMAT"
      :doc "private: implementation of FORMAT and friends"
      :use ("CL" "SB!EXT" "SB!INT" "SB!KERNEL")
      :export ("%COMPILER-WALK-FORMAT-STRING" "FORMAT-ERROR"))

   #s(sb-cold:package-data
      :name "SB!GRAY"
      :doc
      "public: an implementation of the stream-definition-by-user
Lisp extension proposal by David N. Gray"
      :use ("CL" "SB!EXT" "SB!INT" "SB!KERNEL")
      :export ("FUNDAMENTAL-BINARY-STREAM"
               "FUNDAMENTAL-BINARY-INPUT-STREAM"
               "FUNDAMENTAL-BINARY-OUTPUT-STREAM" "FUNDAMENTAL-CHARACTER-STREAM"
               "FUNDAMENTAL-CHARACTER-INPUT-STREAM"
               "FUNDAMENTAL-CHARACTER-OUTPUT-STREAM"
               "FUNDAMENTAL-INPUT-STREAM" "FUNDAMENTAL-OUTPUT-STREAM"
               "FUNDAMENTAL-STREAM"
               "STREAM-ADVANCE-TO-COLUMN" "STREAM-CLEAR-INPUT"
               "STREAM-CLEAR-OUTPUT" "STREAM-FILE-POSITION" "STREAM-FINISH-OUTPUT" "STREAM-FORCE-OUTPUT"
               "STREAM-FRESH-LINE" "STREAM-LINE-COLUMN" "STREAM-LINE-LENGTH"
               "STREAM-LISTEN" "STREAM-PEEK-CHAR" "STREAM-READ-BYTE"
               "STREAM-READ-CHAR" "STREAM-READ-CHAR-NO-HANG" "STREAM-READ-LINE"
               "STREAM-READ-SEQUENCE" "STREAM-START-LINE-P" "STREAM-TERPRI"
               "STREAM-UNREAD-CHAR"
               "STREAM-WRITE-BYTE" "STREAM-WRITE-CHAR" "STREAM-WRITE-SEQUENCE"
               "STREAM-WRITE-STRING"))

   #s(sb-cold:package-data
      :name "SB!INT"
      :doc
      "private: miscellaneous unsupported extensions to the ANSI spec. Much of
the stuff in here originated in CMU CL's EXTENSIONS package and is retained,
possibly temporariliy, because it might be used internally."
      :use ("CL" "SB!ALIEN" "SB!GRAY" "SB!FASL" "SB!SYS")
      :export (;; lambda list keyword extensions
               "&MORE"

               ;; utilities for floating point zero handling
               "FP-ZERO-P"
               "NEG-FP-ZERO"

               ;; Stack allocation without any questions asked
               "TRULY-DYNAMIC-EXTENT"

               ;; Like WITH-LOCKED-HASH-TABLE, but disabled interrupts
               "WITH-LOCKED-SYSTEM-TABLE"

               ;; generic set implementation
               "ADD-TO-XSET"
               "ALLOC-XSET"
               "MAP-XSET"
               "XSET"
               "XSET-COUNT"
               "XSET-EMPTY-P"
               "XSET-INTERSECTION"
               "XSET-MEMBER-P"
               "XSET-MEMBERS"
               "XSET-SUBSET-P"
               "XSET-UNION"

               ;; communication between the runtime and Lisp
               "*CORE-STRING*"

               ;; INFO stuff doesn't belong in a user-visible package, we
               ;; should be able to change it without apology.
               "*INFO-ENVIRONMENT*"
               "CLEAR-INFO"
               "COMPACT-INFO-ENVIRONMENT"
               "DEFINE-INFO-CLASS" "DEFINE-INFO-TYPE"
               "DO-INFO"
               "INFO"
               "MAKE-INFO-ENVIRONMENT"

               ;; Calling a list of hook functions, plus error handling.
               "CALL-HOOKS"

               ;; Constant form evaluation
               "CONSTANT-FORM-VALUE"
               "CONSTANT-TYPEP"

               ;; stepping control
               "*STEPPING*"

               ;; packages grabbed once and for all
               "*KEYWORD-PACKAGE*" "*CL-PACKAGE*"

               ;; hash mixing operations
               "MIX" "MIXF"

               ;; Macroexpansion that doesn't touch special forms
               "%MACROEXPAND"
               "%MACROEXPAND-1"

               ;; I'm not convinced that FDEFINITIONs are the ideal
               ;; solution, so exposing ways to peek into the system
               ;; seems undesirable, since it makes it harder to get
               ;; rid of FDEFINITIONs entirely later.
               "*SETF-FDEFINITION-HOOK*"

               ;; error-reporting facilities
               "ARGUMENTS-OUT-OF-DOMAIN-ERROR"
               "BAD-TYPE"
               "CLOSED-STREAM-ERROR"
               "COMPILED-PROGRAM-ERROR"
               "COMPILER-MACRO-KEYWORD-PROBLEM"
               "ENCAPSULATED-CONDITION"
               "INTERPRETED-PROGRAM-ERROR"
               "INVALID-ARRAY-ERROR"
               "INVALID-ARRAY-INDEX-ERROR"
               "INVALID-ARRAY-P"
               "SIMPLE-CONTROL-ERROR" "SIMPLE-FILE-ERROR"
               "SIMPLE-PARSE-ERROR" "SIMPLE-PROGRAM-ERROR"
               "SIMPLE-READER-ERROR"
               "SIMPLE-READER-PACKAGE-ERROR"
               "SIMPLE-REFERENCE-ERROR"
               "SIMPLE-REFERENCE-WARNING"
               "SIMPLE-STREAM-ERROR"
               "SIMPLE-STORAGE-CONDITION"
               "SIMPLE-STYLE-WARNING"
               "TRY-RESTART"

               ;; error-signalling facilities
               "STANDARD-READTABLE-MODIFIED-ERROR"
               "STANDARD-PPRINT-DISPATCH-TABLE-MODIFIED-ERROR"
               "ARRAY-BOUNDING-INDICES-BAD-ERROR"
               "CIRCULAR-LIST-ERROR"
               "SEQUENCE-BOUNDING-INDICES-BAD-ERROR"
               "SPECIAL-FORM-FUNCTION"
               "STYLE-WARN" "SIMPLE-COMPILER-NOTE"
               "TWO-ARG-CHAR-EQUAL" "TWO-ARG-CHAR-NOT-EQUAL"
               "TWO-ARG-CHAR-LESSP" "TWO-ARG-CHAR-NOT-LESSP"
               "TWO-ARG-CHAR-GREATERP" "TWO-ARG-CHAR-NOT-GREATERP"
               "CHAR-EQUAL-CONSTANT"
               ;; FIXME: potential SB!EXT exports
               "CHARACTER-CODING-ERROR"
               "CHARACTER-DECODING-ERROR" "CHARACTER-DECODING-ERROR-OCTETS"
               "CHARACTER-ENCODING-ERROR" "CHARACTER-ENCODING-ERROR-CODE"
               "STREAM-DECODING-ERROR" "STREAM-ENCODING-ERROR"
               "C-STRING-ENCODING-ERROR"
               "C-STRING-DECODING-ERROR"
               "ATTEMPT-RESYNC" "FORCE-END-OF-FILE"

               ;; bootstrapping magic, to make things happen both in
               ;; the cross-compilation host compiler's environment and
               ;; in the cross-compiler's environment
               "DEF!CONSTANT" "DEF!MACRO" "DEF!METHOD" "DEF!STRUCT" "DEF!TYPE"

               ;; stuff for hinting to the compiler
               "NAMED-LAMBDA"

               ;; other variations on DEFFOO stuff useful for bootstrapping
               ;; and cross-compiling
               "DEFMACRO-MUNDANELY"
               "DEFCONSTANT-EQX"
               "DEFINE-UNSUPPORTED-FUN"

               ;; messing with PATHNAMEs
               "MAKE-TRIVIAL-DEFAULT-PATHNAME"
               "PHYSICALIZE-PATHNAME"
               "SANE-DEFAULT-PATHNAME-DEFAULTS"
               "SBCL-HOMEDIR-PATHNAME"
               "SIMPLIFY-NAMESTRING"

               "*N-BYTES-FREED-OR-PURIFIED*"

               ;; Deprecating stuff
               "DEFINE-DEPRECATED-FUNCTION"
               "DEFINE-DEPRECATED-VARIABLE"
               "DEPRECATED-VARIABLE"
               "CHECK-DEPRECATED-VARIABLE"
               "EARLY-DEPRECATION-WARNING"
               "LATE-DEPRECATION-WARNING"
               "FINAL-DEPRECATION-WARNING"
               "DEPRECATION-WARNING"
               "DEPRECATION-ERROR"

               ;; miscellaneous non-standard but handy user-level functions..
               "ASSQ" "DELQ" "MEMQ" "POSQ" "NEQ"
               "ADJUST-LIST"
               "%FIND-PACKAGE-OR-LOSE" "FIND-UNDELETED-PACKAGE-OR-LOSE"
               "SANE-PACKAGE"
               "MAYBE-CYCLIC-P"
               "COMPOUND-OBJECT-P"
               "SWAPPED-ARGS-FUN"
               "AND/TYPE" "NOT/TYPE"
               "ANY/TYPE" "EVERY/TYPE"
               "EQUAL-BUT-NO-CAR-RECURSION"
               "TYPE-BOUND-NUMBER"
               "CONSTANTLY-T" "CONSTANTLY-NIL" "CONSTANTLY-0"
               "PSXHASH"
               "%BREAK"
               "NTH-BUT-WITH-SANE-ARG-ORDER"
               "BIT-VECTOR-="
               "PATHNAME="
               "HASH-TABLE-EQUALP"
               "READ-EVALUATED-FORM"
               "MAKE-UNPRINTABLE-OBJECT"
               "POWER-OF-TWO-CEILING"
               "PRINT-NOT-READABLE-ERROR"

               ;; ..and macros..
               "COLLECT"
               "DO-ANONYMOUS" "DOVECTOR" "DOHASH" "DOPLIST"
               "NAMED-LET"
               "ONCE-ONLY"
               "DEFENUM"
               "DEFPRINTER"
               "AVER" "ENFORCE-TYPE"
               "DX-FLET" "DX-LET"
               "AWHEN" "ACOND" "IT"
               "BINDING*"
               "!DEF-BOOLEAN-ATTRIBUTE"
               "WITH-REBOUND-IO-SYNTAX"
               "WITH-SANE-IO-SYNTAX"
               "WITH-PROGRESSIVE-TIMEOUT"

               ;; ..and CONDITIONs..
               "BUG"
               "UNSUPPORTED-OPERATOR"

               "BOOTSTRAP-PACKAGE-NAME"
               "BOOTSTRAP-PACKAGE-NOT-FOUND"
               "DEBOOTSTRAP-PACKAGE"

               "REFERENCE-CONDITION" "REFERENCE-CONDITION-REFERENCES"
               "*PRINT-CONDITION-REFERENCES*"

               "DUPLICATE-DEFINITION" "DUPLICATE-DEFINITION-NAME"
               "PACKAGE-AT-VARIANCE"
               "PACKAGE-AT-VARIANCE-ERROR"
               "ARRAY-INITIAL-ELEMENT-MISMATCH"
               "TYPE-WARNING" "TYPE-STYLE-WARNING"
               "LOCAL-ARGUMENT-MISMATCH"
               "FORMAT-ARGS-MISMATCH" "FORMAT-TOO-FEW-ARGS-WARNING"
               "FORMAT-TOO-MANY-ARGS-WARNING" "EXTENSION-FAILURE"
               "STRUCTURE-INITARG-NOT-KEYWORD" "CONSTANT-MODIFIED"

               ;; ..and DEFTYPEs..
               "MAX-HASH" "HASH"
               "INDEX" "LOAD/STORE-INDEX"
               "SIGNED-BYTE-WITH-A-BITE-OUT"
               "UNSIGNED-BYTE-WITH-A-BITE-OUT"
               "SFUNCTION" "UNSIGNED-BYTE*"
               "CONSTANT-DISPLACEMENT"
               ;; ..and type predicates
               "DOUBLE-FLOAT-P"
               "LOGICAL-PATHNAME-P"
               "LONG-FLOAT-P"
               "SHORT-FLOAT-P"
               "SINGLE-FLOAT-P"
               "FIXNUMP"
               "BIGNUMP"
               "RATIOP"

               ;; encapsulation
               "ARG-LIST"
               "BASIC-DEFINITION"
               "ENCAPSULATE" "ENCAPSULATED-P"
               "UNENCAPSULATE"

               ;; various CHAR-CODEs
               "BACKSPACE-CHAR-CODE" "BELL-CHAR-CODE" "ESCAPE-CHAR-CODE"
               "FORM-FEED-CHAR-CODE" "LINE-FEED-CHAR-CODE"
               "RETURN-CHAR-CODE" "RUBOUT-CHAR-CODE" "TAB-CHAR-CODE"

               ;; symbol-hacking idioms
               "GENSYMIFY" "KEYWORDICATE" "SYMBOLICATE"

               ;; certainly doesn't belong in public extensions
               ;; FIXME: maybe belongs in %KERNEL with other typesystem stuff?
               "CONSTANT-ARG"

               ;; various internal defaults
               "*DEFAULT-INIT-CHAR-FORM*"
               "*LOAD-SOURCE-DEFAULT-TYPE*" "BASE-CHAR-CODE-LIMIT"

               ;; hash caches
               "DEFINE-HASH-CACHE"
               "DEFUN-CACHED"
               "DEFINE-CACHED-SYNONYM"
               "DROP-ALL-HASH-CACHES"

               ;; time
               "FORMAT-DECODED-TIME"
               "FORMAT-UNIVERSAL-TIME"

               ;; used for FORMAT tilde paren
               "MAKE-CASE-FROB-STREAM"

               ;; helpers for C library calls
               "STRERROR" "SIMPLE-PERROR"

               ;; debuggers' little helpers
               #!+sb-show "*/SHOW*"
               #!+sb-show "HEXSTR"
               "/SHOW"  "/NOSHOW"
               "/XHOW"  "/NOXHOW"
               "/SHOW0" "/NOSHOW0"
               "/HEXSTR" "/NOHEXSTR"
               "/PRIMITIVE-PRINT"

               ;; cross-compilation bootstrap hacks which turn into
               ;; placeholders in a target system
               "UNCROSS"

               ;; might as well be shared among the various files which
               ;; need it:
               "*EOF-OBJECT*"

               ;; allocation to static space
               "MAKE-STATIC-VECTOR"

               ;; alien interface utilities
               "C-STRINGS->STRING-LIST"

               ;; misc. utilities used internally
               "DEFINE-FUNCTION-NAME-SYNTAX" "VALID-FUNCTION-NAME-P" ; should be SB!EXT?
               "LEGAL-FUN-NAME-P" "LEGAL-FUN-NAME-OR-TYPE-ERROR"
               "FUN-NAME-BLOCK-NAME"
               "FUN-NAME-INLINE-EXPANSION"
               "LISTEN-SKIP-WHITESPACE"
               "PACKAGE-INTERNAL-SYMBOL-COUNT" "PACKAGE-EXTERNAL-SYMBOL-COUNT"
               "PARSE-BODY" "PARSE-LAMBDA-LIST" "PARSE-LAMBDA-LIST-LIKE-THING"
               "PROPER-LIST-OF-LENGTH-P" "PROPER-LIST-P"
               "LIST-OF-LENGTH-AT-LEAST-P"
               "LIST-WITH-LENGTH-P"
               "SINGLETON-P"
              "MISSING-ARG"
               "FEATUREP"
               "FLUSH-STANDARD-OUTPUT-STREAMS"
               "WITH-UNIQUE-NAMES" "MAKE-GENSYM-LIST"
               "ABOUT-TO-MODIFY-SYMBOL-VALUE"
               "SELF-EVALUATING-P"
               "PRINT-PRETTY-ON-STREAM-P"
               "ARRAY-READABLY-PRINTABLE-P"
               "LOOKS-LIKE-NAME-OF-SPECIAL-VAR-P"
               "POSITIVE-PRIMEP"
               "EVAL-IN-LEXENV"
               "SIMPLE-EVAL-IN-LEXENV"
               "FORCE" "DELAY" "PROMISE-READY-P"
               "FIND-RESTART-OR-CONTROL-ERROR"
               "LOAD-AS-SOURCE"

               ;; These could be moved back into SB!EXT if someone has
               ;; compelling reasons, but hopefully we can get by
               ;; without supporting them, at least not as publicly
               ;; accessible things with fixed interfaces.
               "GET-FLOATING-POINT-MODES"
               "SET-FLOATING-POINT-MODES"
               "WITH-FLOAT-TRAPS-MASKED"

               ;; compatibility hacks for old-style CMU CL data formats
               "UNIX-ENVIRONMENT-CMUCL-FROM-SBCL"
               "UNIX-ENVIRONMENT-SBCL-FROM-CMUCL"

               ;; a sort of quasi-unbound tag for use in hash tables
               "+EMPTY-HT-SLOT+"

               ;; low-level i/o stuff
               "DONE-WITH-FAST-READ-CHAR"
               "FAST-READ-BYTE"
               "FAST-READ-BYTE-REFILL"
               "FAST-READ-CHAR"
               "FAST-READ-CHAR-REFILL"
               "FAST-READ-S-INTEGER"
               "FAST-READ-U-INTEGER"
               "FAST-READ-VAR-U-INTEGER"
               "FILE-NAME"
               "INTERN*"
               "WITH-FAST-READ-BYTE"
               "PREPARE-FOR-FAST-READ-CHAR"

               ;; reflection of our backquote implementation that the
               ;; pprinter needs
               "*BACKQ-TOKENS*"

               ;; hackery to help set up for cold init
               "!BEGIN-COLLECTING-COLD-INIT-FORMS"
               "!COLD-INIT-FORMS"
               "COLD-FSET"
               "!DEFUN-FROM-COLLECTED-COLD-INIT-FORMS"

               ;; catch tags
               "TOPLEVEL-CATCHER"

               ;; hooks for contrib/ stuff we're insufficiently sure
               ;; about to add to SB!EXT
               "*REPL-PROMPT-FUN*"
               "*REPL-READ-FORM-FUN*"))

   ;; FIXME: This package is awfully huge. It'd probably be good to
   ;; split it. There's at least one natural way to split it: the
   ;; implementation of the Lisp type system (e.g. TYPE-INTERSECTION and
   ;; SPECIFIER-TYPE) could move to a separate package SB!TYPE. (There's
   ;; lots of stuff which currently uses the SB!KERNEL package which
   ;; doesn't actually use the type system stuff.) And maybe other
   ;; possible splits too:
   ;;   * Pull GC stuff (*GC-INHIBIT*, *GC-PENDING*, etc.)
   ;;     out into SB-GC.
   ;;   * Pull special case implementations of sequence functions (e.g.
   ;;     %MAP-TO-LIST-ARITY-1 and %FIND-POSITION-IF-NOT) and
   ;;     other sequence function implementation grot into SB-SEQ.
   ;;   * Pull all the math stuff (%ACOS, %COSH, WORD-LOGICAL-AND...)
   ;;     into SB-MATH.
   ;;   * Pull all the array stuff (%ARRAY-DATA-VECTOR,
   ;;     WITH-ARRAY-DATA, ALLOCATE-VECTOR, HAIRY-DATA-VECTOR-REF...)
   ;;     into SB-ARRAY.
   ;;   * Pull all the streams stuff out into SB-STREAM.
   ;;   * Pull all the OBJECT-NOT-FOO symbols out. Maybe we could even
   ;;     figure out a way to stop exporting them? Failing that,
   ;;     they could be in SB-INTERR.
   #s(sb-cold:package-data
      :name "SB!KERNEL"
      :doc
      "private: Theoretically this 'hides state and types used for package
integration' (said CMU CL architecture.tex) and that probably was and
is a good idea, but see SB-SYS re. blurring of boundaries."
      :use ("CL" "SB!ALIEN" "SB!ALIEN-INTERNALS" "SB!BIGNUM"
                 "SB!EXT" "SB!FASL" "SB!INT" "SB!SYS" "SB!GRAY")
      :reexport ("DEF!STRUCT"
                 "DEF!MACRO"
                 #!+sb-simd-pack "SIMD-PACK"
                 #!+sb-simd-pack "SIMD-PACK-P"
                 #!+sb-simd-pack "%MAKE-SIMD-PACK-UB32"
                 #!+sb-simd-pack "%MAKE-SIMD-PACK-UB64"
                 #!+sb-simd-pack "%MAKE-SIMD-PACK-DOUBLE"
                 #!+sb-simd-pack "%MAKE-SIMD-PACK-SINGLE"
                 #!+sb-simd-pack "%SIMD-PACK-UB32S"
                 #!+sb-simd-pack "%SIMD-PACK-UB64S"
                 #!+sb-simd-pack "%SIMD-PACK-DOUBLES"
                 #!+sb-simd-pack "%SIMD-PACK-SINGLES")
      :export ("%ACOS"
               "%ACOSH"
               "%ADJOIN"
               "%ADJOIN-EQ"
               "%ADJOIN-KEY"
               "%ADJOIN-KEY-EQ"
               "%ADJOIN-KEY-TEST"
               "%ADJOIN-KEY-TEST-NOT"
               "%ADJOIN-TEST"
               "%ADJOIN-TEST-NOT"
               "%ARRAY-AVAILABLE-ELEMENTS" "%ARRAY-DATA-VECTOR"
               "%ARRAY-DIMENSION" "%ARRAY-DISPLACED-P"
               "%ARRAY-DISPLACED-FROM"
               "%ARRAY-DISPLACEMENT" "%ARRAY-FILL-POINTER"
               "%ARRAY-FILL-POINTER-P" "%ARRAY-RANK"
               #!+(or x86 x86-64 ppc)
               "%ARRAY-ATOMIC-INCF/WORD"
               #!+ash-right-vops "%ASH/RIGHT"
               "%ASSOC"
               "%ASSOC-EQ"
               "%ASSOC-IF"
               "%ASSOC-IF-KEY"
               "%ASSOC-IF-NOT"
               "%ASSOC-IF-NOT-KEY"
               "%ASSOC-KEY"
               "%ASSOC-KEY-EQ"
               "%ASSOC-KEY-TEST"
               "%ASSOC-KEY-TEST-NOT"
               "%ASSOC-TEST"
               "%ASSOC-TEST-NOT"
               "%ASIN" "%ASINH"
               "%ATAN" "%ATAN2" "%ATANH"
               "%CALLER-FRAME"
               "%CALLER-PC"
               "%CEILING"
               "%CHECK-BOUND"
               "%CHECK-GENERIC-SEQUENCE-BOUNDS"
               "%CHECK-VECTOR-SEQUENCE-BOUNDS"
               "%COMPARE-AND-SWAP-CAR"
               "%COMPARE-AND-SWAP-CDR"
               "%COMPARE-AND-SWAP-INSTANCE-REF"
               "%COMPARE-AND-SWAP-SVREF"
               "%COMPARE-AND-SWAP-SYMBOL-PLIST"
               "%COMPARE-AND-SWAP-SYMBOL-VALUE"
               "%CONCATENATE-TO-BASE-STRING"
               "%CONCATENATE-TO-STRING"
               "%COS" "%COS-QUICK"
               "%COSH" "%DATA-VECTOR-AND-INDEX" "%DEPOSIT-FIELD"
               "%DOUBLE-FLOAT" "%DPB" "%EQL"
               "%EXIT"
               "%EXP" "%EXPM1"
               "%FLOOR"
               "%FIND-POSITION"
               "%FIND-POSITION-VECTOR-MACRO" "%FIND-POSITION-IF"
               "%FIND-POSITION-IF-VECTOR-MACRO" "%FIND-POSITION-IF-NOT"
               "%FIND-POSITION-IF-NOT-VECTOR-MACRO"
               "FIXNUM-MOD-P"
               "%HYPOT" "%LDB" "%LOG" "%LOGB" "%LOG10"
               "%LAST0"
               "%LAST1"
               "%LASTN/FIXNUM"
               "%LASTN/BIGNUM"
               "%LOG1P"
               #!+long-float "%LONG-FLOAT"
               "%MAKE-COMPLEX" "%MAKE-FUNCALLABLE-INSTANCE"
               "%MAKE-FUNCALLABLE-STRUCTURE-INSTANCE-ALLOCATOR"
               "%MAKE-RATIO" "%MAKE-LISP-OBJ"
               "%MAKE-INSTANCE"
               #!+sb-simd-pack "%MAKE-SIMD-PACK"
               "%MAKE-STRUCTURE-INSTANCE"
               "%MAKE-STRUCTURE-INSTANCE-ALLOCATOR"
               "%MAP" "%MAP-TO-SIMPLE-VECTOR-ARITY-1"
               "%MAP-TO-LIST-ARITY-1"
               "%MASK-FIELD"
               "%MEMBER"
               "%MEMBER-EQ"
               "%MEMBER-IF"
               "%MEMBER-IF-KEY"
               "%MEMBER-IF-NOT"
               "%MEMBER-IF-NOT-KEY"
               "%MEMBER-KEY"
               "%MEMBER-KEY-EQ"
               "%MEMBER-KEY-TEST"
               "%MEMBER-KEY-TEST-NOT"
               "%MEMBER-TEST"
               "%MEMBER-TEST-NOT"
               "%MULTIPLY-HIGH"
               "%NEGATE" "%POW"
               "%OTHER-POINTER-WIDETAG"
               "%PUTHASH"
               "%RASSOC"
               "%RASSOC-EQ"
               "%RASSOC-IF"
               "%RASSOC-IF-KEY"
               "%RASSOC-IF-NOT"
               "%RASSOC-IF-NOT-KEY"
               "%RASSOC-KEY"
               "%RASSOC-KEY-EQ"
               "%RASSOC-KEY-TEST"
               "%RASSOC-KEY-TEST-NOT"
               "%RASSOC-TEST"
               "%RASSOC-TEST-NOT"
               "%VECTOR-RAW-BITS"
               "%SCALB" "%SCALBN"
               #!+(or x86 x86-64 ppc)
               "%RAW-INSTANCE-ATOMIC-INCF/WORD"
               "%RAW-INSTANCE-REF/WORD" "%RAW-INSTANCE-SET/WORD"
               "%RAW-INSTANCE-REF/SINGLE" "%RAW-INSTANCE-SET/SINGLE"
               "%RAW-INSTANCE-REF/DOUBLE" "%RAW-INSTANCE-SET/DOUBLE"
               "%RAW-INSTANCE-REF/COMPLEX-SINGLE"
               "%RAW-INSTANCE-SET/COMPLEX-SINGLE"
               "%RAW-INSTANCE-REF/COMPLEX-DOUBLE"
               "%RAW-INSTANCE-SET/COMPLEX-DOUBLE"
               "%SET-ARRAY-DIMENSION" "%SET-FUNCALLABLE-INSTANCE-INFO"
               "%SET-VECTOR-RAW-BITS"
               "%SET-SAP-REF-16" "%SET-SAP-REF-32" "%SET-SAP-REF-64"
               "%SET-SAP-REF-WORD" "%SET-SAP-REF-8" "%SET-SAP-REF-DOUBLE"
               "%SET-SAP-REF-LISPOBJ" "%SET-SAP-REF-LONG" "%SET-SAP-REF-SAP"
               "%SET-SAP-REF-SINGLE" "%SET-SIGNED-SAP-REF-16"
               "%SET-SIGNED-SAP-REF-32" "%SET-SIGNED-SAP-REF-64"
               "%SET-SIGNED-SAP-REF-WORD"
               "%SET-SIGNED-SAP-REF-8" "%SET-STACK-REF"
               "%SET-SYMBOL-HASH"
               "%SIN" "%SIN-QUICK" "%SINGLE-FLOAT"
               "%SINH" "%SQRT" "%SXHASH-SIMPLE-STRING"
               #!+sb-simd-pack "%SIMD-PACK-TAG"
               #!+sb-simd-pack "%SIMD-PACK-LOW"
               #!+sb-simd-pack "%SIMD-PACK-HIGH"
               "%SXHASH-SIMPLE-SUBSTRING" "%TAN" "%TAN-QUICK" "%TANH"
               "%UNARY-ROUND"
               "%UNARY-TRUNCATE"
               "%UNARY-TRUNCATE/SINGLE-FLOAT"
               "%UNARY-TRUNCATE/DOUBLE-FLOAT"
               "%UNARY-FTRUNCATE"
               "%WITH-ARRAY-DATA"
               "%WITH-ARRAY-DATA/FP"
               "%WITH-ARRAY-DATA-MACRO"
               "*APPROXIMATE-NUMERIC-UNIONS*"
               "*CURRENT-LEVEL-IN-PRINT*"
               "*EMPTY-TYPE*"
               "*EVAL-CALLS*"
               "*GC-INHIBIT*" "*GC-PENDING*"
               #!+sb-thread "*STOP-FOR-GC-PENDING*"
               "*UNIVERSAL-TYPE*"
               "*UNIVERSAL-FUN-TYPE*" "*UNPARSE-FUN-TYPE-SIMPLIFY*"
               "*WILD-TYPE*" "WORD-LOGICAL-AND" "WORD-LOGICAL-ANDC1"
               "WORD-LOGICAL-ANDC2" "WORD-LOGICAL-EQV"
               "WORD-LOGICAL-NAND" "WORD-LOGICAL-NOR" "WORD-LOGICAL-NOT"
               "WORD-LOGICAL-OR" "WORD-LOGICAL-ORC1" "WORD-LOGICAL-ORC2"
               "WORD-LOGICAL-XOR" "ALIEN-TYPE-TYPE"
               "ALIEN-TYPE-TYPE-ALIEN-TYPE" "ALIEN-TYPE-TYPE-P"
               "ALLOCATE-VECTOR" "ALLOCATE-STATIC-VECTOR"
               "ASSERT-SYMBOL-HOME-PACKAGE-UNLOCKED"
               "PROGRAM-ASSERT-SYMBOL-HOME-PACKAGE-UNLOCKED"
               "DISABLED-PACKAGE-LOCKS"
               "WITH-SINGLE-PACKAGE-LOCKED-ERROR"
               "ALWAYS-SUBTYPEP"
               "ARGS-TYPE" "ARGS-TYPE-ALLOWP" "ARGS-TYPE-KEYP"
               "ARGS-TYPE-KEYWORDS" "ARGS-TYPE-OPTIONAL" "ARGS-TYPE-P"
               "ARGS-TYPE-REQUIRED" "ARGS-TYPE-REST" "ARRAY-HEADER-P"
               "ARRAY-TYPE" "ARRAY-TYPE-COMPLEXP"
               "ARRAY-TYPE-DIMENSIONS" "ARRAY-TYPE-ELEMENT-TYPE"
               "ARRAY-TYPE-P" "ARRAY-TYPE-SPECIALIZED-ELEMENT-TYPE"
               "ASSERT-ERROR"
               #!+sb-unicode "BASE-CHAR-P"
               "BASE-STRING-P"
               "BINDING-STACK-POINTER-SAP" "BIT-INDEX"
               "BOGUS-ARG-TO-VALUES-LIST-ERROR" "BOOLE-CODE"
               "BOUNDING-INDICES-BAD-ERROR" "BYTE-SPECIFIER" "%BYTE-BLT"
               "CALLABLE" "CASE-BODY-ERROR"
               "CHARACTER-SET" "CHARACTER-SET-TYPE"
               "CHARACTER-SET-TYPE-PAIRS"
               #!+sb-unicode "CHARACTER-STRING-P"
               "CHARPOS"
               "CHECK-FOR-CIRCULARITY" "CHECK-TYPE-ERROR" "CLOSED-FLAME"
               "CODE-COMPONENT" "CODE-COMPONENT-P" "CODE-DEBUG-INFO"
               "CODE-HEADER-REF" "CODE-HEADER-SET" "CODE-INSTRUCTIONS"
               "COERCE-TO-FUN" "COERCE-TO-LEXENV" "COERCE-TO-LIST"
               "COERCE-TO-VALUES" "COERCE-TO-VECTOR"
               "*COLD-INIT-COMPLETE-P*" "COMPLEX-DOUBLE-FLOAT-P"
               "COMPLEX-FLOAT-P"
               #!+long-float "COMPLEX-LONG-FLOAT-P"
               "COMPLEX-RATIONAL-P" "COMPLEX-SINGLE-FLOAT-P"
               "COMPLEX-VECTOR-P" "COMPOUND-TYPE" "COMPOUND-TYPE-P"
               "COMPOUND-TYPE-TYPES" "CONS-TYPE" "CONS-TYPE-CAR-TYPE"
               "CONS-TYPE-CDR-TYPE" "CONS-TYPE-P" "CONSED-SEQUENCE"
               "CONSTANT" "CONSTANT-TYPE" "CONSTANT-TYPE-P"
               "CONSTANT-TYPE-TYPE" "CONTAINING-INTEGER-TYPE"
               "CONTROL-STACK-POINTER-SAP" "COPY-BYTE-VECTOR-TO-SYSTEM-AREA"
               "CSUBTYPEP" "CTYPE" "TYPE-HASH-VALUE" "CTYPE-OF"
               "CTYPE-P" "CTYPEP" "CURRENT-FP" "CURRENT-SP"
               "CURRENT-DYNAMIC-SPACE-START"
               "DATA-VECTOR-REF" "DATA-VECTOR-REF-WITH-OFFSET"
               "DATA-VECTOR-SET" "DATA-VECTOR-SET-WITH-OFFSET"
               "DECLARATION-TYPE-CONFLICT-ERROR"
               "DECODE-DOUBLE-FLOAT"
               #!+long-float "DECODE-LONG-FLOAT"
               "DECODE-SINGLE-FLOAT"
               "DEFINE-STRUCTURE-SLOT-ADDRESSOR"
               "DEFINED-FTYPE-MATCHES-DECLARED-FTYPE-P"
               "!DEFSTRUCT-WITH-ALTERNATE-METACLASS" "DESCEND-INTO"
               "DIVISION-BY-ZERO-ERROR" "DOUBLE-FLOAT-EXPONENT"
               "DOUBLE-FLOAT-HIGH-BITS" "DOUBLE-FLOAT-INT-EXPONENT"
               "DOUBLE-FLOAT-LOW-BITS" "DOUBLE-FLOAT-SIGNIFICAND"
               "FLOAT-WAIT" "DYNAMIC-SPACE-FREE-POINTER" "DYNAMIC-USAGE"
               "EFFECTIVE-FIND-POSITION-TEST"
               "EFFECTIVE-FIND-POSITION-KEY" "ERROR-NUMBER-OR-LOSE"
               "EXTENDED-CHAR-P" "EXTERNAL-FORMAT-DESIGNATOR"
               "FDEFINITION-OBJECT"
               "FDOCUMENTATION" "FILENAME"
               "FIND-AND-INIT-OR-CHECK-LAYOUT"
               "FIND-DEFSTRUCT-DESCRIPTION"
               "FLOAT-EXPONENT"
               "FLOAT-FORMAT-DIGITS" "FLOAT-FORMAT-NAME"
               "FLOAT-FORMAT-MAX" "FLOAT-INT-EXPONENT"
               "FLOATING-POINT-EXCEPTION" "FORM" "FORMAT-CONTROL"
               "*FREE-INTERRUPT-CONTEXT-INDEX*" "FUNCALLABLE-INSTANCE-P"
               "FUN-CODE-HEADER" "FUN-TYPE" "FUN-TYPE-ALLOWP"
               "FUN-TYPE-KEYP" "FUN-TYPE-KEYWORDS" "FUN-TYPE-NARGS"
               "FUN-TYPE-OPTIONAL" "FUN-TYPE-P" "FUN-TYPE-REQUIRED"
               "FUN-TYPE-REST" "FUN-TYPE-RETURNS" "FUN-TYPE-WILD-ARGS"
               "FUN-WORD-OFFSET" "GENERALIZED-BOOLEAN"
               "GET-CLOSURE-LENGTH" "GET-HEADER-DATA"
               "GET-LISP-OBJ-ADDRESS" "LOWTAG-OF" "WIDETAG-OF"
               "HAIRY-DATA-VECTOR-REF"
               "HAIRY-DATA-VECTOR-REF/CHECK-BOUNDS"  "HAIRY-DATA-VECTOR-SET"
               "HAIRY-DATA-VECTOR-SET/CHECK-BOUNDS""HAIRY-TYPE"
               "HAIRY-TYPE-CHECK-TEMPLATE-NAME" "HAIRY-TYPE-SPECIFIER"
               "HANDLE-CIRCULARITY" "HOST" "IGNORE-IT" "ILL-BIN"
               "ILL-BOUT" "ILL-IN" "ILL-OUT" "INDEX-OR-MINUS-1"
               "INDEX-TOO-LARGE-ERROR" "*!INITIAL-ASSEMBLER-ROUTINES*"
               "*!INITIAL-DEBUG-SOURCES*"
               "*!INITIAL-FDEFN-OBJECTS*" "*!INITIAL-FOREIGN-SYMBOLS*"
               "*!INITIAL-LAYOUTS*" "*!INITIAL-SYMBOLS*"
               "INTEGER-DECODE-DOUBLE-FLOAT"
               #!+long-float "INTEGER-DECODE-LONG-FLOAT"
               "INTEGER-DECODE-SINGLE-FLOAT" "INTERNAL-ERROR"
               #!+win32 "HANDLE-WIN32-EXCEPTION"
               "INTERNAL-TIME" "INTERSECTION-TYPE" "INTERSECTION-TYPE-P"
               "INTERSECTION-TYPE-TYPES" "INVALID-ARG-COUNT-ERROR"
               "INVALID-UNWIND-ERROR"
               "IRRATIONAL" "JUST-DUMP-IT-NORMALLY" "KEY-INFO"
               "KEY-INFO-NAME" "KEY-INFO-P" "KEY-INFO-TYPE"
               "LAYOUT-DEPTHOID" "LAYOUT-INVALID-ERROR"
               "LAYOUT-N-UNTAGGED-SLOTS" "LAYOUT-FOR-STD-CLASS-P"
               "LAYOUT-SLOT-TABLE"
               #!+(or x86-64 x86) "%LEA"
               "LEXENV" "LEXENV-DESIGNATOR" "LINE-LENGTH"
               "LIST-COPY-SEQ*"
               "LIST-FILL*"
               "LIST-SUBSEQ*"
               "ANSI-STREAM"
               "ANSI-STREAM-BIN" "ANSI-STREAM-BOUT" "ANSI-STREAM-CLOSE"
               "ANSI-STREAM-ELEMENT-TYPE"
               "ANSI-STREAM-FILE-POSITION"
               "ANSI-STREAM-IN"
               "ANSI-STREAM-IN-BUFFER" "ANSI-STREAM-IN-INDEX"
               "ANSI-STREAM-INPUT-STREAM-P" "ANSI-STREAM-MISC"
               "ANSI-STREAM-N-BIN" "ANSI-STREAM-OPEN-STREAM-P"
               "ANSI-STREAM-OUT" "ANSI-STREAM-SOUT"
               "ANSI-STREAM-OUTPUT-STREAM-P"
               "COMPLEX-VECTOR"
               "LIST-TO-VECTOR*"
               "LOGICAL-HOST" "LOGICAL-HOST-DESIGNATOR"
               #!+long-float "LONG-FLOAT-EXPONENT"
               #!+long-float "LONG-FLOAT-EXP-BITS"
               #!+long-float "LONG-FLOAT-HIGH-BITS"
               #!+long-float "LONG-FLOAT-LOW-BITS"
               #!+long-float "LONG-FLOAT-MID-BITS"
               "LRA" "LRA-CODE-HEADER" "LRA-P"
               "MAKE-ALIEN-TYPE-TYPE"
               "MAKE-ARRAY-HEADER" "MAKE-ARRAY-TYPE" "MAKE-CONS-TYPE"
               "MAKE-DOUBLE-FLOAT" "MAKE-FUN-TYPE" "MAKE-KEY-INFO"
               "MAKE-LISP-OBJ"
               #!+long-float "MAKE-LONG-FLOAT"
               "MAKE-MEMBER-TYPE" "MAKE-NAMED-TYPE" "MAKE-NULL-LEXENV"
               "MAKE-NUMERIC-TYPE"
               "MAKE-SINGLE-FLOAT" "MAKE-SPECIALIZABLE-ARRAY"
               "MAKE-UNPORTABLE-FLOAT"
               "MAKE-SHORT-VALUES-TYPE" "MAKE-SINGLE-VALUE-TYPE"
               "MAKE-VALUE-CELL" "MAKE-VALUES-TYPE"
               "MAPC-MEMBER-TYPE-MEMBERS" "MAPCAR-MEMBER-TYPE-MEMBERS"
               "MEMBER-TYPE" "MEMBER-TYPE-MEMBERS" "MEMBER-TYPE-P"
               "MEMBER-TYPE-SIZE"
               "MODIFIED-NUMERIC-TYPE"
               "MOST-NEGATIVE-EXACTLY-DOUBLE-FLOAT-FIXNUM"
               "MOST-NEGATIVE-EXACTLY-SINGLE-FLOAT-FIXNUM"
               "MOST-POSITIVE-EXACTLY-DOUBLE-FLOAT-FIXNUM"
               "MOST-POSITIVE-EXACTLY-SINGLE-FLOAT-FIXNUM"
               "MUTATOR-SELF" "NAMED-TYPE"
               "NAMED-TYPE-NAME" "NAMED-TYPE-P"
               "NEGATE" "NEGATION-TYPE" "NEGATION-TYPE-TYPE"
               "NIL-ARRAY-ACCESSED-ERROR"
               "NIL-FUN-RETURNED-ERROR"
               "NUMERIC-CONTAGION" "NUMERIC-TYPE"
               "NUMERIC-TYPE-CLASS" "NUMERIC-TYPE-COMPLEXP"
               "NUMERIC-TYPE-EQUAL" "NUMERIC-TYPE-FORMAT"
               "NUMERIC-TYPE-HIGH" "NUMERIC-TYPE-LOW" "NUMERIC-TYPE-P"
               "OBJECT-NOT-ARRAY-ERROR" "OBJECT-NOT-CHARACTER-ERROR"
               "OBJECT-NOT-BASE-STRING-ERROR" "OBJECT-NOT-BIGNUM-ERROR"
               "OBJECT-NOT-BIT-VECTOR-ERROR"
               #!+sb-unicode "OBJECT-NOT-CHARACTER-STRING-ERROR"
               "OBJECT-NOT-COMPLEX-ERROR"
               "OBJECT-NOT-COMPLEX-FLOAT-ERROR"
               "OBJECT-NOT-COMPLEX-SINGLE-FLOAT-ERROR"
               #!+long-float "OBJECT-NOT-COMPLEX-LONG-FLOAT-ERROR"
               "OBJECT-NOT-COMPLEX-DOUBLE-FLOAT-ERROR"
               "OBJECT-NOT-COMPLEX-RATIONAL-ERROR"
               ;; FIXME: It's confusing using "complex" to mean both
               ;; "not on the real number line" and "not of a
               ;; SIMPLE-ARRAY nature". Perhaps we could rename all the
               ;; uses in the second sense as "hairy" instead?
               "OBJECT-NOT-COMPLEX-VECTOR-ERROR" "OBJECT-NOT-CONS-ERROR"
               "OBJECT-NOT-DOUBLE-FLOAT-ERROR" "OBJECT-NOT-FIXNUM-ERROR"
               "OBJECT-NOT-FLOAT-ERROR" "OBJECT-NOT-FUN-ERROR"
               "OBJECT-NOT-INSTANCE-ERROR" "OBJECT-NOT-INTEGER-ERROR"
               "OBJECT-NOT-LIST-ERROR"
               #!+long-float "OBJECT-NOT-LONG-FLOAT-ERROR"
               "OBJECT-NOT-NUMBER-ERROR" "OBJECT-NOT-RATIO-ERROR"
               "OBJECT-NOT-RATIONAL-ERROR" "OBJECT-NOT-REAL-ERROR"
               "OBJECT-NOT-SAP-ERROR" "OBJECT-NOT-SIGNED-BYTE-32-ERROR"
               ;; FIXME: 32/64-bit issues
               "OBJECT-NOT-SIGNED-BYTE-64-ERROR"
               "OBJECT-NOT-SIMPLE-ARRAY-COMPLEX-DOUBLE-FLOAT-ERROR"
               #!+long-float
               "OBJECT-NOT-SIMPLE-ARRAY-COMPLEX-LONG-FLOAT-ERROR"
               #!+sb-simd-pack
               "OBJECT-NOT-SIMD-PACK-ERROR"
               "OBJECT-NOT-SIMPLE-ARRAY-COMPLEX-SINGLE-FLOAT-ERROR"
               "OBJECT-NOT-SIMPLE-ARRAY-DOUBLE-FLOAT-ERROR"
               "OBJECT-NOT-SIMPLE-ARRAY-ERROR"
               #!+long-float "OBJECT-NOT-SIMPLE-ARRAY-LONG-FLOAT-ERROR"
               "OBJECT-NOT-SIMPLE-ARRAY-NIL-ERROR"
               "OBJECT-NOT-SIMPLE-ARRAY-SINGLE-FLOAT-ERROR"
               "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-15-ERROR"
               "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-16-ERROR"
               "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-2-ERROR"
               ;; KLUDGE: 32-bit and 64-bit ports implement a different
               ;; set of specialized array types.  Various bits of code
               ;; in SBCL assume that symbols connected to the
               ;; specialized array types are exported.  But there's not
               ;; a good way at this point to know whether the port for
               ;; which we're building is 32-bit or 64-bit.  Granted, we
               ;; could hardcode the particulars (or even come up with a
               ;; special :64BIT feature), but that seems a little
               ;; inelegant.  For now, we brute-force the issue by
               ;; always exporting all the names required for both
               ;; 32-bit and 64-bit ports.  Other bits connected to the
               ;; same issue are noted throughout the code below with
               ;; the tag "32/64-bit issues".  --njf, 2004-08-09
               "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-FIXNUM-ERROR"
               "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-31-ERROR"
               "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-32-ERROR"
               "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-4-ERROR"
               ;; FIXME: 32/64-bit issues
               "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-63-ERROR"
               "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-64-ERROR"
               "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-7-ERROR"
               "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-8-ERROR"
               "OBJECT-NOT-SIMPLE-ARRAY-SIGNED-BYTE-16-ERROR"
               "OBJECT-NOT-SIMPLE-ARRAY-FIXNUM-ERROR"
               "OBJECT-NOT-SIMPLE-ARRAY-SIGNED-BYTE-32-ERROR"
               "OBJECT-NOT-SIMPLE-ARRAY-SIGNED-BYTE-64-ERROR"
               "OBJECT-NOT-SIMPLE-ARRAY-SIGNED-BYTE-8-ERROR"
               "OBJECT-NOT-SIMPLE-BIT-VECTOR-ERROR"
               "OBJECT-NOT-SIMPLE-BASE-STRING-ERROR"
               #!+sb-unicode "OBJECT-NOT-SIMPLE-CHARACTER-STRING-ERROR"
               "OBJECT-NOT-SIMPLE-STRING-ERROR"
               "OBJECT-NOT-SIMPLE-VECTOR-ERROR"
               "OBJECT-NOT-SINGLE-FLOAT-ERROR" "OBJECT-NOT-STRING-ERROR"
               "OBJECT-NOT-INSTANCE-ERROR" "OBJECT-NOT-SYMBOL-ERROR"
               "OBJECT-NOT-TYPE-ERROR"
               "OBJECT-NOT-UNSIGNED-BYTE-32-ERROR"
               ;; FIXME: 32/64-bit issues
               "OBJECT-NOT-UNSIGNED-BYTE-64-ERROR"
               "OBJECT-NOT-VECTOR-ERROR"
               "OBJECT-NOT-VECTOR-NIL-ERROR"
               "OBJECT-NOT-WEAK-POINTER-ERROR"
               "ODD-KEY-ARGS-ERROR" "OUTPUT-OBJECT" "OUTPUT-UGLY-OBJECT"
               "PACKAGE-DESIGNATOR" "PACKAGE-DOC-STRING"
               "PACKAGE-HASHTABLE-SIZE" "PACKAGE-HASHTABLE-FREE"
               "PACKAGE-INTERNAL-SYMBOLS" "PACKAGE-EXTERNAL-SYMBOLS"
               "PARSE-DEFMACRO" "PARSE-UNKNOWN-TYPE"
               "PARSE-UNKNOWN-TYPE-SPECIFIER" "PATHNAME-DESIGNATOR"
               "POINTER-HASH"
               #!+(or x86 x86-64) "*PSEUDO-ATOMIC-BITS*"
               "PUNT-PRINT-IF-TOO-LONG"
               "RANDOM-DOCUMENTATION"
               "RAW-INSTANCE-SLOTS-EQUALP"
               "READER-IMPOSSIBLE-NUMBER-ERROR"
               "READER-EOF-ERROR"
               "RESTART-DESIGNATOR"
               "RUN-PENDING-FINALIZERS"
               "SCALE-DOUBLE-FLOAT"
               #!+long-float "SCALE-LONG-FLOAT"
               "SCALE-SINGLE-FLOAT"
               "SCRUB-POWER-CACHE"
               "SEQUENCEP" "SEQUENCE-COUNT" "SEQUENCE-END"
               "SEQUENCE-OF-CHECKED-LENGTH-GIVEN-TYPE"
               "SET-ARRAY-HEADER" "SET-HEADER-DATA" "SHIFT-TOWARDS-END"
               "SHIFT-TOWARDS-START" "SHRINK-VECTOR" "%SHRINK-VECTOR"
               ;; FIXME: 32/64-bit issues
               "SIGNED-BYTE-32-P" "SIGNED-BYTE-64-P"
               "SIMPLE-ARRAY-COMPLEX-DOUBLE-FLOAT-P"
               #!+long-float "SIMPLE-ARRAY-COMPLEX-LONG-FLOAT-P"
               "SIMPLE-ARRAY-COMPLEX-SINGLE-FLOAT-P"
               "SIMPLE-ARRAY-DOUBLE-FLOAT-P"
               #!+long-float "SIMPLE-ARRAY-LONG-FLOAT-P"
               "SIMPLE-ARRAY-NIL-P" "SIMPLE-ARRAY-P"
               "SIMPLE-ARRAY-SINGLE-FLOAT-P"
               "SIMPLE-ARRAY-UNSIGNED-BYTE-15-P"
               "SIMPLE-ARRAY-UNSIGNED-BYTE-16-P"
               "SIMPLE-ARRAY-UNSIGNED-BYTE-2-P"
               "SIMPLE-ARRAY-UNSIGNED-FIXNUM-P"
               "SIMPLE-ARRAY-UNSIGNED-BYTE-31-P"
               "SIMPLE-ARRAY-UNSIGNED-BYTE-32-P"
               "SIMPLE-ARRAY-UNSIGNED-BYTE-4-P"
               "SIMPLE-ARRAY-UNSIGNED-BYTE-63-P"
               "SIMPLE-ARRAY-UNSIGNED-BYTE-64-P"
               "SIMPLE-ARRAY-UNSIGNED-BYTE-7-P"
               "SIMPLE-ARRAY-UNSIGNED-BYTE-8-P"
               "SIMPLE-ARRAY-SIGNED-BYTE-16-P"
               "SIMPLE-ARRAY-FIXNUM-P"
               "SIMPLE-ARRAY-SIGNED-BYTE-32-P"
               "SIMPLE-ARRAY-SIGNED-BYTE-64-P"
               "SIMPLE-ARRAY-SIGNED-BYTE-8-P" "SIMPLE-BASE-STRING-P"
               #!+sb-unicode "SIMPLE-CHARACTER-STRING-P"
               "SIMPLE-PACKAGE-ERROR" "SIMPLE-UNBOXED-ARRAY"
               "SINGLE-FLOAT-BITS" "SINGLE-FLOAT-EXPONENT"
               "SINGLE-FLOAT-INT-EXPONENT" "SINGLE-FLOAT-SIGNIFICAND"
               "SINGLE-VALUE-TYPE" "SINGLE-VALUE-SPECIFIER-TYPE"
               "SPECIALIZABLE" "SPECIALIZABLE-VECTOR" "SPECIFIER-TYPE"
               #!+sb-simd-pack "SIMD-PACK-SINGLE"
               #!+sb-simd-pack "SIMD-PACK-DOUBLE"
               #!+sb-simd-pack "SIMD-PACK-INT"
               #!+sb-simd-pack "SIMD-PACK-TYPE"
               #!+sb-simd-pack "SIMD-PACK-TYPE-ELEMENT-TYPE"
               #!+sb-simd-pack "*SIMD-PACK-ELEMENT-TYPES*"
               "STACK-REF" "STREAM-DESIGNATOR" "STRING-DESIGNATOR"
               "STRING-FILL*"
               "SUB-GC"
               "SYMBOLS-DESIGNATOR"
               "%INSTANCE-LENGTH"
               "%INSTANCE-REF"
               "%INSTANCE-SET"
               "TLS-EXHAUSTED-ERROR"
               "TWO-ARG-*" "TWO-ARG-+" "TWO-ARG--" "TWO-ARG-/"
               "TWO-ARG-/=" "TWO-ARG-<" "TWO-ARG-<=" "TWO-ARG-="
               "TWO-ARG->" "TWO-ARG->=" "TWO-ARG-AND" "TWO-ARG-EQV"
               "TWO-ARG-GCD" "TWO-ARG-IOR" "TWO-ARG-LCM" "TWO-ARG-XOR"
               "TYPE-*-TO-T"
               "TYPE-DIFFERENCE" "TYPE-INTERSECTION"
               "TYPE-INTERSECTION2" "TYPE-APPROX-INTERSECTION2"
               "TYPE-SINGLETON-P"
               "TYPE-SINGLE-VALUE-P" "TYPE-SPECIFIER" "TYPE-UNION"
               "TYPE/=" "TYPE=" "TYPES-EQUAL-OR-INTERSECT"
               "UNBOUND-SYMBOL-ERROR" "UNBOXED-ARRAY"
               "UNDEFINED-FUN-ERROR" "UNION-TYPE" "UNION-TYPE-P"
               "UNION-TYPE-TYPES" "UNKNOWN-ERROR"
               "UNKNOWN-KEY-ARG-ERROR" "UNKNOWN-TYPE" "UNKNOWN-TYPE-P"
               "UNKNOWN-TYPE-SPECIFIER" "UNSEEN-THROW-TAG-ERROR"
               ;; FIXME: 32/64-bit issues
               "UNSIGNED-BYTE-32-P" "UNSIGNED-BYTE-64-P"
               "UPDATE-OBJECT-LAYOUT-OR-INVALID"
               "VALUE-CELL-REF" "VALUE-CELL-SET" "VALUES-SPECIFIER-TYPE"
               "VALUES-SPECIFIER-TYPE-CACHE-CLEAR" "VALUES-SUBTYPEP"
               "VALUES-TYPE" "VALUES-TYPE-IN"
               "VALUES-TYPE-INTERSECTION"
               "VALUES-TYPE-MIN-VALUE-COUNT" "VALUES-TYPE-MAX-VALUE-COUNT"
               "VALUES-TYPE-MAY-BE-SINGLE-VALUE-P" "VALUES-TYPE-OPTIONAL"
               "VALUES-TYPE-OUT" "VALUES-TYPE-P" "VALUES-TYPE-REQUIRED"
               "VALUES-TYPE-REST" "VALUES-TYPE-UNION"
               "VALUES-TYPE-TYPES" "VALUES-TYPES"
               "VALUES-TYPES-EQUAL-OR-INTERSECT"

               "*VECTOR-WITHOUT-COMPLEX-TYPECODE-INFOS*"
               "VECTOR-SINGLE-FLOAT-P" "VECTOR-DOUBLE-FLOAT-P"
               "VECTOR-UNSIGNED-BYTE-2-P" "VECTOR-UNSIGNED-BYTE-4-P"
               "VECTOR-UNSIGNED-BYTE-7-P" "VECTOR-UNSIGNED-BYTE-8-P"
               "VECTOR-UNSIGNED-BYTE-15-P" "VECTOR-UNSIGNED-BYTE-16-P"
               "VECTOR-UNSIGNED-BYTE-31-P" "VECTOR-UNSIGNED-BYTE-32-P"
               "VECTOR-UNSIGNED-BYTE-63-P" "VECTOR-UNSIGNED-BYTE-64-P"
               "VECTOR-SIGNED-BYTE-8-P" "VECTOR-SIGNED-BYTE-16-P"
               "VECTOR-FIXNUM-P" "VECTOR-SIGNED-BYTE-32-P"
               "VECTOR-SIGNED-BYTE-64-P" "VECTOR-COMPLEX-SINGLE-FLOAT-P"
               "VECTOR-COMPLEX-DOUBLE-FLOAT-P" "VECTOR-T-P"

               "VECTOR-NIL-P"
               "VECTOR-FILL*"
               "VECTOR-SUBSEQ*"
               "VECTOR-TO-VECTOR*"
               "VECTOR-OF-CHECKED-LENGTH-GIVEN-LENGTH" "WITH-ARRAY-DATA"
               "WITH-CIRCULARITY-DETECTION"
               "WITH-WORLD-LOCK"

               ;; bit bash fillers (FIXME: 32/64-bit issues)
               "UB1-BASH-FILL" "SYSTEM-AREA-UB1-FILL"
               "UB2-BASH-FILL" "SYSTEM-AREA-UB2-FILL"
               "UB4-BASH-FILL" "SYSTEM-AREA-UB4-FILL"
               "UB8-BASH-FILL" "SYSTEM-AREA-UB8-FILL"
               "UB16-BASH-FILL" "SYSTEM-AREA-UB16-FILL"
               "UB32-BASH-FILL" "SYSTEM-AREA-UB32-FILL"
               "UB64-BASH-FILL" "SYSTEM-AREA-UB64-FILL"

               ;; bit bash copiers (FIXME: 32/64-bit issues)
               "UB1-BASH-COPY" "SYSTEM-AREA-UB1-COPY"
               "COPY-UB1-TO-SYSTEM-AREA" "COPY-UB1-FROM-SYSTEM-AREA"
               "UB2-BASH-COPY" "SYSTEM-AREA-UB2-COPY"
               "COPY-UB2-TO-SYSTEM-AREA" "COPY-UB2-FROM-SYSTEM-AREA"
               "UB4-BASH-COPY" "SYSTEM-AREA-UB4-COPY"
               "COPY-UB4-TO-SYSTEM-AREA" "COPY-UB4-FROM-SYSTEM-AREA"
               "UB8-BASH-COPY" "SYSTEM-AREA-UB8-COPY"
               "COPY-UB8-TO-SYSTEM-AREA" "COPY-UB8-FROM-SYSTEM-AREA"
               "UB16-BASH-COPY" "SYSTEM-AREA-UB16-COPY"
               "COPY-UB16-TO-SYSTEM-AREA" "COPY-UB16-FROM-SYSTEM-AREA"
               "UB32-BASH-COPY" "SYSTEM-AREA-UB32-COPY"
               "COPY-UB32-TO-SYSTEM-AREA" "COPY-UB32-FROM-SYSTEM-AREA"
               "UB64-BASH-COPY" "SYSTEM-AREA-UB64-COPY"
               "COPY-UB64-TO-SYSTEM-AREA" "COPY-UB64-FROM-SYSTEM-AREA"

               ;; Bit bashing position for bit-vectors
               "%BIT-POSITION"
               "%BIT-POSITION/0"
               "%BIT-POSITION/1"

               ;; SIMPLE-FUN type and accessors
               "SIMPLE-FUN"
               "SIMPLE-FUN-P"
               "%SIMPLE-FUN-ARGLIST"
               "%SIMPLE-FUN-DOC"
               "%SIMPLE-FUN-INFO"
               "%SIMPLE-FUN-NAME"
               "%SIMPLE-FUN-NEXT"
               "%SIMPLE-FUN-SELF"
               "%SIMPLE-FUN-TYPE"
               "%SIMPLE-FUN-XREFS"

               ;; CLOSURE type and accessors
               "CLOSURE"
               "CLOSUREP"
               "DO-CLOSURE-VALUES"
               "%CLOSURE-FUN"
               "%CLOSURE-INDEX-REF"
               "%CLOSURE-VALUES"

               ;; Abstract function accessors
               "%FUN-DOC"
               "%FUN-FUN"
               "%FUN-LAMBDA-LIST"
               "%FUN-NAME"

               "FDEFN" "MAKE-FDEFN" "FDEFN-P" "FDEFN-NAME" "FDEFN-FUN"
               "FDEFN-MAKUNBOUND"
               "%COERCE-CALLABLE-TO-FUN" "FUN-SUBTYPE"
               "*MAXIMUM-ERROR-DEPTH*" "%SET-SYMBOL-PLIST"
               "INFINITE-ERROR-PROTECT"
               "FIND-CALLER-OF-NAMED-FRAME"
               "FIND-CALLER-NAME-AND-FRAME"
               "FIND-INTERRUPTED-NAME-AND-FRAME"
               "%SET-SYMBOL-VALUE" "%SET-SYMBOL-GLOBAL-VALUE" "%SET-SYMBOL-PACKAGE"
               "SET-SYMBOL-GLOBAL-VALUE"
               "OUTPUT-SYMBOL-NAME" "%COERCE-NAME-TO-FUN"
               "DEFAULT-STRUCTURE-PRINT"
               "LAYOUT" "LAYOUT-LENGTH" "LAYOUT-PURE" "DSD-RAW-TYPE"
               "DEFSTRUCT-DESCRIPTION" "UNDECLARE-STRUCTURE"
               "UNDEFINE-FUN-NAME" "DD-TYPE" "CLASSOID-STATE" "INSTANCE"
               "*TYPE-SYSTEM-INITIALIZED*" "FIND-LAYOUT" "DSD-NAME"
               "%TYPEP" "DD-NAME" "CLASSOID-SUBCLASSES"
               "CLASSOID-LAYOUT" "CLASSOID-NAME" "CLASSOID-P"
               "DD-RAW-LENGTH" "NOTE-NAME-DEFINED" "%CODE-CODE-SIZE"
               "DD-SLOTS" "DD-INCLUDE" "SLOT-SETTER-LAMBDA-FORM"
               "%IMAGPART" "DSD-ACCESSOR-NAME" "%CODE-DEBUG-INFO"
               "LAYOUT-CLASSOID" "LAYOUT-INVALID"
               "DSD-TYPE" "%INSTANCEP" "DEFSTRUCT-SLOT-DESCRIPTION"
               "DD-PREDICATE-NAME"
               "CLASSOID-PROPER-NAME" "%NOTE-TYPE-DEFINED" "LAYOUT-INFO"
               "%SET-INSTANCE-LAYOUT" "DD-DEFAULT-CONSTRUCTOR"
               "LAYOUT-OF" "%REALPART"
               "STRUCTURE-CLASSOID-P" "DSD-INDEX" "STRUCTURE-CLASSOID"
               "%INSTANCE-LAYOUT" "LAYOUT-CLOS-HASH"
               "PROCLAIM-AS-FUN-NAME" "BECOME-DEFINED-FUN-NAME"
               "%NUMERATOR" "CLASSOID-TYPEP" "DSD-READ-ONLY"
               "DSD-DEFAULT" "LAYOUT-INHERITS" "DD-LENGTH"
               "%CODE-ENTRY-POINTS" "%DENOMINATOR"
               "%OTHER-POINTER-P"

               "STANDARD-CLASSOID" "CLASSOID-OF"
               "MAKE-STANDARD-CLASSOID"
               "CLASSOID-CELL-CLASSOID"
               "CLASSOID-CELL-NAME"
               "CLASSOID-CELL-PCL-CLASS"
               "CLASSOID-CELL-TYPEP"
               "%CLEAR-CLASSOID"
               "FIND-CLASSOID-CELL"
               "%RANDOM-DOUBLE-FLOAT"
               #!+long-float "%RANDOM-LONG-FLOAT"
               "%RANDOM-SINGLE-FLOAT" "STATIC-CLASSOID"
               "%FUNCALLABLE-INSTANCE-INFO" "RANDOM-CHUNK" "BIG-RANDOM-CHUNK"
               "N-RANDOM-CHUNK-BITS"
               "LAYOUT-CLOS-HASH-LIMIT"
               "BUILT-IN-CLASSOID-DIRECT-SUPERCLASSES"
               "BUILT-IN-CLASSOID-TRANSLATION" "RANDOM-LAYOUT-CLOS-HASH"
               "CLASSOID-PCL-CLASS" "FUNCALLABLE-STRUCTURE"
               "FUNCALLABLE-INSTANCE-FUN" "%FUNCALLABLE-INSTANCE-LAYOUT"
               "%SET-FUNCALLABLE-INSTANCE-LAYOUT"
               "REGISTER-LAYOUT"
               "FUNCALLABLE-INSTANCE"
               "MAKE-STATIC-CLASSOID"
               "%MAKE-SYMBOL"
               "%FUNCALLABLE-INSTANCE-FUNCTION" "SYMBOL-HASH"

               "EXTENDED-SEQUENCE" "*EXTENDED-SEQUENCE-TYPE*"
               "EXTENDED-SEQUENCE-P"

               "BUILT-IN-CLASSOID" "CONDITION-CLASSOID-P"
               "CONDITION-CLASSOID-SLOTS" "MAKE-UNDEFINED-CLASSOID"
               "FIND-CLASSOID" "CLASSOID" "CLASSOID-DIRECT-SUPERCLASSES"
               "MAKE-LAYOUT" "REDEFINE-LAYOUT-WARNING"
               "INSURED-FIND-CLASSOID" "ORDER-LAYOUT-INHERITS"
               "STD-COMPUTE-CLASS-PRECEDENCE-LIST"

               ;; symbols from former SB!CONDITIONS
               "*HANDLER-CLUSTERS*" "*RESTART-CLUSTERS*"
               "*CONDITION-RESTARTS*" "CASE-FAILURE"
               "NAMESTRING-PARSE-ERROR" "NAMESTRING-PARSE-ERROR-OFFSET"
               "MAKE-RESTART" "COERCE-TO-CONDITION"

               "ALLOCATE-CONDITION"

               "CONDITION-READER-FUNCTION"
               "CONDITION-WRITER-FUNCTION"

               "CONDITION-SLOT-ALLOCATION"
               "CONDITION-SLOT-DOCUMENTATION"
               "CONDITION-SLOT-INITARGS"
               "CONDITION-SLOT-INITFORM"
               "CONDITION-SLOT-INITFORM-P"
               "CONDITION-SLOT-NAME" "CONDITION-SLOT-READERS"
               "CONDITION-SLOT-WRITERS"

               "REDEFINITION-WARNING"
               "REDEFINITION-WITH-DEFUN"
               "REDEFINITION-WITH-DEFMACRO"
               "REDEFINITION-WITH-DEFGENERIC"
               "REDEFINITION-WITH-DEFMETHOD"
               "UNINTERESTING-ORDINARY-FUNCTION-REDEFINITION-P"
               "UNINTERESTING-GENERIC-FUNCTION-REDEFINITION-P"
               "UNINTERESTING-METHOD-REDEFINITION-P"
               "UNINTERESTING-REDEFINITION"
               "REDEFINITION-WITH-DEFTRANSFORM"

               "DUBIOUS-ASTERISKS-AROUND-VARIABLE-NAME"
               "ASTERISKS-AROUND-LEXICAL-VARIABLE-NAME"
               "ASTERISKS-AROUND-CONSTANT-VARIABLE-NAME"
               "UNDEFINED-ALIEN-STYLE-WARNING"
               #!+sb-eval
               "LEXICAL-ENVIRONMENT-TOO-COMPLEX"
               "CHARACTER-DECODING-ERROR-IN-COMMENT"
               "DEPRECATED-EVAL-WHEN-SITUATIONS"
               "PROCLAMATION-MISMATCH"
               "TYPE-PROCLAMATION-MISMATCH"
               "FTYPE-PROCLAMATION-MISMATCH"

               "!COLD-INIT" "!UNINTERN-INIT-ONLY-STUFF"
               "!GLOBALDB-COLD-INIT" "!FDEFN-COLD-INIT"
               "!FOREIGN-COLD-INIT" "!FUNCTION-NAMES-COLD-INIT"
               "!TYPE-CLASS-COLD-INIT" "!TYPEDEFS-COLD-INIT"
               "!ALIEN-TYPE-COLD-INIT" "!CLASSES-COLD-INIT"
               "!DEADLINE-COLD-INIT"
               "!EARLY-TYPE-COLD-INIT" "!LATE-TYPE-COLD-INIT"
               "!FIXUP-TYPE-COLD-INIT" "!TARGET-TYPE-COLD-INIT"
               "!RANDOM-COLD-INIT" "!READER-COLD-INIT"
               "!PATHNAME-COLD-INIT" "!DEBUG-INFO-COLD-INIT"
               "!TYPECHECKFUNS-COLD-INIT" "!LOADER-COLD-INIT"
               "!EXHAUST-COLD-INIT" "!PACKAGE-COLD-INIT"
               "!POLICY-COLD-INIT-OR-RESANIFY"
               "!VM-TYPE-COLD-INIT" "!BACKQ-COLD-INIT"
               "!SHARPM-COLD-INIT" "!EARLY-PROCLAIM-COLD-INIT"
               "!LATE-PROCLAIM-COLD-INIT" "!CLASS-FINALIZE"
               "!CONSTANTP-COLD-INIT"
               "!WORLD-LOCK-COLD-INIT"

               "FLOAT-COLD-INIT-OR-REINIT"
               "GC-REINIT"
               "TIME-REINIT"
               "SIGNAL-COLD-INIT-OR-REINIT"
               "STREAM-COLD-INIT-OR-RESET"

               ;; Cleanups to run before saving a core
               "FLOAT-DEINIT"
               "FOREIGN-DEINIT"
               "PROFILE-DEINIT"

               ;; Note: These are out of lexicographical order
               ;; because in CMU CL they were defined as
               ;; internal symbols in package "CL" imported
               ;; into package "C", as opposed to what we're
               ;; doing here, defining them as external symbols
               ;; in a package which is used by both "SB!C" and
               ;; "SB!IMPL". (SBCL's "SB!C" is directly
               ;; analogous to CMU CL's "C"; and for this
               ;; purpose, SBCL's "SB!IMPL" is analogous to CMU
               ;; CL's "CL".) As far as I know there's nothing
               ;; special about them, so they could be merged
               ;; into the same order as everything else in the
               ;; in this package. -- WHN 19990911
               "STRING>=*" "STRING>*" "STRING=*" "STRING<=*"
               "STRING<*" "STRING/=*" "%SVSET"
               "%SP-STRING-COMPARE" "%SETNTH" "%SETELT"
               "%SET-ROW-MAJOR-AREF" "%SET-FILL-POINTER"
               "%SET-FDEFINITION" "%SCHARSET" "%SBITSET"
               "%RPLACD" "%RPLACA" "%PUT" "%CHARSET" "%BITSET"
               "%ASET"))

   #s(sb-cold:package-data
      :name "SB!THREAD"
      :use ("CL" "SB!ALIEN" "SB!INT" "SB!SYS" "SB!KERNEL")
      :doc "public (but low-level): native thread support"
      :export ("*CURRENT-THREAD*"
               "DESTROY-THREAD"
               "INTERRUPT-THREAD"
               "INTERRUPT-THREAD-ERROR"
               "INTERRUPT-THREAD-ERROR-THREAD"
               "RETURN-FROM-THREAD"
               "ABORT-THREAD"
               "MAIN-THREAD-P"
               "MAIN-THREAD"
               "JOIN-THREAD"
               "JOIN-THREAD-ERROR"
               "JOIN-THREAD-ERROR-THREAD"
               "LIST-ALL-THREADS"
               "MAKE-THREAD"
               "SYMBOL-VALUE-IN-THREAD"
               "SYMBOL-VALUE-IN-THREAD-ERROR"
               "TERMINATE-THREAD"
               "THREAD"
               "THREAD-DEADLOCK"
               "THREAD-DEADLOCK-CYCLE"
               "THREAD-ERROR"
               "THREAD-ERROR-THREAD"
               "THREAD-ALIVE-P"
               "THREAD-EMPHEMERAL-P"
               "THREAD-NAME"
               "THREAD-YIELD"
               "FOREIGN-THREAD"
               #!+(and sb-safepoint-strictly (not win32))
               "SIGNAL-HANDLING-THREAD"
               ;; Memory barrier
               "BARRIER"
               ;; Mutexes
               "GET-MUTEX"
               "GRAB-MUTEX"
               "HOLDING-MUTEX-P"
               "MAKE-MUTEX"
               "MUTEX"
               "MUTEX-NAME"
               "MUTEX-OWNER"
               "MUTEX-VALUE"
               "RELEASE-MUTEX"
               "WITH-MUTEX"
               "WITH-RECURSIVE-LOCK"
               ;; Condition variables
               "CONDITION-BROADCAST"
               "CONDITION-NOTIFY"
               "CONDITION-WAIT"
               "MAKE-WAITQUEUE"
               "WAITQUEUE"
               "WAITQUEUE-NAME"
               ;; Sessions
               "MAKE-LISTENER-THREAD"
               "RELEASE-FOREGROUND"
               "WITH-NEW-SESSION"
               ;; Semaphores
               "MAKE-SEMAPHORE"
               "SEMAPHORE"
               "SEMAPHORE-NAME"
               "SEMAPHORE-COUNT"
               "SIGNAL-SEMAPHORE"
               "TRY-SEMAPHORE"
               "WAIT-ON-SEMAPHORE"
               ;; Semaphore notification objects
               "CLEAR-SEMAPHORE-NOTIFICATION"
               "MAKE-SEMAPHORE-NOTIFICATION"
               "SEMAPHORE-NOTIFICATION"
               "SEMAPHORE-NOTIFICATION-STATUS"))

   #s(sb-cold:package-data
      :name "SB!LOOP"
      :doc "private: implementation details of LOOP"
      :use ("CL")
      :export ())

   #s(sb-cold:package-data
      :name "SB!MOP"
      :doc
      "public: the MetaObject Protocol interface, as defined by
The Art of the Metaobject Protocol, by Kiczales, des Rivieres and Bobrow:
ISBN 0-262-61074-4, with exceptions as noted in the User Manual."
      :use ("CL")
      :reexport ("ADD-METHOD"
                 "ALLOCATE-INSTANCE"
                 "CLASS-NAME" "COMPUTE-APPLICABLE-METHODS"
                 "ENSURE-GENERIC-FUNCTION" "MAKE-INSTANCE"
                 "METHOD-QUALIFIERS" "REMOVE-METHOD"
                 "BUILT-IN-CLASS" "CLASS"
                 "FUNCTION" "GENERIC-FUNCTION"
                 "METHOD" "METHOD-COMBINATION"
                 "STANDARD-CLASS" "STANDARD-GENERIC-FUNCTION"
                 "STANDARD-METHOD" "STANDARD-OBJECT" "T")
      :export ("ADD-DEPENDENT"
               "ADD-DIRECT-METHOD"
               "ADD-DIRECT-SUBCLASS"
               "CLASS-DEFAULT-INITARGS"
               "CLASS-DIRECT-DEFAULT-INITARGS"
               "CLASS-DIRECT-SLOTS"
               "CLASS-DIRECT-SUBCLASSES"
               "CLASS-DIRECT-SUPERCLASSES"
               "CLASS-FINALIZED-P"
               "CLASS-PRECEDENCE-LIST"
               "CLASS-PROTOTYPE"
               "CLASS-SLOTS"
               "COMPUTE-APPLICABLE-METHODS-USING-CLASSES"
               "COMPUTE-CLASS-PRECEDENCE-LIST"
               "COMPUTE-DEFAULT-INITARGS"
               "COMPUTE-DISCRIMINATING-FUNCTION"
               "COMPUTE-EFFECTIVE-METHOD"
               "COMPUTE-EFFECTIVE-SLOT-DEFINITION"
               "COMPUTE-SLOTS"
               "DIRECT-SLOT-DEFINITION"
               "DIRECT-SLOT-DEFINITION-CLASS"
               "EFFECTIVE-SLOT-DEFINITION"
               "EFFECTIVE-SLOT-DEFINITION-CLASS"
               "ENSURE-CLASS"
               "ENSURE-CLASS-USING-CLASS"
               "ENSURE-GENERIC-FUNCTION-USING-CLASS"
               "EQL-SPECIALIZER"
               "EQL-SPECIALIZER-OBJECT"
               "EXTRACT-LAMBDA-LIST"
               "EXTRACT-SPECIALIZER-NAMES"
               "FINALIZE-INHERITANCE"
               "FIND-METHOD-COMBINATION"
               "FORWARD-REFERENCED-CLASS"
               "FUNCALLABLE-STANDARD-CLASS"
               "FUNCALLABLE-STANDARD-INSTANCE-ACCESS"
               "FUNCALLABLE-STANDARD-OBJECT"
               "GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER"
               "GENERIC-FUNCTION-DECLARATIONS"
               "GENERIC-FUNCTION-LAMBDA-LIST"
               "GENERIC-FUNCTION-METHOD-CLASS"
               "GENERIC-FUNCTION-METHOD-COMBINATION"
               "GENERIC-FUNCTION-METHODS"
               "GENERIC-FUNCTION-NAME"
               "INTERN-EQL-SPECIALIZER"
               "MAKE-METHOD-LAMBDA"
               "MAP-DEPENDENTS"
               "METAOBJECT"
               "METHOD-FUNCTION"
               "METHOD-GENERIC-FUNCTION"
               "METHOD-LAMBDA-LIST"
               "METHOD-SPECIALIZERS"
               "ACCESSOR-METHOD-SLOT-DEFINITION"
               "READER-METHOD-CLASS"
               "REMOVE-DEPENDENT"
               "REMOVE-DIRECT-METHOD"
               "REMOVE-DIRECT-SUBCLASS"
               "SET-FUNCALLABLE-INSTANCE-FUNCTION"
               "SLOT-BOUNDP-USING-CLASS"
               "SLOT-DEFINITION"
               "SLOT-DEFINITION-ALLOCATION"
               "SLOT-DEFINITION-INITARGS"
               "SLOT-DEFINITION-INITFORM"
               "SLOT-DEFINITION-INITFUNCTION"
               "SLOT-DEFINITION-LOCATION"
               "SLOT-DEFINITION-NAME"
               "SLOT-DEFINITION-READERS"
               "SLOT-DEFINITION-WRITERS"
               "SLOT-DEFINITION-TYPE"
               "SLOT-MAKUNBOUND-USING-CLASS"
               "SLOT-VALUE-USING-CLASS"
               "SPECIALIZER"
               "SPECIALIZER-DIRECT-GENERIC-FUNCTIONS"
               "SPECIALIZER-DIRECT-METHODS"
               "STANDARD-ACCESSOR-METHOD"
               "STANDARD-DIRECT-SLOT-DEFINITION"
               "STANDARD-EFFECTIVE-SLOT-DEFINITION"
               "STANDARD-INSTANCE-ACCESS"
               "STANDARD-READER-METHOD"
               "STANDARD-SLOT-DEFINITION"
               "STANDARD-WRITER-METHOD"
               "UPDATE-DEPENDENT"
               "VALIDATE-SUPERCLASS"
               "WRITER-METHOD-CLASS"))

   #s(sb-cold:package-data
      :name "SB!PCL"
      :doc
      "semi-public: This package includes useful meta-object protocol
extensions, but even they are not guaranteed to be present in later
versions of SBCL, and the other stuff in here is definitely not
guaranteed to be present in later versions of SBCL.  Use of this
package is deprecated in favour of SB-MOP."
      :use ("CL" "SB!MOP" "SB!INT" "SB!EXT" "SB!WALKER" "SB!KERNEL")
      ;; experimental SBCL-only (for now) symbols
      :export ("MAKE-METHOD-SPECIALIZERS-FORM"
               "PARSE-SPECIALIZER-USING-CLASS"
               "UNPARSE-SPECIALIZER-USING-CLASS"
               "+SLOT-UNBOUND+")
      ;; FIXME: After a little while, these reexports can probably go
      ;; away, as they're superseded by the use of SB-MOP as the
      ;; publically-accessible package.
      :reexport ( ;; CL symbols
                 "ADD-METHOD"
                 "ALLOCATE-INSTANCE"
                 "CLASS-NAME" "COMPUTE-APPLICABLE-METHODS"
                 "ENSURE-GENERIC-FUNCTION" "MAKE-INSTANCE"
                 "METHOD-QUALIFIERS" "REMOVE-METHOD"
                 ;; MOP symbols
                 "ADD-DEPENDENT"
                 "ADD-DIRECT-METHOD"
                 "ADD-DIRECT-SUBCLASS"
                 "CLASS-DEFAULT-INITARGS"
                 "CLASS-DIRECT-DEFAULT-INITARGS"
                 "CLASS-DIRECT-SLOTS"
                 "CLASS-DIRECT-SUBCLASSES"
                 "CLASS-DIRECT-SUPERCLASSES"
                 "CLASS-FINALIZED-P"
                 "CLASS-PRECEDENCE-LIST"
                 "CLASS-PROTOTYPE"
                 "CLASS-SLOTS"
                 "COMPUTE-APPLICABLE-METHODS-USING-CLASSES"
                 "COMPUTE-CLASS-PRECEDENCE-LIST"
                 "COMPUTE-DEFAULT-INITARGS"
                 "COMPUTE-DISCRIMINATING-FUNCTION"
                 "COMPUTE-EFFECTIVE-METHOD"
                 "COMPUTE-EFFECTIVE-SLOT-DEFINITION"
                 "COMPUTE-SLOTS"
                 "DIRECT-SLOT-DEFINITION"
                 "DIRECT-SLOT-DEFINITION-CLASS"
                 "EFFECTIVE-SLOT-DEFINITION"
                 "EFFECTIVE-SLOT-DEFINITION-CLASS"
                 "ENSURE-CLASS"
                 "ENSURE-CLASS-USING-CLASS"
                 "ENSURE-GENERIC-FUNCTION-USING-CLASS"
                 "EQL-SPECIALIZER"
                 "EQL-SPECIALIZER-OBJECT"
                 "EXTRACT-LAMBDA-LIST"
                 "EXTRACT-SPECIALIZER-NAMES"
                 "FINALIZE-INHERITANCE"
                 "FIND-METHOD-COMBINATION"
                 "FORWARD-REFERENCED-CLASS"
                 "FUNCALLABLE-STANDARD-CLASS"
                 "FUNCALLABLE-STANDARD-INSTANCE-ACCESS"
                 "FUNCALLABLE-STANDARD-OBJECT"
                 "GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER"
                 "GENERIC-FUNCTION-DECLARATIONS"
                 "GENERIC-FUNCTION-LAMBDA-LIST"
                 "GENERIC-FUNCTION-METHOD-CLASS"
                 "GENERIC-FUNCTION-METHOD-COMBINATION"
                 "GENERIC-FUNCTION-METHODS"
                 "GENERIC-FUNCTION-NAME"
                 "INTERN-EQL-SPECIALIZER"
                 "MAKE-METHOD-LAMBDA"
                 "MAP-DEPENDENTS"
                 "METHOD-FUNCTION"
                 "METHOD-GENERIC-FUNCTION"
                 "METHOD-LAMBDA-LIST"
                 "METHOD-SPECIALIZERS"
                 "ACCESSOR-METHOD-SLOT-DEFINITION"
                 "READER-METHOD-CLASS"
                 "REMOVE-DEPENDENT"
                 "REMOVE-DIRECT-METHOD"
                 "REMOVE-DIRECT-SUBCLASS"
                 "SET-FUNCALLABLE-INSTANCE-FUNCTION"
                 "SLOT-BOUNDP-USING-CLASS"
                 "SLOT-DEFINITION"
                 "SLOT-DEFINITION-ALLOCATION"
                 "SLOT-DEFINITION-INITARGS"
                 "SLOT-DEFINITION-INITFORM"
                 "SLOT-DEFINITION-INITFUNCTION"
                 "SLOT-DEFINITION-LOCATION"
                 "SLOT-DEFINITION-NAME"
                 "SLOT-DEFINITION-READERS"
                 "SLOT-DEFINITION-WRITERS"
                 "SLOT-DEFINITION-TYPE"
                 "SLOT-MAKUNBOUND-USING-CLASS"
                 "SLOT-VALUE-USING-CLASS"
                 "SPECIALIZER"
                 "SPECIALIZER-DIRECT-GENERIC-FUNCTIONS"
                 "SPECIALIZER-DIRECT-METHODS"
                 "STANDARD-ACCESSOR-METHOD"
                 "STANDARD-DIRECT-SLOT-DEFINITION"
                 "STANDARD-EFFECTIVE-SLOT-DEFINITION"
                 "STANDARD-INSTANCE-ACCESS"
                 "STANDARD-READER-METHOD"
                 "STANDARD-SLOT-DEFINITION"
                 "STANDARD-WRITER-METHOD"
                 "UPDATE-DEPENDENT"
                 "VALIDATE-SUPERCLASS"
                 "WRITER-METHOD-CLASS"))

   #s(sb-cold:package-data
      :name "SB!PRETTY"
      :doc "private: implementation of pretty-printing"
      :use ("CL" "SB!EXT" "SB!INT" "SB!KERNEL")
      :export ("OUTPUT-PRETTY-OBJECT"
               "PRETTY-STREAM" "PRETTY-STREAM-P"
               "PPRINT-DISPATCH-TABLE"
               "!PPRINT-COLD-INIT"))

   #s(sb-cold:package-data
      :name "SB!PROFILE"
      :doc "public: the interface to the profiler"
      :use ("CL" "SB!EXT" "SB!INT" "SB!KERNEL")
      :export ("PROFILE" "REPORT" "RESET" "UNPROFILE"))

   #s(sb-cold:package-data
      :name "SB!SEQUENCE"
      :doc "semi-public: implements something which might eventually
be submitted as a CDR"
      :use ()
      :export ("DOSEQUENCE"

               "MAKE-SEQUENCE-ITERATOR" "MAKE-SIMPLE-SEQUENCE-ITERATOR"

               "ITERATOR-STEP" "ITERATOR-ENDP" "ITERATOR-ELEMENT"
               "ITERATOR-INDEX" "ITERATOR-COPY"

               "WITH-SEQUENCE-ITERATOR" "WITH-SEQUENCE-ITERATOR-FUNCTIONS"

               "CANONIZE-TEST" "CANONIZE-KEY"

               "EMPTYP" "LENGTH" "ELT"
               "MAKE-SEQUENCE-LIKE" "ADJUST-SEQUENCE"

               "COUNT" "COUNT-IF" "COUNT-IF-NOT"
               "FIND" "FIND-IF" "FIND-IF-NOT"
               "POSITION" "POSITION-IF" "POSITION-IF-NOT"
               "SUBSEQ" "COPY-SEQ" "FILL"
               "NSUBSTITUTE" "NSUBSTITUTE-IF" "NSUBSTITUTE-IF-NOT"
               "SUBSTITUTE" "SUBSTITUTE-IF" "SUBSTITUTE-IF-NOT"
               "REPLACE" "REVERSE" "NREVERSE" "REDUCE"
               "MISMATCH" "SEARCH"
               "DELETE" "DELETE-IF" "DELETE-IF-NOT"
               "REMOVE" "REMOVE-IF" "REMOVE-IF-NOT"
               "DELETE-DUPLICATES" "REMOVE-DUPLICATES" "SORT" "STABLE-SORT"))

   #s(sb-cold:package-data
      :name "SB!SYS"
      :doc
      "private: In theory, this \"contains functions and information
necessary for system interfacing\" (said cmu-user.tex at the time
of the SBCL code fork). That probably was and is a good idea, but in
practice, the distinctions between this package and SB-KERNEL
and even SB-VM seem to have become somewhat blurred over the years.
Some anomalies (e.g. FIND-IF-IN-CLOSURE being in SB-SYS instead of
SB-KERNEL) have been undone, but probably more remain."
      :use ("CL" "SB!EXT" "SB!INT")
      :export (;; FIXME: %PRIMITIVE shouldn't be here. (I now know that %SYS
               ;; is for OS-dependent stuff. %PRIMITIVE should probably be in
               ;; SB!KERNEL.)
               "%PRIMITIVE"
               "%STANDARD-CHAR-P"
               "*EXIT-ERROR-HANDLER*"
               "*EXIT-IN-PROCESS*"
               "*ALLOW-WITH-INTERRUPTS*"
               "*INTERRUPTS-ENABLED*"
               "*INTERRUPT-PENDING*"
               #!+sb-thruption "*THRUPTION-PENDING*"
               "*LINKAGE-INFO*"
               "*LONG-SITE-NAME*" "*SHORT-SITE-NAME*"
               "*PERIODIC-POLLING-FUNCTION*"
               "*PERIODIC-POLLING-PERIOD*"
               "*RUNTIME-DLHANDLE*"
               "*SHARED-OBJECTS*"
               "*STATIC-FOREIGN-SYMBOLS*"
               "*STDERR*" "*STDIN*"
               "*STDOUT*"
               "*TTY*"
               "ADD-FD-HANDLER"
               "ALLOCATE-SYSTEM-MEMORY"
               "ALLOW-WITH-INTERRUPTS"
               "BEEP"
               "BREAKPOINT-ERROR"
               "CANCEL-DEADLINE"
               "CLOSE-SHARED-OBJECTS"
               "DEADLINE-TIMEOUT"
               "DEALLOCATE-SYSTEM-MEMORY"
               "DECODE-TIMEOUT"
               "DECODE-INTERNAL-TIME"
               "DEFAULT-INTERRUPT"
               "DEFER-DEADLINE"
               "DYNAMIC-FOREIGN-SYMBOLS-P"
               "DLOPEN-OR-LOSE"
               "FROB-DO-BODY"
               "ENABLE-INTERRUPT"
               "ENSURE-DYNAMIC-FOREIGN-SYMBOL-ADDRESS"
               "EXTERN-ALIEN-NAME"
               "EXIT-CODE"
               "FD-STREAM" "FD-STREAM-FD" "FD-STREAM-P"
               "FIND-DYNAMIC-FOREIGN-SYMBOL-ADDRESS"
               "FIND-FOREIGN-SYMBOL-ADDRESS"
               "FIND-FOREIGN-SYMBOL-IN-TABLE"
               "FOREIGN-SYMBOL-SAP"
               "FOREIGN-SYMBOL-ADDRESS"
               "FOREIGN-SYMBOL-DATAREF-SAP"
               "GET-MACHINE-VERSION" "GET-PAGE-SIZE" "GET-SYSTEM-INFO"
               "IGNORE-INTERRUPT"
               "IN-INTERRUPTION"
               "INTERACTIVE-INTERRUPT"
               "INT-SAP"
               "INVALIDATE-DESCRIPTOR"
               "INVOKE-INTERRUPTION"
               "IO-TIMEOUT"
               "LIST-DYNAMIC-FOREIGN-SYMBOLS"
               "MACRO" "MAKE-FD-STREAM"
               "MEMORY-FAULT-ERROR"
               "MEMMOVE"
               "OS-EXIT"
               "OS-COLD-INIT-OR-REINIT" "OS-CONTEXT-T" "OUTPUT-RAW-BYTES"
               "READ-N-BYTES"
               "REMOVE-FD-HANDLER"
               "REOPEN-SHARED-OBJECTS"
               "SAP+" "SAP-"
               "SAP-FOREIGN-SYMBOL"
               "SAP-INT"
               "SAP-REF-16" "SAP-REF-32" "SAP-REF-64" "SAP-REF-WORD"
               "SAP-REF-8"
               "SAP-REF-DOUBLE" "SAP-REF-LISPOBJ" "SAP-REF-LONG"
               "SAP-REF-OCTETS"
               "SAP-REF-SAP" "SAP-REF-SINGLE"
               "SAP<" "SAP<=" "SAP=" "SAP>" "SAP>="
               "SCRUB-CONTROL-STACK" "SERVE-ALL-EVENTS"
               "SIGNAL-DEADLINE"
               "SERVE-EVENT"
               "SIGNED-SAP-REF-16" "SIGNED-SAP-REF-32"
               "SIGNED-SAP-REF-64" "SIGNED-SAP-REF-WORD" "SIGNED-SAP-REF-8"
               ;; FIXME: STRUCTURE!OBJECT stuff probably belongs in SB!KERNEL.
               "STRUCTURE!OBJECT" "STRUCTURE!OBJECT-MAKE-LOAD-FORM"
               "SYSTEM-AREA-POINTER" "SYSTEM-AREA-POINTER-P"
               "SYSTEM-CONDITION" "SYSTEM-CONDITION-ADDRESS"
               "SYSTEM-CONDITION-CONTEXT"
               "REINIT-INTERNAL-REAL-TIME"
               "SYSTEM-INTERNAL-RUN-TIME"
               "UNDEFINED-FOREIGN-SYMBOLS-P"
               "UPDATE-LINKAGE-TABLE" "VECTOR-SAP"
               "WAIT-UNTIL-FD-USABLE"
               "WITH-DEADLINE"
               "WITH-FD-HANDLER"
               "WITH-INTERRUPTS" "WITH-LOCAL-INTERRUPTS"
               "WITH-PINNED-OBJECTS" "WITHOUT-GCING"
               "WITHOUT-INTERRUPTS"
               "WITH-INTERRUPT-BINDINGS"
               "WORDS"))

   #s(sb-cold:package-data
      :name "SB!UNIX"
      :doc
      "private: a wrapper layer for SBCL itself to use when talking
with an underlying Unix-y operating system.
This was a public package in CMU CL, but that was different.
CMU CL's UNIX package tried to provide a comprehensive,
stable Unix interface suitable for the end user.
This package only tries to implement what happens to be
needed by the current implementation of SBCL, and makes
no guarantees of interface stability."
      :use ("CL" "SB!ALIEN" "SB!EXT" "SB!INT" "SB!SYS")
      :reexport ("OFF-T"
                 "SIZE-T")
      :export ( ;; wrappers around Unix stuff to give just what Lisp needs
               "NANOSLEEP"
               "UID-USERNAME"
               "UID-HOMEDIR"
               "USER-HOMEDIR"
               "WITH-RESTARTED-SYSCALL"
               "SB-MKSTEMP"
               "UNIX-OFFSET"
               "FD-TYPE"

               ;; stuff with a one-to-one mapping to Unix constructs
               "D-INO" "D-NAME" "D-NAMLEN" "D-OFF" "D-RECLEN" "DEV-T" "DIRECT"
               "EXECGRP" "EXECOTH" "EXECOWN" "F-DUPFD" "F-GETFD" "F-GETFL"
               "F-GETOWN" "F-SETFD" "F-SETFL" "F-SETOWN" "FAPPEND" "FASYNC"
               "FCREAT" "FEXCL" "FIONREAD" "FNDELAY" "FTRUNC" "F_OK" "GID-T"
               "INO-T" "UNIX-ACCESS" "UNIX-SETITIMER" "UNIX-GETITIMER"
               "KBDCGET" "KBDCRESET"
               "KBDCRST" "KBDCSET" "KBDCSSTD" "KBDGCLICK" "KBDSCLICK" "KBDSGET"
               "L_INCR" "L_SET" "L_XTND" "O_APPEND" "O_CREAT" "O_EXCL"
               "O_RDONLY" "O_RDWR" "O_TRUNC" "O_WRONLY" "POSIX-GETCWD"
               "POSIX-GETCWD/" "READGRP" "READOTH" "READOWN" "RLIM-CUR"
               "RLIM-MAX" "RU-IDRSS" "RU-INBLOCK" "RU-ISRSS" "RU-IXRSS"
               "RU-MAJFLT" "RU-MAXRSS" "RU-MINFLT" "RU-MSGRCV" "RU-MSGSND"
               "RU-NIVCSW" "RU-NSIGNALS" "RU-NSWAP" "RU-NVCSW" "RU-OUBLOCK"
               "RU-STIME" "RU-UTIME" "RUSAGE_CHILDREN" "RUSAGE_SELF" "RUSEAGE"
               "R_OK" "S-IEXEC" "S-IFBLK" "S-IFCHR" "S-IFDIR" "S-IFIFO" "S-IFLNK" "S-IFMT"
               "S-IFREG" "S-IFSOCK" "S-IREAD" "S-ISGID" "S-ISUID" "S-ISVTX"
               "S-IWRITE" "SAVETEXT" "SB-MKSTEMP" "SC-MASK" "SC-ONSTACK"
               "SETUIDEXEC" "SG-ERASE" "SG-FLAGS" "SG-ISPEED" "SG-KILL"
               "SG-OSPEED" "SGTTYB" "ST-ATIME" "ST-BLKSIZE" "ST-BLOCKS"
               "ST-CTIME" "ST-DEV" "ST-GID" "ST-MODE" "ST-MTIME" "ST-NLINK"
               "ST-RDEV" "ST-SIZE" "ST-UID" "STAT" "TERMINAL-SPEEDS" "TIME-T"
               "TIMEVAL" "TIMEZONE" "TIOCFLUSH" "TIOCGETC" "TIOCGETP" "TIOCGLTC"
               "TIOCGPGRP" "TIOCGWINSZ" "TIOCNOTTY" "TIOCSETC" "TIOCSETP"
               "TIOCSLTC" "TIOCSPGRP" "TIOCSWINSZ" "TV-SEC" "TV-USEC"
               "TZ-DSTTIME" "TZ-MINUTESWEST" "UID-T" "UNIX-CLOSE"
               "UNIX-CLOSEDIR" "UNIX-DIRENT-NAME" "UNIX-DUP"
               "UNIX-FILE-MODE" "UNIX-FSTAT"
               "UNIX-GETHOSTNAME" "UNIX-GETPID" "UNIX-GETRUSAGE"
               "UNIX-GETTIMEOFDAY" "UNIX-GETUID" "UNIX-GID"
               "UNIX-EXIT"
               "UNIX-IOCTL"
               "UNIX-ISATTY" "UNIX-LSEEK" "UNIX-LSTAT" "UNIX-MKDIR"
               "UNIX-OPEN" "UNIX-OPENDIR" "UNIX-PATHNAME" "UNIX-PID"
               "UNIX-PIPE" "UNIX-SIMPLE-POLL" "UNIX-READ" "UNIX-READDIR" "UNIX-READLINK" "UNIX-REALPATH"
               "UNIX-RENAME" "UNIX-SELECT" "UNIX-STAT" "UNIX-UID"
               "UNIX-UNLINK" "UNIX-WRITE"
               "WINSIZE"
               "WRITEGRP" "WRITEOTH" "WRITEOWN" "WS-COL" "WS-ROW" "WS-XPIXEL"
               "WS-YPIXEL" "WNOHANG" "WSTOPPED" "WUNTRACED" "W_OK" "X_OK"

               ;; signals
               "SIGALRM" "SIGBUS" "SIGCHLD" "SIGCONT" "SIGEMT" "SIGFPE"
               "SIGHUP" "SIGILL" "SIGINT" "SIGIO" "SIGIOT" "SIGKILL"
               "SIGPIPE" "SIGPROF" "SIGQUIT" "SIGSEGV" "SIGSTOP" "SIGSYS"
               "SIGTERM" "SIGTRAP" "SIGTSTP" "SIGTTIN" "SIGTTOU" "SIGURG"
               "SIGUSR1" "SIGUSR2" "SIGVTALRM" "SIGWAITING" "SIGWINCH"
               "SIGXCPU" "SIGXFSZ"

               ;; errors
               "E2BIG" "EADDRINUSE" "EADDRNOTAVAIL" "EAFNOSUPPORT"
               "EAGAIN" "EALREADY" "EBADF" "EBUSY" "ECHILD" "ECONNABORTED"
               "ECONNREFUSED" "ECONNRESET" "EDEADLK" "EDESTADDRREQ" "EDOM"
               "EDQUOT" "EEXIST" "EFAULT" "EFBIG" "EHOSTDOWN"
               "EHOSTUNREACH" "EINPROGRESS" "EINTR" "EINVAL" "EIO"
               "EISCONN" "EISDIR" "ELOCAL" "ELOOP" "EMFILE" "EMLINK"
               "EMSGSIZE" "ENAMETOOLONG" "ENETDOWN" "ENETRESET"
               "ENETUNREACH" "ENFILE" "ENOBUFS" "ENODEV" "ENOENT"
               "ENOEXEC" "ENOMEM" "ENOPROTOOPT" "ENOSPC" "ENOTBLK"
               "ENOTCONN" "ENOTEMPTY" "ENOTSOCK" "ENOTTY" "ENXIO"
               "EOPNOTSUPP" "EPERM" "EPFNOSUPPORT" "EPIPE" "EPROCLIM"
               "EPROTONOSUPPORT" "EPROTOTYPE" "ERANGE" "EREMOTE"
               "ERESTART" "EROFS" "ESHUTDOWN" "ESOCKTNOSUPPORT" "ESPIPE"
               "ESRCH" "ESUCCESS" "ETIMEDOUT" "ETOOMANYREFS" "ETXTBSY"
               "EUSERS" "EVICEERR" "EVICEOP" "EWOULDBLOCK" "EXDEV"

               "FD-ISSET" "FD-SET" "LTCHARS" "UNIX-FAST-SELECT"
               "UNIX-KILL" "CODESET"
               "TCSETPGRP" "FD-ZERO" "FD-CLR" "CHECK" "UNIX-RESOLVE-LINKS"
               "FD-SETSIZE" "TCGETPGRP" "UNIX-FAST-GETRUSAGE"
               "UNIX-KILLPG"
               "TIOCSIGSEND"
               "C-IFLAG" "C-LFLAG" "C-OFLAG"
               "C-CFLAG" "TCSAFLUSH" "C-CC" "SIOCSPGRP" "TERMIOS"
               "O_NDELAY" "O_NOCTTY"
               "O_NONBLOCK" "TCSANOW" "TCSADRAIN" "TCIFLUSH" "TCOFLUSH"
               "TCIOFLUSH" "TTY-IGNBRK" "TTY-BRKINT" "TTY-IGNPAR" "TTY-PARMRK"
               "TTY-INPCK" "TTY-ISTRIP" "TTY-INLCR" "TTY-IGNCR" "TTY-ICRNL"
               "TTY-IUCLC" "TTY-IXON" "TTY-IXANY" "TTY-IXOFF" "TTY-IENQAK"
               "TTY-IMAXBEL" "TTY-OPOST" "TTY-OLCUC" "TTY-ONLCR" "TTY-OCRNL"
               "TTY-ONOCR" "TTY-ONLRET" "TTY-OFILL" "TTY-OFDEL" "TTY-ISIG"
               "TTY-ICANON" "TTY-XCASE" "TTY-ECHO" "TTY-ECHOE" "TTY-ECHOK"
               "TTY-ECHONL" "TTY-NOFLSH" "TTY-IEXTEN" "TTY-TOSTOP" "TTY-ECHOCTL"
               "TTY-ECHOPRT" "TTY-ECHOKE"  "TTY-DEFECHO" "TTY-FLUSHO"
               "TTY-PENDIN" "TTY-CSTOPB" "TTY-CREAD" "TTY-PARENB" "TTY-PARODD"
               "TTY-HUPCL" "TTY-CLOCAL" "RCV1EN" "XMT1EN" "TTY-LOBLK" "VINTR"
               "VQUIT" "VERASE" "VKILL" "VEOF" "VEOL" "VEOL2" "TTY-CBAUD"
               "TTY-CSIZE" "TTY-CS5" "TTY-CS6" "TTY-CS7" "TTY-CS8" "VMIN" "VTIME"
               "VSUSP" "VSTART" "VSTOP" "VDSUSP"
               #!+(or svr4 bsd linux) "O_NDELAY"
               #!+(or svr4 linux)
               ("EADDRINUSE"
                "EADDRNOTAVAIL" "EADV"
                "EAFNOSUPPORT" "EALREADY" "EBADE" "EBADFD"
                "EBADMSG" "EBADR" "EBADRQC"
                "EBADSLT" "EBFONT" #!+svr4 "ECANCELED"
                "ECHRNG" "ECOMM" "ECONNABORTED"
                "ECONNREFUSED" "ECONNRESET" "EDEADLK"
                "EDEADLOCK" "EDESTADDRREQ" #!+linux "EDOTDOT"
                #!+linux "EDQUOT" "EHOSTDOWN" "EHOSTUNREACH"
                "EIDRM" "EILSEQ" "EINPROGRESS"
                "EISCONN" #!+linux "EISNAM" "EL2HLT"
                "EL2NSYNC" "EL3HLT" "EL3RST" "ELIBACC"
                "ELIBBAD" "ELIBEXEC" "ELIBMAX" "ELIBSCN"
                "ELNRNG" "ELOOP" "EMSGSIZE" "EMULTIHOP"
                "ENAMETOOLONG" #!+linux "ENAVAIL"
                "ENETDOWN" "ENETRESET" "ENETUNREACH" "ENOANO"
                "ENOBUFS" "ENOCSI" "ENODATA" "ENOLCK"
                "ENOLINK" "ENOMSG" "ENONET" "ENOPKG"
                "ENOPROTOOPT" "ENOSR" "ENOSTR" "ENOSYS"
                "ENOTCONN" "ENOTEMPTY" #!+linux "ENOTNAM"
                "ENOTSOCK" #!+svr4 "ENOTSUP" "ENOTUNIQ"
                "EOPNOTSUPP" "EOVERFLOW" "EPFNOSUPPORT"
                "EPROTO" "EPROTONOSUPPORT" "EPROTOTYPE"
                "EREMCHG" "EREMOTE" #!+linux "EREMOTEIO"
                "ERESTART" "ESHUTDOWN" "ESOCKTNOSUPPORT"
                "ESRMNT" "ESTALE" "ESTRPIPE" "ETIME"
                "ETIMEDOUT" "ETOOMANYREFS" #!+linux "EUCLEAN"
                "EUNATCH" "EUSERS" "EWOULDBLOCK" "EXFULL")))

   #s(sb-cold:package-data
      :name "SB!VM"
      :doc
      "internal: the default place to hide information about the hardware and data
structure representations"
      :use ("CL" "SB!ALIEN" "SB!ALIEN-INTERNALS" "SB!ASSEM" "SB!C"
                 "SB!EXT" "SB!FASL" "SB!INT" "SB!KERNEL" "SB!SYS" "SB!UNIX")
      :reexport ("WORD")
      :export ("*ALLOC-SIGNAL*"
               "*PRIMITIVE-OBJECTS*"
               "+HIGHEST-NORMAL-GENERATION+"
               "+PSEUDO-STATIC-GENERATION+"
               "%COMPILER-BARRIER" "%DATA-DEPENDENCY-BARRIER"
               "%MEMORY-BARRIER" "%READ-BARRIER" "%WRITE-BARRIER"
               "AFTER-BREAKPOINT-TRAP"
               #!+(and gencgc sparc) "ALLOCATION-TRAP"
               "ANY-REG-SC-NUMBER" "ARRAY-DATA-SLOT" "ARRAY-DIMENSIONS-OFFSET"
               "ARRAY-DISPLACED-P-SLOT" "ARRAY-DISPLACEMENT-SLOT"
               "ARRAY-DISPLACED-FROM-SLOT"
               "ARRAY-ELEMENTS-SLOT" "ARRAY-FILL-POINTER-P-SLOT"
               "ARRAY-FILL-POINTER-SLOT" "ATOMIC-FLAG"
               "CHARACTER-REG-SC-NUMBER"
               "CHARACTER-STACK-SC-NUMBER" "CHARACTER-WIDETAG"
               "BIGNUM-DIGITS-OFFSET" "BIGNUM-WIDETAG" "BINDING-SIZE"
               "BINDING-SYMBOL-SLOT" "BINDING-VALUE-SLOT" "BREAKPOINT-TRAP"
               "N-BYTE-BITS" "BYTE-REG-SC-NUMBER"
               "CATCH-BLOCK-CURRENT-CODE-SLOT"
               "CATCH-BLOCK-CURRENT-CONT-SLOT" "CATCH-BLOCK-CURRENT-UWP-SLOT"
               "CATCH-BLOCK-ENTRY-PC-SLOT" "CATCH-BLOCK-PREVIOUS-CATCH-SLOT"
               "CATCH-BLOCK-SC-NUMBER" "CATCH-BLOCK-SIZE"
               "CATCH-BLOCK-TAG-SLOT" "CERROR-TRAP"
               "CLOSURE-FUN-SLOT"
               "CLOSURE-HEADER-WIDETAG" "CLOSURE-INFO-OFFSET"
               "CODE-CODE-SIZE-SLOT" "CODE-CONSTANTS-OFFSET"
               "CODE-DEBUG-INFO-SLOT" "CODE-ENTRY-POINTS-SLOT"
               "CODE-HEADER-WIDETAG"
               "CODE-TRACE-TABLE-OFFSET-SLOT" "COMPLEX-ARRAY-WIDETAG"
               "COMPLEX-BIT-VECTOR-WIDETAG" "COMPLEX-DOUBLE-FLOAT-FILLER-SLOT"
               "COMPLEX-DOUBLE-FLOAT-IMAG-SLOT" "COMPLEX-DOUBLE-FLOAT-REAL-SLOT"
               "COMPLEX-DOUBLE-FLOAT-SIZE" "COMPLEX-DOUBLE-FLOAT-WIDETAG"
               "COMPLEX-DOUBLE-REG-SC-NUMBER" "COMPLEX-DOUBLE-STACK-SC-NUMBER"
               "COMPLEX-IMAG-SLOT" "COMPLEX-REAL-SLOT"
               #!+long-float "COMPLEX-LONG-FLOAT-IMAG-SLOT"
               #!+long-float "COMPLEX-LONG-FLOAT-REAL-SLOT"
               #!+long-float "COMPLEX-LONG-FLOAT-SIZE"
               #!+long-float "COMPLEX-LONG-FLOAT-WIDETAG"
               #!+long-float "COMPLEX-LONG-REG-SC-NUMBER"
               #!+long-float "COMPLEX-LONG-STACK-SC-NUMBER"
               #!+sb-simd-pack "SIMD-PACK-TAG-SLOT"
               #!+sb-simd-pack "SIMD-PACK-HI-VALUE-SLOT"
               #!+sb-simd-pack "SIMD-PACK-LO-VALUE-SLOT"
               #!+sb-simd-pack "SIMD-PACK-SIZE"
               #!+sb-simd-pack "SIMD-PACK-WIDETAG"
               #!-x86-64 #!-x86-64
               "COMPLEX-SINGLE-FLOAT-IMAG-SLOT" "COMPLEX-SINGLE-FLOAT-REAL-SLOT"
               #!+x86-64
               "COMPLEX-SINGLE-FLOAT-DATA-SLOT"
               "COMPLEX-SINGLE-FLOAT-SIZE" "COMPLEX-SINGLE-FLOAT-WIDETAG"
               "COMPLEX-SINGLE-REG-SC-NUMBER" "COMPLEX-SINGLE-STACK-SC-NUMBER"
               "COMPLEX-SIZE" "COMPLEX-BASE-STRING-WIDETAG"
               #!+sb-unicode "COMPLEX-CHARACTER-STRING-WIDETAG"
               "COMPLEX-WIDETAG"
               "COMPLEX-VECTOR-NIL-WIDETAG"
               "COMPLEX-VECTOR-WIDETAG" "CONS-CAR-SLOT" "CONS-CDR-SLOT"
               "CONS-SIZE" "CONSTANT-SC-NUMBER"
               "CONTEXT-FLOATING-POINT-MODES" "CONTEXT-FLOAT-REGISTER"
               "CONTEXT-PC" "CONTEXT-REGISTER"
               "CONTROL-STACK-SC-NUMBER" "COUNT-NO-OPS"
               #!+sb-safepoint "CSP-SAFEPOINT-TRAP"
               "*CURRENT-CATCH-BLOCK*"
               "CURRENT-FLOAT-TRAP"
               "DESCRIPTOR-REG-SC-NUMBER" "DESCRIPTOR-VS-NON-DESCRIPTOR-STORAGE"
               "DOUBLE-FLOAT-EXPONENT-BYTE" "DOUBLE-FLOAT-BIAS"
               "DOUBLE-FLOAT-DIGITS" "DOUBLE-FLOAT-EXPONENT-BYTE"
               "DOUBLE-FLOAT-HIDDEN-BIT"
               "DOUBLE-FLOAT-NORMAL-EXPONENT-MAX"
               "DOUBLE-FLOAT-NORMAL-EXPONENT-MIN" "DOUBLE-FLOAT-SIGNIFICAND-BYTE"
               "DOUBLE-FLOAT-SIZE" "DOUBLE-FLOAT-TRAPPING-NAN-BIT"
               "DOUBLE-FLOAT-WIDETAG" "DOUBLE-FLOAT-VALUE-SLOT"
               "DOUBLE-INT-CARG-REG-SC-NUMBER" "DOUBLE-REG-SC-NUMBER"
               "DOUBLE-STACK-SC-NUMBER"
               "EMIT-LONG-NOP" "ERROR-TRAP" "EVEN-FIXNUM-LOWTAG"
               "FDEFN-FUN-SLOT" "FDEFN-NAME-SLOT" "FDEFN-RAW-ADDR-SLOT"
               "FDEFN-SIZE" "FDEFN-WIDETAG" "FIXNUMIZE"
               "FIXNUM-TAG-MASK"
               "FIXUP-CODE-OBJECT" "FLOAT-DENORMAL-TRAP-BIT"
               "FLOAT-DIVIDE-BY-ZERO-TRAP-BIT"
               "FLOAT-INVALID-TRAP-BIT"
               "FLOAT-OVERFLOW-TRAP-BIT" "FLOAT-SIGN-SHIFT"
               "FLOAT-UNDERFLOW-TRAP-BIT" "FLOATING-POINT-MODES"
               "FP-CONSTANT-SC-NUMBER"
               "FP-DOUBLE-ZERO-SC-NUMBER" "FP-SINGLE-ZERO-SC-NUMBER"
               "FUNCALLABLE-INSTANCE-TRAMPOLINE-SLOT"
               "FUNCALLABLE-INSTANCE-HEADER-WIDETAG"
               "FUNCALLABLE-INSTANCE-INFO-OFFSET"
               "SIMPLE-FUN-ARGLIST-SLOT" "SIMPLE-FUN-CODE-OFFSET"
               "FUN-END-BREAKPOINT-TRAP"
               "SIMPLE-FUN-HEADER-WIDETAG"
               "SIMPLE-FUN-NAME-SLOT"
               "SIMPLE-FUN-NEXT-SLOT"
               "FUN-POINTER-LOWTAG"
               "SIMPLE-FUN-SELF-SLOT"
               "SIMPLE-FUN-TYPE-SLOT"
               "GENCGC-CARD-BYTES"
               "GENCGC-ALLOC-GRANULARITY"
               "GENCGC-RELEASE-GRANULARITY"
               #!+(or ppc sparc) "PSEUDO-ATOMIC-INTERRUPTED-FLAG"
               #!+(or ppc sparc) "PSEUDO-ATOMIC-FLAG"
               #!+sb-safepoint "GLOBAL-SAFEPOINT-TRAP"
               "GENESIS" "HALT-TRAP" "IGNORE-ME-SC-NUMBER"
               "IMMEDIATE-CHARACTER-SC-NUMBER" "IMMEDIATE-SAP-SC-NUMBER"
               "IMMEDIATE-SC-NUMBER"
               #!+inline-constants "CANONICALIZE-INLINE-CONSTANT"
               #!+inline-constants "INLINE-CONSTANT-VALUE"
               #!+inline-constants "EMIT-CONSTANT-SEGMENT-HEADER"
               #!+inline-constants "SORT-INLINE-CONSTANTS"
               #!+inline-constants "EMIT-INLINE-CONSTANT"
               "INSTANCE-HEADER-WIDETAG" "INSTANCE-POINTER-LOWTAG"
               "INSTANCE-SLOTS-OFFSET" "INSTANCE-USAGE"
               "INTERIOR-REG-SC-NUMBER" "INTERNAL-ERROR-ARGS"
               "INTERRUPTED-FLAG" "LIST-ALLOCATED-OBJECTS" "LIST-POINTER-LOWTAG"
               ;; FIXME: Possibly these other parameters (see
               ;; compiler/{x86,sparc}/parms.lisp) should be defined
               ;; conditionally on #!+LONG-FLOAT)
               "LONG-FLOAT-BIAS" "LONG-FLOAT-DIGITS" "LONG-FLOAT-EXPONENT-BYTE"
               "LONG-FLOAT-HIDDEN-BIT" "LONG-FLOAT-NORMAL-EXPONENT-MAX"
               "LONG-FLOAT-NORMAL-EXPONENT-MIN" "LONG-FLOAT-SIGNIFICAND-BYTE"
               #!+long-float "LONG-FLOAT-SIZE"
               "LONG-FLOAT-TRAPPING-NAN-BIT"
               #!+long-float "LONG-FLOAT-WIDETAG"
               #!+long-float "LONG-FLOAT-VALUE-SLOT"
               #!+long-float "LONG-REG-SC-NUMBER"
               #!+long-float "LONG-STACK-SC-NUMBER"
               "LOWTAG-LIMIT" "LOWTAG-MASK"
               "LRA-SAVE-OFFSET"
               "MEMORY-USAGE"
               "N-LOWTAG-BITS"
               "N-FIXNUM-TAG-BITS"
               "N-FIXNUM-BITS"
               "N-POSITIVE-FIXNUM-BITS"
               "NEGATIVE-IMMEDIATE-SC-NUMBER"
               "NFP-SAVE-OFFSET"
               "NON-DESCRIPTOR-REG-SC-NUMBER"
               "NULL-SC-NUMBER"
               "OBJECT-NOT-LIST-TRAP" "OBJECT-NOT-INSTANCE-TRAP"
               "OCFP-SAVE-OFFSET"
               "ODD-FIXNUM-LOWTAG"
               "OFFSET-STATIC-SYMBOL"
               "OTHER-IMMEDIATE-0-LOWTAG"
               "OTHER-IMMEDIATE-1-LOWTAG"
               ;; FIXME: 32/64-bit issues
               "OTHER-IMMEDIATE-2-LOWTAG"
               "OTHER-IMMEDIATE-3-LOWTAG"
               "OTHER-POINTER-LOWTAG"
               "PAD0-LOWTAG" "PAD1-LOWTAG" "PAD2-LOWTAG"
               "PAD3-LOWTAG" "PAD4-LOWTAG" "PAD5-LOWTAG"
               "PAD-DATA-BLOCK" "PENDING-INTERRUPT-TRAP"
               "PRIMITIVE-OBJECT" "PRIMITIVE-OBJECT-WIDETAG"
               "PRIMITIVE-OBJECT-LOWTAG" "PRIMITIVE-OBJECT-NAME"
               "PRIMITIVE-OBJECT-OPTIONS" "PRIMITIVE-OBJECT-P"
               "PRIMITIVE-OBJECT-SIZE" "PRIMITIVE-OBJECT-SLOTS"
               "PRIMITIVE-OBJECT-VARIABLE-LENGTH-P"
               "PRINT-ALLOCATED-OBJECTS"
               "RANDOM-IMMEDIATE-SC-NUMBER" "RATIO-DENOMINATOR-SLOT"
               "RATIO-NUMERATOR-SLOT" "RATIO-SIZE" "RATIO-WIDETAG"
               "*READ-ONLY-SPACE-FREE-POINTER*"
               "RETURN-PC-HEADER-WIDETAG"
               "RETURN-PC-RETURN-POINT-OFFSET" "RETURN-PC-SAVE-OFFSET"
               "SAETP-CTYPE" "SAETP-INITIAL-ELEMENT-DEFAULT"
               "SAETP-N-BITS" "SAETP-TYPECODE" "SAETP-PRIMITIVE-TYPE-NAME"
               "SAETP-N-PAD-ELEMENTS" "SAETP-SPECIFIER"
               "SAETP-COMPLEX-TYPECODE" "SAETP-IMPORTANCE"
               "SAETP-FIXNUM-P"
               "VALID-BIT-BASH-SAETP-P"
               "*SPECIALIZED-ARRAY-ELEMENT-TYPE-PROPERTIES*"
               "SANCTIFY-FOR-EXECUTION"
               "SAP-POINTER-SLOT" "SAP-REG-SC-NUMBER" "SAP-SIZE"
               "SAP-STACK-SC-NUMBER" "SAP-WIDETAG"
               "SIGFPE-HANDLER" "SIGNED-REG-SC-NUMBER" "SIGNED-STACK-SC-NUMBER"
               "SIGNED-WORD"
               "SIMPLE-ARRAY-COMPLEX-DOUBLE-FLOAT-WIDETAG"
               #!+long-float "SIMPLE-ARRAY-COMPLEX-LONG-FLOAT-WIDETAG"
               "SIMPLE-ARRAY-COMPLEX-SINGLE-FLOAT-WIDETAG"
               "SIMPLE-ARRAY-DOUBLE-FLOAT-WIDETAG"
               #!+long-float "SIMPLE-ARRAY-LONG-FLOAT-WIDETAG"
               "SIMPLE-ARRAY-NIL-WIDETAG"
               "SIMPLE-ARRAY-SINGLE-FLOAT-WIDETAG"
               "SIMPLE-ARRAY-WIDETAG"
               "SIMPLE-ARRAY-UNSIGNED-BYTE-15-WIDETAG"
               "SIMPLE-ARRAY-UNSIGNED-BYTE-16-WIDETAG"
               "SIMPLE-ARRAY-UNSIGNED-BYTE-2-WIDETAG"
               "SIMPLE-ARRAY-UNSIGNED-FIXNUM-WIDETAG"
               "SIMPLE-ARRAY-UNSIGNED-BYTE-31-WIDETAG"
               "SIMPLE-ARRAY-UNSIGNED-BYTE-32-WIDETAG"
               "SIMPLE-ARRAY-UNSIGNED-BYTE-63-WIDETAG"
               "SIMPLE-ARRAY-UNSIGNED-BYTE-64-WIDETAG"
               "SIMPLE-ARRAY-UNSIGNED-BYTE-4-WIDETAG"
               "SIMPLE-ARRAY-UNSIGNED-BYTE-7-WIDETAG"
               "SIMPLE-ARRAY-UNSIGNED-BYTE-8-WIDETAG"
               "SIMPLE-ARRAY-SIGNED-BYTE-16-WIDETAG"
               "SIMPLE-ARRAY-FIXNUM-WIDETAG"
               "SIMPLE-ARRAY-SIGNED-BYTE-32-WIDETAG"
               "SIMPLE-ARRAY-SIGNED-BYTE-64-WIDETAG"
               "SIMPLE-ARRAY-SIGNED-BYTE-8-WIDETAG"
               "SIMPLE-BIT-VECTOR-WIDETAG"
               "SIMPLE-BASE-STRING-WIDETAG"
               #!+sb-unicode "SIMPLE-CHARACTER-STRING-WIDETAG"
               "SIMPLE-VECTOR-WIDETAG" "SINGLE-FLOAT-BIAS"
               "SINGLE-FLOAT-DIGITS" "SINGLE-FLOAT-EXPONENT-BYTE"
               "SINGLE-FLOAT-HIDDEN-BIT" "SINGLE-FLOAT-NORMAL-EXPONENT-MAX"
               "SINGLE-FLOAT-NORMAL-EXPONENT-MIN" "SINGLE-FLOAT-SIGNIFICAND-BYTE"
               "SINGLE-FLOAT-SIZE" "SINGLE-FLOAT-TRAPPING-NAN-BIT"
               "SINGLE-FLOAT-WIDETAG" "SINGLE-FLOAT-VALUE-SLOT"
               "SINGLE-INT-CARG-REG-SC-NUMBER"
               "SINGLE-REG-SC-NUMBER" "SINGLE-STACK-SC-NUMBER"
               "SINGLE-STEP-AROUND-TRAP"
               "SINGLE-STEP-BEFORE-TRAP"
               "SINGLE-VALUE-RETURN-BYTE-OFFSET" "SLOT-DOCS"
               "SLOT-NAME" "SLOT-OFFSET" "SLOT-OPTIONS"
               "SLOT-REST-P" "*STATIC-FUNS*" "STATIC-FUN-OFFSET"
               "STATIC-SYMBOL-OFFSET" "STATIC-SYMBOL-P"
               "*STATIC-SPACE-FREE-POINTER*" "*STATIC-SYMBOLS*"
               "SYMBOL-HASH-SLOT" "SYMBOL-HEADER-WIDETAG" "SYMBOL-NAME-SLOT"
               "SYMBOL-PACKAGE-SLOT" "SYMBOL-PLIST-SLOT"
               "SYMBOL-SIZE" "SYMBOL-VALUE-SLOT"
               "*BINDING-STACK-START*"
               "*CONTROL-STACK-START*" "*CONTROL-STACK-END*"
               "CONTROL-STACK-POINTER-VALID-P"
               "DYNAMIC-SPACE-START" "DYNAMIC-SPACE-END"
               #!+gencgc "MAX-DYNAMIC-SPACE-END"
               #!-gencgc "DYNAMIC-0-SPACE-START"
               #!-gencgc "DYNAMIC-0-SPACE-END"
               #!-gencgc "DYNAMIC-1-SPACE-START"
               #!-gencgc "DYNAMIC-1-SPACE-END"
               "READ-ONLY-SPACE-START" "READ-ONLY-SPACE-END"
               "STATIC-SPACE-START" "STATIC-SPACE-END"
               #!+linkage-table "LINKAGE-TABLE-SPACE-START"
               #!+linkage-table "LINKAGE-TABLE-SPACE-END"
               #!+linkage-table "LINKAGE-TABLE-ENTRY-SIZE"
               #!+sb-safepoint "GC-SAFEPOINT-PAGE-ADDR"
               "TLS-SIZE"
               "TRACE-TABLE-CALL-SITE"
               "TRACE-TABLE-FUN-EPILOGUE" "TRACE-TABLE-FUN-PROLOGUE"
               "TRACE-TABLE-NORMAL" "N-WIDETAG-BITS" "WIDETAG-MASK"
               "UNBOUND-MARKER-WIDETAG"
               "NO-TLS-VALUE-MARKER-WIDETAG"
               "UNSIGNED-IMMEDIATE-SC-NUMBER"
               "UNSIGNED-REG-SC-NUMBER" "UNSIGNED-STACK-SC-NUMBER"
               "UNWIND-BLOCK-CURRENT-CODE-SLOT" "UNWIND-BLOCK-CURRENT-CONT-SLOT"
               "UNWIND-BLOCK-CURRENT-UWP-SLOT" "UNWIND-BLOCK-ENTRY-PC-SLOT"
               "UNWIND-BLOCK-SIZE" "VALUE-CELL-HEADER-WIDETAG" "VALUE-CELL-SIZE"
               "VALUE-CELL-VALUE-SLOT" "VECTOR-DATA-OFFSET" "VECTOR-LENGTH-SLOT"
               "VECTOR-NORMAL-SUBTYPE"
               "VECTOR-VALID-HASHING-SUBTYPE"
               "WEAK-POINTER-BROKEN-SLOT" "WEAK-POINTER-NEXT-SLOT"
               "WEAK-POINTER-SIZE" "WEAK-POINTER-WIDETAG"
               "WEAK-POINTER-VALUE-SLOT"
               "N-WORD-BITS" "N-WORD-BYTES" "N-MACHINE-WORD-BITS"
               "WORD-REG-SC-NUMBER" "WORD-SHIFT"
               #!+win32 "CONTEXT-RESTORE-TRAP"
               "ZERO-SC-NUMBER"))

   #s(sb-cold:package-data
      :name "SB!WALKER"
      :doc "internal: a code walker used by PCL"
      :use ("CL" "SB!INT" "SB!EXT")
      :export ("DEFINE-WALKER-TEMPLATE"
               "WALK-FORM"
               "*WALK-FORM-EXPAND-MACROS-P*"
               "VAR-LEXICAL-P" "VAR-SPECIAL-P"
               "VAR-GLOBALLY-SPECIAL-P"
               "VAR-DECLARATION"

               ;; These were exported from the original PCL version of this
               ;; package, but aren't used in SBCL.
               ;;"NESTED-WALK-FORM" "MACROEXPAND-ALL"
               ))

   #!+sb-eval
   #s(sb-cold:package-data
      :name "SB!EVAL"
      :doc "internal: the evaluator implementation used to execute code without compiling it."
      :use ("CL" "SB!KERNEL" "SB!EXT")
      :reexport ("*EVAL-CALLS*")
      :export ("INTERPRETED-FUNCTION"
               "INTERPRETED-FUNCTION-P"
               "INTERPRETED-FUNCTION-NAME"
               "INTERPRETED-FUNCTION-DEBUG-NAME"
               "INTERPRETED-FUNCTION-LAMBDA-LIST"
               "INTERPRETED-FUNCTION-DEBUG-LAMBDA-LIST"
               "INTERPRETED-FUNCTION-DECLARATIONS"
               "INTERPRETED-FUNCTION-DOCUMENTATION"
               "INTERPRETED-FUNCTION-BODY"
               "INTERPRETED-FUNCTION-SOURCE-LOCATION"
               "EVAL-IN-ENVIRONMENT"
               "MAKE-NULL-ENVIRONMENT"
               "EVAL-IN-NATIVE-ENVIRONMENT"
               "PREPARE-FOR-COMPILE"
               "*EVAL-LEVEL*"))

   #!+win32
   #s(sb-cold:package-data
      :name "SB!WIN32"
      :doc "private: a wrapper layer for Win32 functions needed by
SBCL itself"
      :use ("CL" "SB!ALIEN" "SB!EXT" "SB!INT" "SB!SYS")
      :export ("BOOL"
               "CLOSE-HANDLE"
               "CREATE-FILE"
               "CREATE-FILE-MAPPING"
               "CRYPT-GEN-RANDOM"
               "DWORD"
               "FD-CLEAR-INPUT"
               "FD-LISTEN"
               "FILE-CREATE-ALWAYS"
               "FILE-CREATE-NEW"
               "FILE-OPEN-ALWAYS"
               "FILE-OPEN-EXISTING"
               "FILE-TRUNCATE-EXISTING"
               "FLUSH-CONSOLE-INPUT-BUFFER"
               "FLUSH-VIEW-OF-FILE"
               "FORMAT-MESSAGE"
               "GET-FILE-ATTRIBUTES"
               "GET-FILE-SIZE-EX"
               "GET-FILE-TYPE"
               "GET-LAST-ERROR"
               "GET-OSFHANDLE"
               "GET-VERSION-EX"
               "HANDLE"
               "HANDLE-CLEAR-INPUT"
               "HANDLE-LISTEN"
               "INT-PTR"
               "INVALID-HANDLE"
               "LSEEKI64"
               "MAP-VIEW-OF-FILE"
               "MILLISLEEP"
               "PEEK-CONSOLE-INPUT"
               "PEEK-NAMED-PIPE"
               "READ-FILE"
               "UNIXLIKE-CLOSE"
               "UNIXLIKE-OPEN"
               "UNMAP-VIEW-OF-FILE"
               "WAIT-OBJECT-OR-SIGNAL"
               "WRITE-FILE"
               "WITH-PROCESS-TIMES")))