Remove sign-extend arg to LLVMConstInt calls.
[sbcl/llvm.git] / package-data-list.lisp-expr
blob2dfb02bc5bc7b6fde5f0f6a998ac378766a6cfa2
1 ;;;; -*- Lisp -*-
3 ;;;; the specifications of target packages, except for a few things
4 ;;;; which are handled elsewhere by other mechanisms:
5 ;;;;   * any SHADOWing and nickname hackery;
6 ;;;;   * the standard, non-SBCL-specific packages COMMON-LISP,
7 ;;;;     COMMON-LISP-USER, and KEYWORD.
8 ;;;;
9 ;;;; The packages are named SB!FOO here and elsewhere in
10 ;;;; cross-compilation, in order to avoid collision with possible
11 ;;;; corresponding SB-FOO packages in the cross-compilation host.
12 ;;;; They're renamed to SB-FOO later, after we've departed from the xc
13 ;;;; mothership and the danger of namespace collision is past.
15 ;;;; This software is part of the SBCL system. See the README file for
16 ;;;; more information.
17 ;;;;
18 ;;;; This software is derived from the CMU CL system, which was
19 ;;;; written at Carnegie Mellon University and released into the
20 ;;;; public domain. The software is in the public domain and is
21 ;;;; provided with absolutely no warranty. See the COPYING and CREDITS
22 ;;;; files for more information.
24 ;;;; KLUDGE: To make it easier for emacs to autoindent this file nicely
25 ;;;; (which prevents spurious conflicts in CVS) each longish list should
26 ;;;; have only one string on the first line. Silly, but there you go.
28 (#s(sb-cold:package-data
29     :name "SB!ALIEN"
30     :doc "public: the ALIEN foreign function interface (If you're
31 porting CMU CL code, note that this package corresponds roughly to a union
32 of the packages ALIEN and C-CALL at the time of the SBCL fork. SB-C-CALL
33 is a deprecated nickname to help ease the transition from older versions
34 of SBCL which maintained the CMU-CL-style split into two packages.)"
35     :use ("CL" "SB!EXT" "SB!INT" "SB!SYS" "SB!ALIEN-INTERNALS")
36     :reexport ("ARRAY"
37                "BOOLEAN" "CHAR" "DOUBLE-FLOAT"
38                "FLOAT" "FUNCTION" "INTEGER" "LONG-FLOAT"
39                "SINGLE-FLOAT"
40                ;; FIXME: Do we really want to reexport
41                ;; SYSTEM-AREA-POINTER here? Why?
42                "SYSTEM-AREA-POINTER"
43                "UNION"  "VALUES" "*")
44     :export ("ADDR"
45              "ALIEN"
46              "ALIEN-FUNCALL" "ALIEN-SAP" "ALIEN-SIZE"
47              "CAST" "C-STRING"
48              "DEFINE-ALIEN-ROUTINE" "DEFINE-ALIEN-TYPE" "DEFINE-ALIEN-VARIABLE"
49              "DEREF" "DOUBLE"
50              "ENUM" "EXTERN-ALIEN"
51              "FREE-ALIEN"
52              "GET-ERRNO"
53              "INT"
54              "LOAD-1-FOREIGN" "LOAD-FOREIGN" "LOAD-SHARED-OBJECT" "LONG" "LONG-LONG"
55              "MAKE-ALIEN"
56              "NULL-ALIEN"
57              "SAP-ALIEN" "SHORT" "SIGNED" "SLOT" "STRUCT"
58              "UNDEFINED-ALIEN-ERROR"
59              "UNLOAD-SHARED-OBJECT"
60              "UNSIGNED"
61              "UNSIGNED-CHAR" "UNSIGNED-INT" "UNSIGNED-LONG" "UNSIGNED-LONG-LONG" "UNSIGNED-SHORT"
62              "UTF8-STRING"
63              "VOID"
64              "WITH-ALIEN"))
66    #s(sb-cold:package-data
67       :name "SB!ALIEN-INTERNALS"
68       :doc "private: stuff for implementing ALIENs and friends"
69       :use ("CL")
70       :export ("%CAST"
71                "%DEREF-ADDR" "%HEAP-ALIEN" "%HEAP-ALIEN-ADDR"
72                "%LOCAL-ALIEN-ADDR" "%LOCAL-ALIEN-FORCED-TO-MEMORY-P" "%SAP-ALIEN"
73                "%SET-DEREF" "%SET-HEAP-ALIEN" "%SET-LOCAL-ALIEN" "%SET-SLOT"
74                "%SLOT-ADDR" "*VALUES-TYPE-OKAY*" "ALIEN-ARRAY-TYPE"
75                "ALIEN-ARRAY-TYPE-DIMENSIONS" "ALIEN-ARRAY-TYPE-ELEMENT-TYPE"
76                "ALIEN-ARRAY-TYPE-P" "ALIEN-BOOLEAN-TYPE" "ALIEN-BOOLEAN-TYPE-P"
77                "ALIEN-CALLBACK"
78                "ALIEN-CALLBACK-ACCESSOR-FORM"
79                "ALIEN-CALLBACK-ASSEMBLER-WRAPPER"
80                "ALIEN-DOUBLE-FLOAT-TYPE" "ALIEN-DOUBLE-FLOAT-TYPE-P"
81                "ALIEN-ENUM-TYPE" "ALIEN-ENUM-TYPE-P" "ALIEN-FLOAT-TYPE"
82                "ALIEN-FLOAT-TYPE-P" "ALIEN-FUN-TYPE"
83                "ALIEN-FUN-TYPE-ARG-TYPES" "ALIEN-FUN-TYPE-P"
84                "ALIEN-FUN-TYPE-RESULT-TYPE" "ALIEN-INTEGER-TYPE"
85                "ALIEN-INTEGER-TYPE-P" "ALIEN-INTEGER-TYPE-SIGNED"
86                "ALIEN-LONG-FLOAT-TYPE" "ALIEN-LONG-FLOAT-TYPE-P"
87                "ALIEN-POINTER-TYPE" "ALIEN-POINTER-TYPE-P"
88                "ALIEN-POINTER-TYPE-TO" "ALIEN-RECORD-FIELD"
89                "ALIEN-RECORD-FIELD-NAME" "ALIEN-RECORD-FIELD-OFFSET"
90                "ALIEN-RECORD-FIELD-P" "ALIEN-RECORD-FIELD-TYPE"
91                "ALIEN-RECORD-TYPE" "ALIEN-RECORD-TYPE-FIELDS"
92                "ALIEN-RECORD-TYPE-P" "ALIEN-SINGLE-FLOAT-TYPE"
93                "ALIEN-SINGLE-FLOAT-TYPE-P" "ALIEN-SUBTYPE-P" "ALIEN-TYPE"
94                "ALIEN-TYPE-=" "ALIEN-TYPE-ALIGNMENT" "ALIEN-TYPE-BITS"
95                "ALIEN-TYPE-P" "ALIEN-TYPEP"
96                "ALIEN-VALUE" "ALIEN-VALUE-TYPE"
97                "ALIEN-VALUE-SAP" "ALIEN-VALUE-P"
98                "ALIEN-VALUES-TYPE" "ALIEN-VALUES-TYPE-P"
99                "ALIEN-VALUES-TYPE-VALUES" "ALIGN-OFFSET" "ALIEN-VOID-TYPE-P"
100                "COMPUTE-ALIEN-REP-TYPE" "COMPUTE-DEPORT-ALLOC-LAMBDA"
101                "COMPUTE-DEPORT-LAMBDA" "COMPUTE-DEPOSIT-LAMBDA"
102                "COMPUTE-EXTRACT-LAMBDA" "COMPUTE-LISP-REP-TYPE"
103                "COMPUTE-NATURALIZE-LAMBDA" "DEFINE-ALIEN-TYPE-CLASS"
104                "DEFINE-ALIEN-TYPE-METHOD" "DEFINE-ALIEN-TYPE-TRANSLATOR"
105                "DEPORT" "DEPORT-ALLOC"
106                "DEPOSIT-ALIEN-VALUE" "DISPOSE-LOCAL-ALIEN"
107                "*ENTER-ALIEN-CALLBACK*" "ENTER-ALIEN-CALLBACK"
108                "EXTRACT-ALIEN-VALUE"
109                "HEAP-ALIEN-INFO" "HEAP-ALIEN-INFO-P" "HEAP-ALIEN-INFO-SAP-FORM"
110                "HEAP-ALIEN-INFO-TYPE" "INVOKE-ALIEN-TYPE-METHOD" "LOCAL-ALIEN"
111                "LOCAL-ALIEN-INFO" "LOCAL-ALIEN-INFO-FORCE-TO-MEMORY-P"
112                "LOCAL-ALIEN-INFO-P" "LOCAL-ALIEN-INFO-TYPE"
113                "MAKE-ALIEN-FUN-TYPE" "MAKE-ALIEN-POINTER-TYPE"
114                "MAKE-ALIEN-VALUE" "MAYBE-WITH-PINNED-OBJECTS"
115                "MAKE-LOCAL-ALIEN" "NATURALIZE"
116                "NOTE-LOCAL-ALIEN-TYPE"
117                "PARSE-ALIEN-TYPE" "UNPARSE-ALIEN-TYPE"))
119    #s(sb-cold:package-data
120       :name "SB!ASSEM"
121       :doc "private: the assembler, used by the compiler"
122       :use ("CL" "SB!EXT" "SB!INT")
123       :export ("ASSEMBLY-UNIT"
125                "*ASSEM-SCHEDULER-P*"
126                "*ASSEM-INSTRUCTIONS*"
127                "*ASSEM-MAX-LOCATIONS*"
129                "EMIT-ALIGNMENT" "EMIT-BYTE" "EMIT-SKIP" "EMIT-BACK-PATCH"
130                "EMIT-CHOOSER" "DEFINE-BITFIELD-EMITTER"
131                "DEFINE-INSTRUCTION" "DEFINE-INSTRUCTION-MACRO"
132                "DEF-ASSEMBLER-PARAMS" "EMIT-POSTIT"
134                "MAKE-SEGMENT" "SEGMENT-TYPE" "ASSEMBLE"
135                "INST" "LABEL" "LABEL-P" "GEN-LABEL"
136                "EMIT-LABEL" "LABEL-POSITION" "APPEND-SEGMENT" "FINALIZE-SEGMENT"
137                "ON-SEGMENT-CONTENTS-VECTORLY" "WRITE-SEGMENT-CONTENTS"
138                "READS" "WRITES" "SEGMENT"
139                "WITHOUT-SCHEDULING"
140                "VARIABLE-LENGTH"
141                "SEGMENT-COLLECT-DYNAMIC-STATISTICS"
143                ;; FIXME: These are in the SB-ASSEM package now, but
144                ;; (left over from CMU CL) are defined in files which
145                ;; are IN-PACKAGE SB-C. It would probably be cleaner
146                ;; to move at least most of them to files which are
147                ;; IN-PACKAGE SB-ASSEM.
148                "BRANCH" "DO-SSET-ELEMENTS" "FLUSHABLE" "MAKE-SSET" "SSET"
149                "SSET-ADJOIN" "SSET-DELETE" "SSET-ELEMENT" "SSET-EMPTY"))
151    #s(sb-cold:package-data
152       :name "SB!BIGNUM"
153       :doc "private: bignum implementation"
154       :use ("CL" "SB!KERNEL" "SB!INT" "SB!EXT")
155       :export ("%ADD-WITH-CARRY"
156                "%ALLOCATE-BIGNUM" "%ASHL" "%ASHR"
157                "%BIGNUM-LENGTH" "%BIGNUM-REF" "%BIGNUM-REF-WITH-OFFSET"
158                "%BIGNUM-SET" "%BIGNUM-SET-WITH-OFFSET"
159                "%BIGNUM-SET-LENGTH" "%DIGIT-0-OR-PLUSP"
160                "%DIGIT-LOGICAL-SHIFT-RIGHT"
161                "%FIXNUM-DIGIT-WITH-CORRECT-SIGN" "%FIXNUM-TO-DIGIT"
162                "%FLOOR" "%LOGAND" "%LOGIOR" "%LOGNOT" "%LOGXOR"
163                "%MULTIPLY" "%MULTIPLY-AND-ADD"
164                "%SUBTRACT-WITH-BORROW" "ADD-BIGNUMS"
165                "BIGNUM-ASHIFT-LEFT" "BIGNUM-ASHIFT-RIGHT"
166                "BIGNUM-COMPARE" "BIGNUM-DEPOSIT-BYTE"
167                "BIGNUM-ELEMENT-TYPE" "BIGNUM-GCD" "BIGNUM-INDEX"
168                "BIGNUM-INTEGER-LENGTH" "BIGNUM-LOAD-BYTE"
169                "BIGNUM-LOGBITP"
170                "BIGNUM-LOGCOUNT" "BIGNUM-LOGICAL-AND"
171                "BIGNUM-LOGICAL-IOR" "BIGNUM-LOGICAL-NOT"
172                "BIGNUM-LOGICAL-XOR" "BIGNUM-PLUS-P"
173                "BIGNUM-TO-FLOAT" "BIGNUM-TRUNCATE" "BIGNUM-TYPE"
174                "FLOAT-BIGNUM-RATIO" "MAKE-SMALL-BIGNUM"
175                "MULTIPLY-BIGNUM-AND-FIXNUM" "MULTIPLY-BIGNUMS"
176                "MULTIPLY-FIXNUMS" "NEGATE-BIGNUM"
177                "SUBTRACT-BIGNUM" "SXHASH-BIGNUM"))
179    #s(sb-cold:package-data
180       :name "SB!C"
181       :doc "private: implementation of the compiler"
182       ;; (It seems strange to have the compiler USE SB-ALIEN-INTERNALS,
183       ;; but the point seems to be to be able to express things like
184       ;; SB!C:DEFTRANSFORM SB-ALIEN-INTERNALS:MAKE-LOCAL-ALIEN without
185       ;; having to use a bunch of package prefixes, by putting them
186       ;; in the SB-C package. Maybe it'd be tidier to define an SB-ALIEN-COMP
187       ;; package for this? But it seems like a fairly low priority.)
188       ;; (Probably the same considerations also explain why BIGNUM is
189       ;;in the USE list.)
190       :use ("CL" "SB!ALIEN-INTERNALS" "SB!ALIEN" "SB!ASSEM" "SB!BIGNUM"
191                  #!+sb-dyncount "SB-DYNCOUNT" "SB!EXT" "SB!FASL" "SB!INT"
192                  "SB!KERNEL" "SB!SYS")
193       :reexport ("SLOT" "CODE-INSTRUCTIONS" "FLUSHABLE")
194       :export ("%ALIEN-FUNCALL"
195                "%CATCH-BREAKUP" "%CONTINUE-UNWIND"
196                "%LISTIFY-REST-ARGS" "%MORE-ARG" "%MORE-ARG-VALUES"
197                "%UNWIND-PROTECT-BREAKUP"
199                "*BACKEND-BYTE-ORDER*" "*BACKEND-DISASSEM-PARAMS*"
200                "*BACKEND-INSTRUCTION-FLAVORS*" "*BACKEND-INSTRUCTION-FORMATS*"
201                "*BACKEND-INTERNAL-ERRORS*" "*BACKEND-PAGE-BYTES*"
202                "*BACKEND-REGISTER-SAVE-PENALTY*"
203                "*BACKEND-SB-LIST*" "*BACKEND-SB-NAMES*"
204                "*BACKEND-SC-NAMES*" "*BACKEND-SC-NUMBERS*"
205                "*BACKEND-SPECIAL-ARG-TYPES*"
206                "*BACKEND-SUBFEATURES*"
207                "*BACKEND-T-PRIMITIVE-TYPE*"
209                "*CODE-SEGMENT*"
210                "*COUNT-VOP-USAGES*" "*ELSEWHERE*" "*FREE-FUNS*"
211                "*LEXENV*"
212                "*SETF-ASSUMED-FBOUNDP*"
213                "*SUPPRESS-VALUES-DECLARATION*"
215                #!+x86 "SET-FPU-WORD-FOR-C"
216                #!+x86 "SET-FPU-WORD-FOR-LISP"
217                "ALIGN-STACK-POINTER"
218                "ALLOC-ALIEN-STACK-SPACE" "ALLOC-NUMBER-STACK-SPACE"
219                "ALLOCATE-CODE-OBJECT" "ALLOCATE-FRAME"
220                "ALLOCATE-DYNAMIC-CODE-OBJECT" "ALLOCATE-FULL-CALL-FRAME"
221                "ALWAYS-TRANSLATABLE"
222                "ANY" "ARG-COUNT-ERROR" "ASSEMBLE-FILE"
223                "ATTRIBUTES" "ATTRIBUTES-INTERSECTION" "ATTRIBUTES-UNION"
224                "ATTRIBUTES=" "BIND"
225                "CALL" "CALL-LOCAL" "CALL-NAMED" "CALL-OUT" "CALL-VARIABLE"
226                "CALLEE-NFP-TN" "CALLEE-RETURN-PC-TN"
227                "CASE-BODY" "CATCH-BLOCK" "CHECK-CONS"
228                "CHECK-FIXNUM" "CHECK-FUN"
229                ;; FIXME: 32/64-bit issues
230                "CHECK-SIGNED-BYTE-32" "CHECK-SIGNED-BYTE-64"
231                "CHECK-SYMBOL"
232                ;; FIXME: 32/64-bit issues
233                "CHECK-UNSIGNED-BYTE-32" "CHECK-UNSIGNED-BYTE-64"
234                "CLOSURE-INIT" "CLOSURE-REF"
235                "CODE-CONSTANT-REF" "CODE-CONSTANT-SET"
236                "*CODE-COVERAGE-INFO*"
237                "COMPARE-AND-SWAP-SLOT"
238                "COMPILE-IN-LEXENV"
239                "COMPILE-LAMBDA-FOR-DEFUN"
240                "%COMPILER-DEFUN" "COMPILER-ERROR" "FATAL-COMPILER-ERROR"
241                "COMPILER-NOTIFY"
242                "COMPILER-STYLE-WARN" "COMPILER-WARN"
243                "COMPONENT" "COMPONENT-HEADER-LENGTH"
244                "COMPONENT-INFO" "COMPONENT-LIVE-TN" "COMPUTE-FUN"
245                "COMPUTE-OLD-NFP" "COPY-MORE-ARG"
246                "CURRENT-BINDING-POINTER" "CURRENT-NFP-TN"
247                "CURRENT-STACK-POINTER"
248                "DEALLOC-ALIEN-STACK-SPACE"
249                "DEALLOC-NUMBER-STACK-SPACE"
250                "DEBUG-CATCH-TAG"
251                "DEF-IR1-TRANSLATOR"
252                "!DEF-PRIMITIVE-TYPE" "!DEF-PRIMITIVE-TYPE-ALIAS"
253                "DEFINE-SOURCE-TRANSFORM" "!DEF-VM-SUPPORT-ROUTINE"
254                "DEFINE-ASSEMBLY-ROUTINE"
255                "DEFINITION-SOURCE-LOCATION"
256                "DEFINITION-SOURCE-LOCATION-NAMESTRING"
257                "DEFINITION-SOURCE-LOCATION-TOPLEVEL-FORM-NUMBER"
258                "DEFINITION-SOURCE-LOCATION-PLIST"
259                "DEFINE-MODULAR-FUN"
260                "DEFINE-MOVE-FUN"
261                "DEFINE-MOVE-VOP" "DEFINE-STORAGE-BASE"
262                "DEFINE-STORAGE-CLASS" "DEFINE-VOP"
263                "DEFKNOWN" "DEFOPTIMIZER"
264                "DEFTRANSFORM" "DERIVE-TYPE"
265                "ENTRY-NODE-INFO-NLX-TAG" "ENTRY-NODE-INFO-ST-TOP"
266                "PHYSENV-DEBUG-LIVE-TN" "PHYSENV-LIVE-TN"
267                "FAST-SYMBOL-VALUE"
268                "FAST-SYMBOL-GLOBAL-VALUE"
269                "FIND-SAVED-FP-AND-PC"
270                "FIXUP-NOTE-KIND"
271                "FIXUP-NOTE-FIXUP"
272                "FIXUP-NOTE-POSITION"
273                "FOLDABLE"
274                "FORCE-TN-TO-STACK"
275                "FUN-INFO-DERIVE-TYPE" "FUN-INFO-IR2-CONVERT"
276                "FUN-INFO-LTN-ANNOTATE" "FUN-INFO-OPTIMIZER"
277                "GET-VECTOR-SUBTYPE"
278                "GET-TOPLEVELISH-FILE-INFO"
279                "HALT"
280                "IF-EQ"
281                "IMMEDIATE-TN-P"
282                "INLINE-SYNTACTIC-CLOSURE-LAMBDA"
283                "INSERT-STEP-CONDITIONS"
284                "IR2-COMPONENT-CONSTANTS" "IR2-CONVERT"
285                "IR2-PHYSENV-NUMBER-STACK-P"
286                "KNOWN-CALL-LOCAL" "KNOWN-RETURN"
287                "LAMBDA-WITH-LEXENV" "LEXENV-FIND"
288                "LOCATION=" "LTN-ANNOTATE"
289                "MAKE-ALIAS-TN" "MAKE-CATCH-BLOCK"
290                "MAKE-CLOSURE" "MAKE-CONSTANT-TN"
291                "MAKE-FIXUP-NOTE"
292                "MAKE-LOAD-TIME-CONSTANT-TN" "MAKE-N-TNS" "MAKE-NORMAL-TN"
293                "MAKE-OTHER-IMMEDIATE-TYPE" "MAKE-RANDOM-TN"
294                "MAKE-REPRESENTATION-TN" "MAKE-RESTRICTED-TN" "MAKE-SC-OFFSET"
295                "MAKE-STACK-POINTER-TN" "MAKE-TN-REF" "MAKE-UNWIND-BLOCK"
296                "MAKE-WIRED-TN" "MAYBE-COMPILER-NOTIFY"
297                "MAYBE-INLINE-SYNTACTIC-CLOSURE"
298                "META-PRIMITIVE-TYPE-OR-LOSE"
299                "META-SB-OR-LOSE" "META-SC-NUMBER-OR-LOSE" "META-SC-OR-LOSE"
300                "MORE-ARG-CONTEXT" "MOVABLE" "MOVE" "MULTIPLE-CALL"
301                "MULTIPLE-CALL-LOCAL" "MULTIPLE-CALL-NAMED"
302                "MULTIPLE-CALL-VARIABLE"
303                "%%NIP-DX" "%%NIP-VALUES"
304                "NLX-ENTRY" "NLX-ENTRY-MULTIPLE"
305                "NODE-STACK-ALLOCATE-P"
306                "NON-DESCRIPTOR-STACK" "NOTE-ENVIRONMENT-START"
307                "NOTE-THIS-LOCATION" "OPTIMIZER" "PACK-TRACE-TABLE"
308                "PARSE-EVAL-WHEN-SITUATIONS"
309                "POLICY"
310                "%%POP-DX"
311                "PREDICATE" "PRIMITIVE-TYPE" "PRIMITIVE-TYPE-OF"
312                "PRIMITIVE-TYPE-OR-LOSE" "PRIMITIVE-TYPE-VOP"
313                "PRIMITIVE-TYPE-NAME" "PUSH-VALUES"
314                "READ-PACKED-BIT-VECTOR" "READ-VAR-INTEGER" "READ-VAR-STRING"
315                #!+inline-constants "REGISTER-INLINE-CONSTANT"
316                "RESET-STACK-POINTER" "RESTORE-DYNAMIC-STATE"
317                "RETURN-MULTIPLE" "SAVE-DYNAMIC-STATE" "SB"
318                "SB-ALLOCATED-SIZE" "SB-NAME" "SB-OR-LOSE" "SB-P" "SC" "SC-CASE"
319                "SC-IS" "SC-NAME" "SC-NUMBER" "SC-NUMBER-OR-LOSE" "SC-OFFSET"
320                "SC-OFFSET-OFFSET" "SC-OFFSET-SCN" "SC-OR-LOSE" "SC-P" "SC-SB"
321                "SET-UNWIND-PROTECT" "SET-VECTOR-SUBTYPE"
322                "SETUP-CLOSURE-ENVIRONMENT" "SETUP-ENVIRONMENT"
323                "SOURCE-LOCATION"
324                "SOURCE-TRANSFORM-LAMBDA"
325                "SPECIFY-SAVE-TN"
326                "STORE-COVERAGE-DATA"
327                "TAIL-CALL" "TAIL-CALL-NAMED"
328                "TAIL-CALL-VARIABLE" "TEMPLATE-OR-LOSE"
329                "TN" "TN-OFFSET" "TN-P" "TN-REF" "TN-REF-ACROSS" "TN-REF-LOAD-TN"
330                "TN-REF-NEXT" "TN-REF-NEXT-REF" "TN-REF-P" "TN-REF-TARGET"
331                "TN-REF-TN" "TN-REF-VOP" "TN-REF-WRITE-P" "TN-SC" "TN-VALUE"
332                "TRACE-TABLE-ENTRY" "TYPE-CHECK-ERROR" "UNBIND" "UNBIND-TO-HERE"
333                "UNSAFE" "UNSAFELY-FLUSHABLE" "UNWIND" "UWP-ENTRY"
334                "VERIFY-ARG-COUNT" "WRITE-PACKED-BIT-VECTOR"
335                "WRITE-VAR-INTEGER" "WRITE-VAR-STRING" "XEP-ALLOCATE-FRAME"
336                "LABEL-ID" "FIXUP" "FIXUP-FLAVOR" "FIXUP-NAME" "FIXUP-OFFSET"
337                "FIXUP-P" "MAKE-FIXUP"
338                "DEF-ALLOC"
339                "VAR-ALLOC"
340                "SAFE-FDEFN-FUN"
341                "NOTE-FIXUP"
342                "DEF-CASSER"
343                "DEF-REFFER"
344                "EMIT-CONSTANT"
345                "EMIT-NOP"
346                "DEF-SETTER"
347                "FIXED-ALLOC"
348                "MAKE-UNBOUND-MARKER"
349                "MAKE-FUNCALLABLE-INSTANCE-TRAMP"
350                "RETURN-SINGLE"
351                "NOTE-NEXT-INSTRUCTION"
352                "SET-SLOT"
353                "LOCATION-NUMBER"
354                "*COMPONENT-BEING-COMPILED*"
355                "BLOCK-NUMBER"
356                "BACKEND"
357                "IR2-BLOCK-BLOCK"
358                "VOP-BLOCK"
359                "*ASSEMBLY-OPTIMIZE*"
360                "LARGE-ALLOC"
361                "%SET-SIMPLE-FUN-SELF"
362                "VM-SUPPORT-ROUTINES-IMMEDIATE-CONSTANT-SC"
363                "VM-SUPPORT-ROUTINES-LOCATION-PRINT-NAME"
364                "VM-SUPPORT-ROUTINES-PRIMITIVE-TYPE-OF"
365                "VM-SUPPORT-ROUTINES-PRIMITIVE-TYPE"
366                "VM-SUPPORT-ROUTINES-MAKE-CALL-OUT-TNS"
367                "VM-SUPPORT-ROUTINES-STANDARD-ARG-LOCATION"
368                "VM-SUPPORT-ROUTINES-MAKE-RETURN-PC-PASSING-LOCATION"
369                "VM-SUPPORT-ROUTINES-MAKE-OLD-FP-PASSING-LOCATION"
370                "VM-SUPPORT-ROUTINES-MAKE-OLD-FP-SAVE-LOCATION"
371                "VM-SUPPORT-ROUTINES-MAKE-RETURN-PC-SAVE-LOCATION"
372                "VM-SUPPORT-ROUTINES-MAKE-ARG-COUNT-LOCATION"
373                "VM-SUPPORT-ROUTINES-MAKE-NFP-TN"
374                "VM-SUPPORT-ROUTINES-MAKE-STACK-POINTER-TN"
375                "VM-SUPPORT-ROUTINES-MAKE-NUMBER-STACK-POINTER-TN"
376                "VM-SUPPORT-ROUTINES-MAKE-UNKNOWN-VALUES-LOCATIONS"
377                "VM-SUPPORT-ROUTINES-SELECT-COMPONENT-FORMAT"
378                "VM-SUPPORT-ROUTINES-MAKE-NLX-SP-TN"
379                "VM-SUPPORT-ROUTINES-MAKE-DYNAMIC-STATE-TNS"
380                "VM-SUPPORT-ROUTINES-MAKE-NLX-ENTRY-ARG-START-LOCATION"
381                "VM-SUPPORT-ROUTINES-GENERATE-CALL-SEQUENCE"
382                "VM-SUPPORT-ROUTINES-GENERATE-RETURN-SEQUENCE"
383                "VM-SUPPORT-ROUTINES-EMIT-NOP"
384                "VM-SUPPORT-ROUTINES-LOCATION-NUMBER"
386                "WITH-SOURCE-LOCATION"
387                "*SOURCE-LOCATION-THUNKS*"
389                "BRANCH-IF"))
391    #s(sb-cold:package-data
392       :name "SB!DEBUG"
393       :doc
394       "sorta public: Eventually this should become the debugger interface, with
395 basic stuff like BACKTRACE and ARG. For now, the actual supported interface
396 is still mixed indiscriminately with low-level internal implementation stuff
397 like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*."
398       :use ("CL" "SB!EXT" "SB!INT" "SB!SYS" "SB!KERNEL")
399       :reexport ("*DEBUG-PRINT-VARIABLE-ALIST*")
400       :export ("*DEBUG-BEGINNER-HELP-P*"
401                "*DEBUG-CONDITION*"
402                "*DEBUG-READTABLE*" "*DEBUG-HELP-STRING*"
403                "*FLUSH-DEBUG-ERRORS*" "*IN-THE-DEBUGGER*"
404                "*SHOW-ENTRY-POINT-DETAILS*"
405                "*TRACE-INDENTATION-STEP*" "*MAX-TRACE-INDENTATION*"
406                "*TRACE-FRAME*" "*TRACED-FUN-LIST*"
407                "ARG" "BACKTRACE" "BACKTRACE-AS-LIST" "INTERNAL-DEBUG" "VAR"
408                "*PRINT-LOCATION-KIND*"
409                "*ONLY-BLOCK-START-LOCATIONS*" "*STACK-TOP-HINT*"
410                "*TRACE-VALUES*" "DO-DEBUG-COMMAND"
411                "*TRACE-ENCAPSULATE-DEFAULT*"
412                "FRAME-HAS-DEBUG-TAG-P"
413                "UNWIND-TO-FRAME-AND-CALL"))
415    #s(sb-cold:package-data
416       :name "SB!DI"
417       :doc "private: primitives used to write debuggers"
418       :use ("CL" "SB!EXT" "SB!INT" "SB!KERNEL" "SB!SYS" "SB!VM")
419       :import-from (("SB!C"
420                      "DEBUG-SOURCE-FORM" "DEBUG-SOURCE-NAMESTRING"
421                      "DEBUG-SOURCE-CREATED" "DEBUG-SOURCE-COMPILED"
422                      "DEBUG-SOURCE-START-POSITIONS" "MAKE-DEBUG-SOURCE"
423                      "DEBUG-SOURCE" "DEBUG-SOURCE-P"))
424       :reexport ("DEBUG-SOURCE-FORM"
425                  "DEBUG-SOURCE-NAMESTRING"
426                  "DEBUG-SOURCE-CREATED" "DEBUG-SOURCE-COMPILED"
427                  "DEBUG-SOURCE-START-POSITIONS" "DEBUG-SOURCE"
428                  "DEBUG-SOURCE-P")
429       :export ("ACTIVATE-BREAKPOINT"
430                "AMBIGUOUS-DEBUG-VARS" "AMBIGUOUS-VAR-NAME" "BREAKPOINT"
431                "BREAKPOINT-ACTIVE-P" "BREAKPOINT-HOOK-FUN" "BREAKPOINT-INFO"
432                "BREAKPOINT-KIND" "BREAKPOINT-P" "BREAKPOINT-WHAT" "CODE-LOCATION"
433                "CODE-LOCATION-DEBUG-BLOCK" "CODE-LOCATION-DEBUG-FUN"
434                "CODE-LOCATION-DEBUG-SOURCE" "CODE-LOCATION-FORM-NUMBER"
435                "CODE-LOCATION-P" "CODE-LOCATION-TOPLEVEL-FORM-OFFSET"
436                "CODE-LOCATION-UNKNOWN-P" "CODE-LOCATION=" "DEACTIVATE-BREAKPOINT"
437                "DEBUG-BLOCK" "DEBUG-BLOCK-ELSEWHERE-P" "DEBUG-BLOCK-P"
438                "DEBUG-BLOCK-SUCCESSORS" "DEBUG-CONDITION" "DEBUG-ERROR"
439                "DEBUG-FUN" "DEBUG-FUN-FUN" "DEBUG-FUN-KIND"
440                "DEBUG-FUN-LAMBDA-LIST" "DEBUG-FUN-NAME"
441                "DEBUG-FUN-P" "DEBUG-FUN-START-LOCATION"
442                "DEBUG-FUN-SYMBOL-VARS"
443                "DEBUG-SOURCE-ROOT-NUMBER" "DEBUG-VAR"
444                "DEBUG-VAR-ID" "DEBUG-VAR-INFO-AVAILABLE"
445                "DEBUG-VAR-SYMBOL-NAME" "DEBUG-VAR-P" "DEBUG-VAR-PACKAGE-NAME"
446                "DEBUG-VAR-SYMBOL" "DEBUG-VAR-VALID-VALUE"
447                "DEBUG-VAR-VALIDITY" "DEBUG-VAR-VALUE"
448                "DELETE-BREAKPOINT"
449                "DO-DEBUG-BLOCK-LOCATIONS" "DO-DEBUG-FUN-BLOCKS"
450                "DO-DEBUG-FUN-VARS"
451                "FORM-NUMBER-TRANSLATIONS"
452                "FRAME" "FRAME-CATCHES" "FRAME-CODE-LOCATION"
453                "FRAME-DEBUG-FUN" "FRAME-DOWN"
454                "FRAME-FUN-MISMATCH" "FRAME-NUMBER" "FRAME-P" "FRAME-UP"
455                "REPLACE-FRAME-CATCH-TAG"
456                "FUN-DEBUG-FUN" "FUN-END-COOKIE-VALID-P"
457                "INVALID-CONTROL-STACK-POINTER" "INVALID-VALUE"
458                "LAMBDA-LIST-UNAVAILABLE" "MAKE-BREAKPOINT" "NO-DEBUG-BLOCKS"
459                "NO-DEBUG-FUN-RETURNS" "NO-DEBUG-INFO" "PREPROCESS-FOR-EVAL"
460                "EVAL-IN-FRAME" "RETURN-FROM-FRAME" "SOURCE-PATH-CONTEXT"
461                "TOP-FRAME" "UNHANDLED-DEBUG-CONDITION" "UNKNOWN-CODE-LOCATION"
462                "UNKNOWN-CODE-LOCATION-P" "UNKNOWN-DEBUG-VAR"
463                "CODE-LOCATION-KIND" "FLUSH-FRAMES-ABOVE"))
465    #s(sb-cold:package-data
466       :name "SB!DISASSEM"
467       :doc "private: stuff related to the implementation of the disassembler"
468       :use ("CL" "SB!EXT" "SB!INT")
469       :export ("*DISASSEM-INST-ALIGNMENT-BYTES*"
470                "*DISASSEM-NOTE-COLUMN*" "*DISASSEM-OPCODE-COLUMN-WIDTH*"
471                "*DISASSEM-SCHEDULER-P*" "*DISASSEM-LOCATION-COLUMN-WIDTH*"
472                "ADD-COMMENT-HOOK" "ADD-HOOK" "ADD-NOTE-HOOK"
473                "ARG-VALUE" "CREATE-DSTATE" "DISASSEM-STATE"
474                "DISASSEMBLE-CODE-COMPONENT"
475                "DISASSEMBLE-FUN" "DISASSEMBLE-MEMORY"
476                "DISASSEMBLE-SEGMENT" "DISASSEMBLE-SEGMENTS"
477                "DSTATE-CODE" "DSTATE-CURPOS" "DSTATE-GET-INST-PROP"
478                "DSTATE-GET-PROP" "DSTATE-PUT-INST-PROP"
479                "DSTATE-NEXTPOS" "DSTATE-SEGMENT-LENGTH"
480                "DSTATE-SEGMENT-SAP" "DSTATE-SEGMENT-START"
481                "FIELD-TYPE" "FIND-INST" "GEN-FIELD-TYPE-DECL-FORM"
482                "GEN-INST-DECL-FORM" "GEN-INST-FORMAT-DECL-FORM"
483                "GET-CODE-SEGMENTS" "GET-FUN-SEGMENTS"
484                "GET-INST-SPACE" "HANDLE-BREAK-ARGS"
485                "INST" "INST-FORMAT" "LABEL-SEGMENTS"
486                "MAYBE-NOTE-ASSEMBLER-ROUTINE"
487                "MAYBE-NOTE-ASSOCIATED-STORAGE-REF"
488                "MAYBE-NOTE-NIL-INDEXED-OBJECT"
489                "MAYBE-NOTE-NIL-INDEXED-SYMBOL-SLOT-REF"
490                "MAYBE-NOTE-SINGLE-STORAGE-REF" "NOTE"
491                "NOTE-CODE-CONSTANT" "PARAMS" "PRIN1-QUOTED-SHORT"
492                "PRIN1-SHORT" "PRINT-BYTES"
493                "PRINT-CURRENT-ADDRESS" "PRINT-FIELD" "PRINT-INST"
494                "PRINT-INST-USING" "PRINT-NOTES-AND-NEWLINE"
495                "PRINT-WORDS" "SAP-REF-DCHUNK" "SEG-DEBUG-FUN"
496                "SEG-LENGTH" "SEG-START" "SEGMENT"
497                "SET-ADDRESS-PRINTING-RANGE" "SET-DISASSEM-PARAMS"
498                "SET-DSTATE-SEGMENT" "SIGN-EXTEND" "SPECIALIZE"
499                "GEN-PRINTER-DEF-FORMS-DEF-FORM" "MAKE-DSTATE"
500                "DEFINE-ARG-TYPE" "GEN-ARG-TYPE-DEF-FORM"
501                "READ-SIGNED-SUFFIX" "ADD-OFFS-HOOK"
502                "MAKE-MEMORY-SEGMENT" "GEN-PREAMBLE-FORM"
503                "MAKE-SEGMENT" "SEGMENT-OVERFLOW"
504                "SEG-VIRTUAL-LOCATION" "MAKE-DECODED-INST"
505                "DCHUNK" "*DEFAULT-DSTATE-HOOKS*"
506                "MAKE-CODE-SEGMENT" "MAKE-OFFS-HOOK"
507                "DSTATE-SEGMENT" "DSTATE-CUR-OFFS"
508                "PRINC16" "INSTRUCTION" "DEFINE-INSTRUCTION-FORMAT"
509                "DSTATE-NEXT-OFFS" "INSTALL-INST-FLAVORS"
510                "SEG-SAP-MAKER" "DISASSEMBLE-ASSEM-SEGMENT"
511                "GEN-CLEAR-INFO-FORM" "READ-SUFFIX"
512                "MAP-SEGMENT-INSTRUCTIONS" "GEN-FORMAT-DEF-FORM"
513                "SET-LOCATION-PRINTING-RANGE" "MAKE-VECTOR-SEGMENT"
514                "ADD-OFFS-NOTE-HOOK" "ADD-OFFS-COMMENT-HOOK"
515                "DSTATE-CUR-ADDR" "DSTATE-NEXT-ADDR"))
517    #!+sb-dyncount
518    #s(sb-cold:package-data
519       :name "SB!DYNCOUNT"
520       :doc "private: some somewhat-stale code for collecting runtime statistics"
521       :use ("CL" "SB!ALIEN-INTERNALS" "SB!ALIEN" "SB!BIGNUM"
522                  "SB!EXT" "SB!INT" "SB!KERNEL" "SB!ASSEM" "SB!SYS")
523       :export ("*COLLECT-DYNAMIC-STATISTICS*"
524                "COUNT-ME"
525                "DYNCOUNT-INFO-COUNTS" "DYNCOUNT-INFO-COSTS"
526                "IR2-COMPONENT-DYNCOUNT-INFO"
527                "DYNCOUNT-INFO" "DYNCOUNT-INFO-P"))
529    #s(sb-cold:package-data
530       :name "SB!FASL"
531       :doc "private: stuff related to FASL load/dump logic (and GENESIS)"
532       :use ("CL" "SB!ALIEN" "SB!ASSEM" "SB!BIGNUM" "SB!C"
533                  "SB!EXT" "SB!INT" "SB!KERNEL" "SB!SYS")
534       :export ("*ASSEMBLER-ROUTINES*"
535                "+BACKEND-FASL-FILE-IMPLEMENTATION+"
536                "BUILD-ID-CORE-ENTRY-TYPE-CODE"
537                "*FASL-FILE-TYPE*"
538                "CLOSE-FASL-OUTPUT"
539                "DUMP-ASSEMBLER-ROUTINES"
540                "DUMP-OBJECT"
541                "DYNAMIC-CORE-SPACE-ID"
542                "END-CORE-ENTRY-TYPE-CODE"
543                "FASL-CONSTANT-ALREADY-DUMPED-P"
544                "+FASL-FILE-VERSION+"
545                "FASL-DUMP-COLD-LOAD-FORM" "FASL-DUMP-COMPONENT"
546                "FASL-DUMP-COLD-FSET"
547                "FASL-DUMP-LOAD-TIME-VALUE" "FASL-DUMP-LOAD-TIME-VALUE-LAMBDA"
548                "FASL-DUMP-SOURCE-INFO" "FASL-DUMP-TOPLEVEL-LAMBDA-CALL"
549                "FASL-NOTE-HANDLE-FOR-CONSTANT"
550                "FASL-OUTPUT" "FASL-OUTPUT-P"
551                "FASL-OUTPUT-ENTRY-TABLE" "FASL-OUTPUT-STREAM"
552                "FASL-VALIDATE-STRUCTURE"
553                "INITIAL-FUN-CORE-ENTRY-TYPE-CODE"
554                "*!LOAD-TIME-VALUES*"
555                "LOAD-TYPE-PREDICATE"
556                #!+(and sb-thread sb-lutex) "LUTEX-TABLE-CORE-ENTRY-TYPE-CODE"
557                "NEW-DIRECTORY-CORE-ENTRY-TYPE-CODE"
558                "OPEN-FASL-OUTPUT" "PAGE-TABLE-CORE-ENTRY-TYPE-CODE"
559                "READ-ONLY-CORE-SPACE-ID"
560                "*!REVERSED-COLD-TOPLEVELS*"
561                "STATIC-CORE-SPACE-ID"
562                "VERSION-CORE-ENTRY-TYPE-CODE"))
564    ;; This package is a grab bag for things which used to be internal
565    ;; symbols in package COMMON-LISP. Lots of these symbols are accessed
566    ;; with explicit SB!IMPL:: prefixes in the code. It would be nice to
567    ;; reduce the use of this practice, so if symbols from here which are
568    ;; accessed that way are found to belong more appropriately in an
569    ;; existing package (e.g. SB!KERNEL or SB!SYS or SB!EXT or SB!FASL),
570    ;; I (WHN 19990223) encourage maintainers to move them there..
571    #s(sb-cold:package-data
572       :name "SB!IMPL"
573       :doc "private: a grab bag of implementation details"
574       :use ("CL" "SB!ALIEN" "SB!BIGNUM" "SB!DEBUG" "SB!EXT"
575                  "SB!FASL" "SB!GRAY" "SB!INT" "SB!KERNEL" "SB!SYS"))
577    #s(sb-cold:package-data
578       :name "SB!EXT"
579       :doc "public: miscellaneous supported extensions to the ANSI Lisp spec"
580       :use ("CL" "SB!ALIEN" "SB!INT" "SB!SYS" "SB!GRAY")
581       :export ( ;; Information about how the program was invoked is
582                ;; nonstandard but very useful.
583                "*POSIX-ARGV*" "*CORE-PATHNAME*" "*RUNTIME-PATHNAME*"
584                "POSIX-GETENV" "POSIX-ENVIRON"
586                ;; Atomic operations
587                "COMPARE-AND-SWAP"
588                "ATOMIC-INCF"
590                ;; Time related things
591                "CALL-WITH-TIMING"
592                "GET-TIME-OF-DAY"
594                ;; People have various good reasons to mess with the GC.
595                "*AFTER-GC-HOOKS*"
596                "BYTES-CONSED-BETWEEN-GCS"
597                "GC" "GET-BYTES-CONSED"
598                "*GC-RUN-TIME*"
599                "PURIFY"
600                ;; Gencgc only, but symbols exist for manual building
601                ;; convenience on all platforms.
602                "GENERATION-AVERAGE-AGE"
603                "GENERATION-BYTES-ALLOCATED"
604                "GENERATION-BYTES-CONSED-BETWEEN-GCS"
605                "GENERATION-MINIMUM-AGE-BEFORE-GC"
606                "GENERATION-NUMBER-OF-GCS"
607                "GENERATION-NUMBER-OF-GCS-BEFORE-PROMOTION"
609                ;; Stack allocation control
610                "*STACK-ALLOCATE-DYNAMIC-EXTENT*"
612                ;; Customizing printing of compiler and debugger messages
613                "*COMPILER-PRINT-VARIABLE-ALIST*"
614                "*DEBUG-PRINT-VARIABLE-ALIST*"
616                ;; Hooks into init & save sequences
617                "*INIT-HOOKS*" "*SAVE-HOOKS*" "*EXIT-HOOKS*"
619                ;; There is no one right way to report progress on
620                ;; hairy compiles.
621                "*COMPILE-PROGRESS*"
623                ;; It can be handy to be able to evaluate expressions involving
624                ;; the thing under examination by CL:INSPECT.
625                "*INSPECTED*"
627                ;; There is no one right way to do efficiency notes.
628                "*EFFICIENCY-NOTE-COST-THRESHOLD*" "*EFFICIENCY-NOTE-LIMIT*"
630                ;; There's no one right way to report errors.
631                "*ENCLOSING-SOURCE-CUTOFF*"
632                "*UNDEFINED-WARNING-LIMIT*"
634                ;; and for dedicated users who really want to customize
635                ;; error reporting, we have
636                "DEFINE-SOURCE-CONTEXT"
638                ;; and given how many users dislike strict treatment of
639                ;; DEFCONSTANT, let's give them enough rope to escape by
640                "DEFCONSTANT-UNEQL" "DEFCONSTANT-UNEQL-NAME"
641                "DEFCONSTANT-UNEQL-NEW-VALUE" "DEFCONSTANT-UNEQL-OLD-VALUE"
643                ;; global lexicals, access to global symbol values
644                "DEFGLOBAL"
645                "SYMBOL-GLOBAL-VALUE"
647                ;; package-locking stuff
648                #!+sb-package-locks "PACKAGE-LOCKED-P"
649                #!+sb-package-locks "LOCK-PACKAGE"
650                #!+sb-package-locks "UNLOCK-PACKAGE"
651                #!+sb-package-locks "PACKAGE-IMPLEMENTED-BY-LIST"
652                #!+sb-package-locks "PACKAGE-IMPLEMENTS-LIST"
653                #!+sb-package-locks "ADD-IMPLEMENTATION-PACKAGE"
654                #!+sb-package-locks "REMOVE-IMPLEMENTATION-PACKAGE"
655                #!+sb-package-locks "WITH-UNLOCKED-PACKAGES"
656                #!+sb-package-locks "PACKAGE-LOCK-VIOLATION"
657                #!+sb-package-locks "PACKAGE-LOCKED-ERROR"
658                #!+sb-package-locks "SYMBOL-PACKAGE-LOCKED-ERROR"
659                #!+sb-package-locks "PACKAGE-LOCKED-ERROR-SYMBOL"
660                "WITHOUT-PACKAGE-LOCKS"
661                "DISABLE-PACKAGE-LOCKS"
662                "ENABLE-PACKAGE-LOCKS"
664                ;; Custom conditions & condition accessors for users to handle.
665                "CODE-DELETION-NOTE"
666                "COMPILER-NOTE"
667                "IMPLICIT-GENERIC-FUNCTION-NAME"
668                "IMPLICIT-GENERIC-FUNCTION-WARNING"
669                "INVALID-FASL"
671                "NAME-CONFLICT" "NAME-CONFLICT-FUNCTION"
672                "NAME-CONFLICT-DATUM" "NAME-CONFLICT-SYMBOLS"
673                "RESOLVE-CONFLICT"
675                ;; and a mechanism for controlling same at compile time
676                "MUFFLE-CONDITIONS" "UNMUFFLE-CONDITIONS"
678                ;; and one for controlling same at runtime
679                "*MUFFLED-WARNINGS*"
681                ;; extended declarations..
682                "ALWAYS-BOUND" "FREEZE-TYPE" "GLOBAL" "INHIBIT-WARNINGS"
683                "MAYBE-INLINE"
685                ;; ..and variables to control compiler policy
686                "*INLINE-EXPANSION-LIMIT*"
687                "*DERIVE-FUNCTION-TYPES*"
689                ;; ..and inspector of compiler policy
690                "DESCRIBE-COMPILER-POLICY"
691                "RESTRICT-COMPILER-POLICY"
693                ;; a special form for breaking out of our "declarations
694                ;; are assertions" default
695                "TRULY-THE"
697                ;; Misc. array and vector tools.
698                "ARRAY-STORAGE-VECTOR"
700                ;; This is something which must exist inside any Common
701                ;; Lisp implementation, and which someone writing a
702                ;; customized toplevel might well want. It seems perverse
703                ;; to hide it from them..
704                "INTERACTIVE-EVAL"
706                ;; weak pointers and finalization
707                "CANCEL-FINALIZATION"
708                "FINALIZE"
709                "MAKE-WEAK-POINTER"
710                "WEAK-POINTER"
711                "WEAK-POINTER-P"
712                "WEAK-POINTER-VALUE"
714                ;; Hash table extensions
715                "DEFINE-HASH-TABLE-TEST"
716                "HASH-TABLE-SYNCHRONIZED-P"
717                "HASH-TABLE-WEAKNESS"
718                "WITH-LOCKED-HASH-TABLE"
720                ;; If the user knows we're doing IEEE, he might reasonably
721                ;; want to do this stuff.
722                "FLOAT-DENORMALIZED-P"
723                "FLOAT-NAN-P" "FLOAT-TRAPPING-NAN-P"
724                "FLOAT-INFINITY-P"
725                "SHORT-FLOAT-NEGATIVE-INFINITY"
726                "SHORT-FLOAT-POSITIVE-INFINITY"
727                "SINGLE-FLOAT-NEGATIVE-INFINITY"
728                "SINGLE-FLOAT-POSITIVE-INFINITY"
729                "DOUBLE-FLOAT-NEGATIVE-INFINITY"
730                "DOUBLE-FLOAT-POSITIVE-INFINITY"
731                "LONG-FLOAT-NEGATIVE-INFINITY"
732                "LONG-FLOAT-POSITIVE-INFINITY"
734                ;; hacks to work around system limitations
735                "*INTEXP-MAXIMUM-EXPONENT*" ; since we crash hard when
736                                         ; memory is exhausted
738                ;; saving Lisp images
739                "SAVE-LISP-AND-DIE"
741                ;; provided for completeness to make it more convenient
742                ;; to use command-line --disable-debugger functionality
743                ;; in oddball situations (like building core files using
744                ;; scripts which run unattended, when the core files are
745                ;; intended for interactive use)
746                "DISABLE-DEBUGGER"
747                "ENABLE-DEBUGGER"
749                ;; the mechanism by which {en,dis}able-debugger works is
750                ;; also exported for people writing alternative toplevels
751                ;; (Emacs, CLIM interfaces, etc)
752                "*INVOKE-DEBUGGER-HOOK*"
754                ;; miscellaneous useful supported extensions
755                "QUIT"
756                "*ED-FUNCTIONS*"
757                "*MODULE-PROVIDER-FUNCTIONS*"
758                "WITH-TIMEOUT" "TIMEOUT"
760                ;; stepping interface
761                "STEP-CONDITION" "STEP-FORM-CONDITION" "STEP-FINISHED-CONDITION"
762                "STEP-VALUES-CONDITION" "STEP-VARIABLE-CONDITION"
763                "STEP-CONDITION-FORM" "STEP-CONDITION-RESULT"
764                "STEP-CONTINUE" "STEP-NEXT" "STEP-INTO"
765                "STEP-CONDITION-ARGS" "*STEPPER-HOOK*" "STEP-OUT"
767                ;; RUN-PROGRAM is not only useful for users, but also
768                ;; useful to implement parts of SBCL itself, so we're
769                ;; going to have to implement it anyway, so we might
770                ;; as well support it. And then once we're committed
771                ;; to implementing RUN-PROGRAM, it's nice to have it
772                ;; return a PROCESS object with operations defined on
773                ;; that object.
774                "RUN-PROGRAM"
775                "PROCESS-ALIVE-P" "PROCESS-CLOSE"
776                "PROCESS-CORE-DUMPED" "PROCESS-ERROR" "PROCESS-EXIT-CODE"
777                "PROCESS-INPUT" "PROCESS-KILL" "PROCESS-OUTPUT" "PROCESS-P"
778                "PROCESS-PID" "PROCESS-PLIST" "PROCESS-PTY" "PROCESS-STATUS"
779                "PROCESS-STATUS-HOOK" "PROCESS-WAIT"
781                ;; pathnames
782                "NATIVE-PATHNAME"
783                "PARSE-NATIVE-NAMESTRING"
784                "NATIVE-NAMESTRING"
786                ;; external-format support
787                "OCTETS-TO-STRING" "STRING-TO-OCTETS"
789                ;; Whether to use the interpreter or the compiler for EVAL
790                "*EVALUATOR-MODE*"
792                ;; timer
793                "TIMER" "MAKE-TIMER" "TIMER-NAME" "TIMER-SCHEDULED-P"
794                "SCHEDULE-TIMER" "UNSCHEDULE-TIMER" "LIST-ALL-TIMERS"))
796    #s(sb-cold:package-data
797       :name "SB!FORMAT"
798       :doc "private: implementation of FORMAT and friends"
799       :use ("CL" "SB!EXT" "SB!INT" "SB!KERNEL")
800       :export ("%COMPILER-WALK-FORMAT-STRING" "FORMAT-ERROR"))
802    #s(sb-cold:package-data
803       :name "SB!GRAY"
804       :doc
805       "public: an implementation of the stream-definition-by-user
806 Lisp extension proposal by David N. Gray"
807       :use ("CL" "SB!EXT" "SB!INT" "SB!KERNEL")
808       :export ("FUNDAMENTAL-BINARY-STREAM"
809                "FUNDAMENTAL-BINARY-INPUT-STREAM"
810                "FUNDAMENTAL-BINARY-OUTPUT-STREAM" "FUNDAMENTAL-CHARACTER-STREAM"
811                "FUNDAMENTAL-CHARACTER-INPUT-STREAM"
812                "FUNDAMENTAL-CHARACTER-OUTPUT-STREAM"
813                "FUNDAMENTAL-INPUT-STREAM" "FUNDAMENTAL-OUTPUT-STREAM"
814                "FUNDAMENTAL-STREAM"
815                "STREAM-ADVANCE-TO-COLUMN" "STREAM-CLEAR-INPUT"
816                "STREAM-CLEAR-OUTPUT" "STREAM-FILE-POSITION" "STREAM-FINISH-OUTPUT" "STREAM-FORCE-OUTPUT"
817                "STREAM-FRESH-LINE" "STREAM-LINE-COLUMN" "STREAM-LINE-LENGTH"
818                "STREAM-LISTEN" "STREAM-PEEK-CHAR" "STREAM-READ-BYTE"
819                "STREAM-READ-CHAR" "STREAM-READ-CHAR-NO-HANG" "STREAM-READ-LINE"
820                "STREAM-READ-SEQUENCE" "STREAM-START-LINE-P" "STREAM-TERPRI"
821                "STREAM-UNREAD-CHAR"
822                "STREAM-WRITE-BYTE" "STREAM-WRITE-CHAR" "STREAM-WRITE-SEQUENCE"
823                "STREAM-WRITE-STRING"))
825    #s(sb-cold:package-data
826       :name "SB!INT"
827       :doc
828       "private: miscellaneous unsupported extensions to the ANSI spec. Much of
829 the stuff in here originated in CMU CL's EXTENSIONS package and is retained,
830 possibly temporariliy, because it might be used internally."
831       :use ("CL" "SB!ALIEN" "SB!GRAY" "SB!FASL" "SB!SYS")
832       :export (;; lambda list keyword extensions
833                "&MORE"
835                ;; utilities for floating point zero handling
836                "FP-ZERO-P"
837                "NEG-FP-ZERO"
839                ;; Stack allocation without any questions asked
840                "TRULY-DYNAMIC-EXTENT"
842                ;; generic set implementation
843                "ADD-TO-XSET"
844                "ALLOC-XSET"
845                "MAP-XSET"
846                "XSET"
847                "XSET-COUNT"
848                "XSET-EMPTY-P"
849                "XSET-INTERSECTION"
850                "XSET-MEMBER-P"
851                "XSET-MEMBERS"
852                "XSET-SUBSET-P"
853                "XSET-UNION"
855                ;; communication between the runtime and Lisp
856                "*CORE-STRING*"
858                ;; INFO stuff doesn't belong in a user-visible package, we
859                ;; should be able to change it without apology.
860                "*INFO-ENVIRONMENT*"
861                "CLEAR-INFO"
862                "COMPACT-INFO-ENVIRONMENT"
863                "DEFINE-INFO-CLASS" "DEFINE-INFO-TYPE"
864                "DO-INFO"
865                "INFO"
866                "MAKE-INFO-ENVIRONMENT"
868                ;; GENSYM variant that appends the current non-nil block
869                ;; name to the string if possible
870                "BLOCK-GENSYM"
872                ;; Calling a list of hook functions, plus error handling.
873                "CALL-HOOKS"
875                ;; Constant form evaluation
876                "CONSTANT-FORM-VALUE"
877                "CONSTANT-TYPEP"
879                ;; stepping control
880                "*STEPPING*" "*STEP*"
882                ;; packages grabbed once and for all
883                "*KEYWORD-PACKAGE*" "*CL-PACKAGE*"
885                ;; hash mixing operations
886                "MIX" "MIXF"
888                ;; I'm not convinced that FDEFINITIONs are the ideal
889                ;; solution, so exposing ways to peek into the system
890                ;; seems undesirable, since it makes it harder to get
891                ;; rid of FDEFINITIONs entirely later.
892                "*SETF-FDEFINITION-HOOK*"
894                ;; error-reporting facilities
895                "CLOSED-STREAM-ERROR"
896                "COMPILED-PROGRAM-ERROR"
897                "ENCAPSULATED-CONDITION"
898                "INTERPRETED-PROGRAM-ERROR"
899                "INVALID-ARRAY-ERROR"
900                "INVALID-ARRAY-INDEX-ERROR"
901                "INVALID-ARRAY-P"
902                "SIMPLE-CONTROL-ERROR" "SIMPLE-FILE-ERROR"
903                "SIMPLE-PARSE-ERROR" "SIMPLE-PROGRAM-ERROR"
904                "SIMPLE-READER-ERROR"
905                "SIMPLE-READER-PACKAGE-ERROR"
906                "SIMPLE-REFERENCE-ERROR"
907                "SIMPLE-REFERENCE-WARNING"
908                "SIMPLE-STREAM-ERROR"
909                "SIMPLE-STORAGE-CONDITION"
910                "SIMPLE-STYLE-WARNING"
911                "TRY-RESTART"
913                ;; error-signalling facilities
914                "STANDARD-READTABLE-MODIFIED-ERROR"
915                "STANDARD-PPRINT-DISPATCH-TABLE-MODIFIED-ERROR"
916                "ARRAY-BOUNDING-INDICES-BAD-ERROR"
917                "SEQUENCE-BOUNDING-INDICES-BAD-ERROR"
918                "SPECIAL-FORM-FUNCTION"
919                "STYLE-WARN" "SIMPLE-COMPILER-NOTE"
921                ;; FIXME: potential SB!EXT exports
922                "CHARACTER-CODING-ERROR"
923                "CHARACTER-DECODING-ERROR" "CHARACTER-DECODING-ERROR-OCTETS"
924                "CHARACTER-ENCODING-ERROR" "CHARACTER-ENCODING-ERROR-CODE"
925                "STREAM-DECODING-ERROR" "STREAM-ENCODING-ERROR"
926                "C-STRING-ENCODING-ERROR" "C-STRING-ENCODING-ERROR-EXTERNAL-FORMAT"
927                "C-STRING-DECODING-ERROR" "C-STRING-DECODING-ERROR-EXTERNAL-FORMAT"
928                "ATTEMPT-RESYNC" "FORCE-END-OF-FILE"
930                ;; bootstrapping magic, to make things happen both in
931                ;; the cross-compilation host compiler's environment and
932                ;; in the cross-compiler's environment
933                "DEF!CONSTANT" "DEF!MACRO" "DEF!METHOD" "DEF!STRUCT" "DEF!TYPE"
935                ;; stuff for hinting to the compiler
936                "NAMED-LAMBDA"
938                ;; other variations on DEFFOO stuff useful for bootstrapping
939                ;; and cross-compiling
940                "DEFMACRO-MUNDANELY"
941                "DEFCONSTANT-EQX"
942                "DEFINE-UNSUPPORTED-FUN"
944                ;; messing with PATHNAMEs
945                "MAKE-TRIVIAL-DEFAULT-PATHNAME"
946                "PHYSICALIZE-PATHNAME"
947                "SANE-DEFAULT-PATHNAME-DEFAULTS"
948                "SBCL-HOMEDIR-PATHNAME"
949                "SIMPLIFY-NAMESTRING"
951                "*N-BYTES-FREED-OR-PURIFIED*"
953                ;; miscellaneous non-standard but handy user-level functions..
954                "ASSQ" "DELQ" "MEMQ" "POSQ" "NEQ"
955                "ADJUST-LIST"
956                "%FIND-PACKAGE-OR-LOSE" "FIND-UNDELETED-PACKAGE-OR-LOSE"
957                "SANE-PACKAGE"
958                "MAYBE-CYCLIC-P"
959                "COMPOUND-OBJECT-P"
960                "SWAPPED-ARGS-FUN"
961                "AND/TYPE" "NOT/TYPE"
962                "ANY/TYPE" "EVERY/TYPE"
963                "EQUAL-BUT-NO-CAR-RECURSION"
964                "TYPE-BOUND-NUMBER"
965                "CONSTANTLY-T" "CONSTANTLY-NIL" "CONSTANTLY-0"
966                "PSXHASH"
967                "%BREAK"
968                "NTH-BUT-WITH-SANE-ARG-ORDER"
969                "DEPRECATION-WARNING"
970                "BIT-VECTOR-="
971                "READ-EVALUATED-FORM"
972                "MAKE-UNPRINTABLE-OBJECT"
973                "POWER-OF-TWO-CEILING"
975                ;; ..and macros..
976                "COLLECT"
977                "DO-ANONYMOUS" "DOHASH" "DOVECTOR"
978                "NAMED-LET"
979                "ONCE-ONLY"
980                "DEFENUM"
981                "DEFPRINTER"
982                "AVER" "ENFORCE-TYPE"
983                "DX-FLET" "DX-LET"
984                "AWHEN" "ACOND" "IT"
985                "BINDING*"
986                "!DEF-BOOLEAN-ATTRIBUTE"
987                "WITH-REBOUND-IO-SYNTAX"
988                "WITH-SANE-IO-SYNTAX"
990                ;; ..and CONDITIONs..
991                "BUG"
992                "UNSUPPORTED-OPERATOR"
994                "BOOTSTRAP-PACKAGE-NAME"
995                "BOOTSTRAP-PACKAGE-NOT-FOUND"
996                "DEBOOTSTRAP-PACKAGE"
998                "REFERENCE-CONDITION" "REFERENCE-CONDITION-REFERENCES"
999                "*PRINT-CONDITION-REFERENCES*"
1001                "DUPLICATE-DEFINITION" "DUPLICATE-DEFINITION-NAME"
1002                "PACKAGE-AT-VARIANCE" "ARRAY-INITIAL-ELEMENT-MISMATCH"
1003                "TYPE-WARNING" "LOCAL-ARGUMENT-MISMATCH"
1004                "FORMAT-ARGS-MISMATCH" "FORMAT-TOO-FEW-ARGS-WARNING"
1005                "FORMAT-TOO-MANY-ARGS-WARNING" "EXTENSION-FAILURE"
1006                "STRUCTURE-INITARG-NOT-KEYWORD" "CONSTANT-MODIFIED"
1008                ;; ..and DEFTYPEs..
1009                "MAX-HASH" "HASH"
1010                "INDEX" "LOAD/STORE-INDEX"
1011                "SIGNED-BYTE-WITH-A-BITE-OUT"
1012                "UNSIGNED-BYTE-WITH-A-BITE-OUT"
1013                "SFUNCTION" "UNSIGNED-BYTE*"
1014                "CONSTANT-DISPLACEMENT"
1015                ;; ..and type predicates
1016                "INSTANCEP"
1017                "DOUBLE-FLOAT-P"
1018                "LOGICAL-PATHNAME-P"
1019                "LONG-FLOAT-P"
1020                "SHORT-FLOAT-P"
1021                "SINGLE-FLOAT-P"
1022                "FIXNUMP"
1023                "BIGNUMP"
1024                "RATIOP"
1026                ;; encapsulation
1027                "ARG-LIST"
1028                "BASIC-DEFINITION"
1029                "ENCAPSULATE" "ENCAPSULATED-P"
1030                "UNENCAPSULATE"
1032                ;; various CHAR-CODEs
1033                "BACKSPACE-CHAR-CODE" "BELL-CHAR-CODE" "ESCAPE-CHAR-CODE"
1034                "FORM-FEED-CHAR-CODE" "LINE-FEED-CHAR-CODE"
1035                "RETURN-CHAR-CODE" "RUBOUT-CHAR-CODE" "TAB-CHAR-CODE"
1037                ;; symbol-hacking idioms
1038                "KEYWORDICATE" "SYMBOLICATE"
1040                ;; certainly doesn't belong in public extensions
1041                ;; FIXME: maybe belongs in %KERNEL with other typesystem stuff?
1042                "CONSTANT-ARG"
1044                ;; various internal defaults
1045                "DEFAULT-INIT-CHAR" "*DEFAULT-INIT-CHAR-FORM*"
1046                "*LOAD-SOURCE-DEFAULT-TYPE*" "BASE-CHAR-CODE-LIMIT"
1048                ;; hash caches
1049                "DEFINE-HASH-CACHE"
1050                "DEFUN-CACHED"
1051                "DEFINE-CACHED-SYNONYM"
1053                ;; time
1054                "FORMAT-DECODED-TIME"
1055                "FORMAT-UNIVERSAL-TIME"
1057                ;; indenting
1058                "MAKE-INDENTING-STREAM"
1060                ;; stream commands, used by the debugger
1061                "GET-STREAM-COMMAND" "MAKE-STREAM-COMMAND" "STREAM-COMMAND"
1062                "STREAM-COMMAND-ARGS" "STREAM-COMMAND-NAME" "STREAM-COMMAND-P"
1064                ;; used for FORMAT tilde paren
1065                "MAKE-CASE-FROB-STREAM"
1067                ;; helpers for C library calls
1068                "STRERROR" "SIMPLE-PERROR"
1070                ;; debuggers' little helpers
1071                #!+sb-show "*/SHOW*"
1072                #!+sb-show "HEXSTR"
1073                "/SHOW"  "/NOSHOW"
1074                "/XHOW"  "/NOXHOW"
1075                "/SHOW0" "/NOSHOW0"
1076                "/HEXSTR" "/NOHEXSTR"
1077                "/PRIMITIVE-PRINT" "/NO-PRIMITIVE-PRINT"
1079                ;; cross-compilation bootstrap hacks which turn into
1080                ;; placeholders in a target system
1081                "UNCROSS"
1083                ;; might as well be shared among the various files which
1084                ;; need it:
1085                "*EOF-OBJECT*"
1087                ;; allocation to static space
1088                "MAKE-STATIC-VECTOR"
1090                ;; alien interface utilities
1091                "C-STRINGS->STRING-LIST"
1093                ;; misc. utilities used internally
1094                "DEFINE-FUNCTION-NAME-SYNTAX" "VALID-FUNCTION-NAME-P" ; should be SB!EXT?
1095                "LEGAL-FUN-NAME-P" "LEGAL-FUN-NAME-OR-TYPE-ERROR"
1096                "FUN-NAME-BLOCK-NAME"
1097                "FUN-NAME-INLINE-EXPANSION"
1098                "LISTEN-SKIP-WHITESPACE"
1099                "PACKAGE-INTERNAL-SYMBOL-COUNT" "PACKAGE-EXTERNAL-SYMBOL-COUNT"
1100                "PARSE-BODY" "PARSE-LAMBDA-LIST" "PARSE-LAMBDA-LIST-LIKE-THING"
1101                "PROPER-LIST-OF-LENGTH-P"
1102                "LIST-OF-LENGTH-AT-LEAST-P"
1103                "LIST-WITH-LENGTH-P"
1104                "SINGLETON-P"
1105                "READ-SEQUENCE-OR-DIE"
1106                "RENAME-KEY-ARGS"
1107                "MISSING-ARG"
1108                "FEATUREP"
1109                "FLUSH-STANDARD-OUTPUT-STREAMS"
1110                "WITH-UNIQUE-NAMES" "MAKE-GENSYM-LIST"
1111                "ABOUT-TO-MODIFY-SYMBOL-VALUE"
1112                "SELF-EVALUATING-P"
1113                "PRINT-PRETTY-ON-STREAM-P"
1114                "ARRAY-READABLY-PRINTABLE-P"
1115                "LOOKS-LIKE-NAME-OF-SPECIAL-VAR-P"
1116                "POSITIVE-PRIMEP"
1117                "EVAL-IN-LEXENV"
1118                "SIMPLE-EVAL-IN-LEXENV"
1119                "DEBUG-NAMIFY"
1120                "FORCE" "DELAY" "PROMISE-READY-P"
1121                "FIND-RESTART-OR-CONTROL-ERROR"
1123                ;; These could be moved back into SB!EXT if someone has
1124                ;; compelling reasons, but hopefully we can get by
1125                ;; without supporting them, at least not as publicly
1126                ;; accessible things with fixed interfaces.
1127                "GET-FLOATING-POINT-MODES"
1128                "SET-FLOATING-POINT-MODES"
1129                "WITH-FLOAT-TRAPS-MASKED"
1131                ;; compatibility hacks for old-style CMU CL data formats
1132                "UNIX-ENVIRONMENT-CMUCL-FROM-SBCL"
1133                "UNIX-ENVIRONMENT-SBCL-FROM-CMUCL"
1135                ;; a sort of quasi-unbound tag for use in hash tables
1136                "+EMPTY-HT-SLOT+"
1138                ;; low-level i/o stuff
1139                "DONE-WITH-FAST-READ-BYTE"
1140                "DONE-WITH-FAST-READ-CHAR"
1141                "FAST-READ-BYTE"
1142                "FAST-READ-BYTE-REFILL"
1143                "FAST-READ-CHAR"
1144                "FAST-READ-CHAR-REFILL"
1145                "FAST-READ-S-INTEGER"
1146                "FAST-READ-U-INTEGER"
1147                "FAST-READ-VAR-U-INTEGER"
1148                "FILE-NAME"
1149                "INTERN*"
1150                "PREPARE-FOR-FAST-READ-BYTE"
1151                "PREPARE-FOR-FAST-READ-CHAR"
1153                ;; reflection of our backquote implementation that the
1154                ;; pprinter needs
1155                "*BACKQ-TOKENS*"
1157                ;; hackery to help set up for cold init
1158                "!BEGIN-COLLECTING-COLD-INIT-FORMS"
1159                "!COLD-INIT-FORMS"
1160                "COLD-FSET"
1161                "!DEFUN-FROM-COLLECTED-COLD-INIT-FORMS"
1163                ;; catch tags
1164                "TOPLEVEL-CATCHER"
1166                ;; hooks for contrib/ stuff we're insufficiently sure
1167                ;; about to add to SB!EXT
1168                "*REPL-PROMPT-FUN*"
1169                "*REPL-READ-FORM-FUN*"))
1171    ;; FIXME: This package is awfully huge. It'd probably be good to
1172    ;; split it. There's at least one natural way to split it: the
1173    ;; implementation of the Lisp type system (e.g. TYPE-INTERSECTION and
1174    ;; SPECIFIER-TYPE) could move to a separate package SB!TYPE. (There's
1175    ;; lots of stuff which currently uses the SB!KERNEL package which
1176    ;; doesn't actually use the type system stuff.) And maybe other
1177    ;; possible splits too:
1178    ;;   * Pull GC stuff (*GC-INHIBIT*, *GC-PENDING*, etc.)
1179    ;;     out into SB-GC.
1180    ;;   * Pull special case implementations of sequence functions (e.g.
1181    ;;     %MAP-TO-LIST-ARITY-1 and %FIND-POSITION-IF-NOT) and
1182    ;;     other sequence function implementation grot into SB-SEQ.
1183    ;;   * Pull all the math stuff (%ACOS, %COSH, WORD-LOGICAL-AND...)
1184    ;;     into SB-MATH.
1185    ;;   * Pull all the array stuff (%ARRAY-DATA-VECTOR, %RAW-REF-LONG,
1186    ;;     WITH-ARRAY-DATA, ALLOCATE-VECTOR, HAIRY-DATA-VECTOR-REF...)
1187    ;;     into SB-ARRAY.
1188    ;;   * Pull all the streams stuff out into SB-STREAM.
1189    ;;   * Pull all the OBJECT-NOT-FOO symbols out. Maybe we could even
1190    ;;     figure out a way to stop exporting them? Failing that,
1191    ;;     they could be in SB-INTERR.
1192    #s(sb-cold:package-data
1193       :name "SB!KERNEL"
1194       :doc
1195       "private: Theoretically this 'hides state and types used for package
1196 integration' (said CMU CL architecture.tex) and that probably was and
1197 is a good idea, but see SB-SYS re. blurring of boundaries."
1198       :use ("CL" "SB!ALIEN" "SB!ALIEN-INTERNALS" "SB!BIGNUM"
1199                  "SB!EXT" "SB!FASL" "SB!INT" "SB!SYS" "SB!GRAY")
1200       :reexport ("DEF!STRUCT" "DEF!MACRO")
1201       :export ("%ACOS"
1202                "%ACOSH"
1203                "%ADJOIN"
1204                "%ADJOIN-EQ"
1205                "%ADJOIN-KEY"
1206                "%ADJOIN-KEY-EQ"
1207                "%ADJOIN-KEY-TEST"
1208                "%ADJOIN-KEY-TEST-NOT"
1209                "%ADJOIN-TEST"
1210                "%ADJOIN-TEST-NOT"
1211                "%ARRAY-AVAILABLE-ELEMENTS" "%ARRAY-DATA-VECTOR"
1212                "%ARRAY-DIMENSION" "%ARRAY-DISPLACED-P"
1213                "%ARRAY-DISPLACED-FROM"
1214                "%ARRAY-DISPLACEMENT" "%ARRAY-FILL-POINTER"
1215                "%ARRAY-FILL-POINTER-P" "%ARRAY-RANK"
1216                "%ASSOC"
1217                "%ASSOC-EQ"
1218                "%ASSOC-IF"
1219                "%ASSOC-IF-KEY"
1220                "%ASSOC-IF-NOT"
1221                "%ASSOC-IF-NOT-KEY"
1222                "%ASSOC-KEY"
1223                "%ASSOC-KEY-EQ"
1224                "%ASSOC-KEY-TEST"
1225                "%ASSOC-KEY-TEST-NOT"
1226                "%ASSOC-TEST"
1227                "%ASSOC-TEST-NOT"
1228                "%ASIN" "%ASINH"
1229                "%ATAN" "%ATAN2" "%ATANH"
1230                "%CALLER-FRAME"
1231                "%CALLER-PC"
1232                "%CHECK-BOUND"
1233                "%CHECK-GENERIC-SEQUENCE-BOUNDS"
1234                "%CHECK-VECTOR-SEQUENCE-BOUNDS"
1235                "%COMPARE-AND-SWAP-CAR"
1236                "%COMPARE-AND-SWAP-CDR"
1237                "%COMPARE-AND-SWAP-INSTANCE-REF"
1238                "%COMPARE-AND-SWAP-SVREF"
1239                "%COMPARE-AND-SWAP-SYMBOL-PLIST"
1240                "%COMPARE-AND-SWAP-SYMBOL-VALUE"
1241                "%CONCATENATE-TO-BASE-STRING"
1242                "%CONCATENATE-TO-STRING"
1243                "%COS" "%COS-QUICK"
1244                "%COSH" "%DATA-VECTOR-AND-INDEX" "%DEPOSIT-FIELD"
1245                "%DOUBLE-FLOAT" "%DPB" "%EQL" "%EXP" "%EXPM1" "%FIND-POSITION"
1246                "%FIND-POSITION-VECTOR-MACRO" "%FIND-POSITION-IF"
1247                "%FIND-POSITION-IF-VECTOR-MACRO" "%FIND-POSITION-IF-NOT"
1248                "%FIND-POSITION-IF-NOT-VECTOR-MACRO"
1249                "%HYPOT" "%LDB" "%LOG" "%LOGB" "%LOG10"
1250                "%LAST0"
1251                "%LAST1"
1252                "%LASTN/FIXNUM"
1253                "%LASTN/BIGNUM"
1254                "%LOG1P"
1255                #!+long-float "%LONG-FLOAT"
1256                "%MAKE-COMPLEX" "%MAKE-FUNCALLABLE-INSTANCE"
1257                "%MAKE-FUNCALLABLE-STRUCTURE-INSTANCE-ALLOCATOR"
1258                "%MAKE-RATIO" "%MAKE-LISP-OBJ"
1259                "%MAKE-INSTANCE"
1260                "%MAKE-STRUCTURE-INSTANCE"
1261                "%MAKE-STRUCTURE-INSTANCE-ALLOCATOR"
1262                "%MAP" "%MAP-TO-SIMPLE-VECTOR-ARITY-1"
1263                "%MAP-TO-LIST-ARITY-1" "%MAP-TO-NIL-ON-SEQUENCE"
1264                "%MAP-TO-NIL-ON-SIMPLE-VECTOR" "%MAP-TO-NIL-ON-VECTOR"
1265                "%MASK-FIELD"
1266                "%MEMBER"
1267                "%MEMBER-EQ"
1268                "%MEMBER-IF"
1269                "%MEMBER-IF-KEY"
1270                "%MEMBER-IF-NOT"
1271                "%MEMBER-IF-NOT-KEY"
1272                "%MEMBER-KEY"
1273                "%MEMBER-KEY-EQ"
1274                "%MEMBER-KEY-TEST"
1275                "%MEMBER-KEY-TEST-NOT"
1276                "%MEMBER-TEST"
1277                "%MEMBER-TEST-NOT"
1278                "%NEGATE" "%POW"
1279                "%OTHER-POINTER-WIDETAG"
1280                "%PUTHASH"
1281                "%RASSOC"
1282                "%RASSOC-EQ"
1283                "%RASSOC-IF"
1284                "%RASSOC-IF-KEY"
1285                "%RASSOC-IF-NOT"
1286                "%RASSOC-IF-NOT-KEY"
1287                "%RASSOC-KEY"
1288                "%RASSOC-KEY-EQ"
1289                "%RASSOC-KEY-TEST"
1290                "%RASSOC-KEY-TEST-NOT"
1291                "%RASSOC-TEST"
1292                "%RASSOC-TEST-NOT"
1293                "%RAW-BITS" "%RAW-BITS-WITH-OFFSET" "%VECTOR-RAW-BITS"
1294                "%RAW-REF-COMPLEX-DOUBLE" "%RAW-REF-COMPLEX-LONG"
1295                "%RAW-REF-COMPLEX-SINGLE" "%RAW-REF-DOUBLE"
1296                "%RAW-REF-LONG" "%RAW-REF-SINGLE"
1297                "%RAW-SET-COMPLEX-DOUBLE" "%RAW-SET-COMPLEX-LONG"
1298                "%RAW-SET-COMPLEX-SINGLE" "%RAW-SET-DOUBLE"
1299                "%RAW-SET-LONG" "%RAW-SET-SINGLE" "%SCALB" "%SCALBN"
1300                #!+(or x86 x86-64)
1301                "%RAW-INSTANCE-ATOMIC-INCF/WORD"
1302                "%RAW-INSTANCE-REF/WORD" "%RAW-INSTANCE-SET/WORD"
1303                "%RAW-INSTANCE-REF/SINGLE" "%RAW-INSTANCE-SET/SINGLE"
1304                "%RAW-INSTANCE-REF/DOUBLE" "%RAW-INSTANCE-SET/DOUBLE"
1305                "%RAW-INSTANCE-REF/COMPLEX-SINGLE"
1306                "%RAW-INSTANCE-SET/COMPLEX-SINGLE"
1307                "%RAW-INSTANCE-REF/COMPLEX-DOUBLE"
1308                "%RAW-INSTANCE-SET/COMPLEX-DOUBLE"
1309                "%SET-ARRAY-DIMENSION" "%SET-FUNCALLABLE-INSTANCE-INFO"
1310                "%SET-RAW-BITS" "%SET-RAW-BITS-WITH-OFFSET"
1311                "%SET-VECTOR-RAW-BITS"
1312                "%SET-SAP-REF-16" "%SET-SAP-REF-32" "%SET-SAP-REF-64"
1313                "%SET-SAP-REF-WORD" "%SET-SAP-REF-8" "%SET-SAP-REF-DOUBLE"
1314                "%SET-SAP-REF-LONG" "%SET-SAP-REF-SAP"
1315                "%SET-SAP-REF-SINGLE" "%SET-SIGNED-SAP-REF-16"
1316                "%SET-SIGNED-SAP-REF-32" "%SET-SIGNED-SAP-REF-64"
1317                "%SET-SIGNED-SAP-REF-WORD"
1318                "%SET-SIGNED-SAP-REF-8" "%SET-STACK-REF"
1319                "%SET-SYMBOL-HASH"
1320                "%SIN" "%SIN-QUICK" "%SINGLE-FLOAT"
1321                "%SINH" "%SQRT" "%SXHASH-SIMPLE-STRING"
1322                "%SXHASH-SIMPLE-SUBSTRING" "%TAN" "%TAN-QUICK" "%TANH"
1323                "%UNARY-ROUND"
1324                "%UNARY-TRUNCATE"
1325                "%UNARY-TRUNCATE/SINGLE-FLOAT"
1326                "%UNARY-TRUNCATE/DOUBLE-FLOAT"
1327                "%UNARY-FTRUNCATE"
1328                "%WITH-ARRAY-DATA"
1329                "%WITH-ARRAY-DATA/FP"
1330                "%WITH-ARRAY-DATA-MACRO"
1331                "*CURRENT-LEVEL-IN-PRINT*"
1332                "*EMPTY-TYPE*"
1333                "*EVAL-CALLS*"
1334                "*GC-INHIBIT*" "*GC-PENDING*"
1335                #!+sb-thread "*STOP-FOR-GC-PENDING*"
1336                "*UNIVERSAL-TYPE*"
1337                "*UNIVERSAL-FUN-TYPE*" "*UNPARSE-FUN-TYPE-SIMPLIFY*"
1338                "*WILD-TYPE*" "WORD-LOGICAL-AND" "WORD-LOGICAL-ANDC1"
1339                "WORD-LOGICAL-ANDC2" "WORD-LOGICAL-EQV"
1340                "WORD-LOGICAL-NAND" "WORD-LOGICAL-NOR" "WORD-LOGICAL-NOT"
1341                "WORD-LOGICAL-OR" "WORD-LOGICAL-ORC1" "WORD-LOGICAL-ORC2"
1342                "WORD-LOGICAL-XOR" "ALIEN-TYPE-TYPE"
1343                "ALIEN-TYPE-TYPE-ALIEN-TYPE" "ALIEN-TYPE-TYPE-P"
1344                "ALLOCATE-VECTOR" "ALLOCATE-STATIC-VECTOR"
1345                "ASSERT-SYMBOL-HOME-PACKAGE-UNLOCKED"
1346                "PROGRAM-ASSERT-SYMBOL-HOME-PACKAGE-UNLOCKED"
1347                "DISABLED-PACKAGE-LOCKS"
1348                "WITH-SINGLE-PACKAGE-LOCKED-ERROR"
1349                "PACKAGE-ERROR-FORMAT-ARGUMENTS"
1350                "PACKAGE-ERROR-FORMAT-CONTROL" "ALWAYS-SUBTYPEP"
1351                "ARGS-TYPE" "ARGS-TYPE-ALLOWP" "ARGS-TYPE-KEYP"
1352                "ARGS-TYPE-KEYWORDS" "ARGS-TYPE-OPTIONAL" "ARGS-TYPE-P"
1353                "ARGS-TYPE-REQUIRED" "ARGS-TYPE-REST" "ARRAY-HEADER-P"
1354                "ARRAY-TYPE" "ARRAY-TYPE-COMPLEXP"
1355                "ARRAY-TYPE-DIMENSIONS" "ARRAY-TYPE-ELEMENT-TYPE"
1356                "ARRAY-TYPE-P" "ARRAY-TYPE-SPECIALIZED-ELEMENT-TYPE"
1357                "ASH-INDEX" "ASSERT-ERROR"
1358                #!+sb-unicode "BASE-CHAR-P"
1359                "BASE-STRING-P"
1360                "BINDING-STACK-POINTER-SAP" "BIT-INDEX"
1361                "BOGUS-ARG-TO-VALUES-LIST-ERROR" "BOOLE-CODE"
1362                "BOUNDING-INDICES-BAD-ERROR" "BYTE-SPECIFIER" "%BYTE-BLT"
1363                "CALLABLE" "CASE-BODY-ERROR"
1364                "CHARACTER-SET" "CHARACTER-SET-TYPE"
1365                "CHARACTER-SET-TYPE-PAIRS"
1366                #!+sb-unicode "CHARACTER-STRING-P"
1367                "CHARPOS"
1368                "CHECK-FOR-CIRCULARITY" "CHECK-TYPE-ERROR" "CLOSED-FLAME"
1369                "CODE-COMPONENT" "CODE-COMPONENT-P" "CODE-DEBUG-INFO"
1370                "CODE-HEADER-REF" "CODE-HEADER-SET" "CODE-INSTRUCTIONS"
1371                "COERCE-TO-FUN" "COERCE-TO-LEXENV" "COERCE-TO-LIST"
1372                "COERCE-TO-VALUES" "COERCE-TO-VECTOR"
1373                "*COLD-INIT-COMPLETE-P*" "COMPLEX-DOUBLE-FLOAT-P"
1374                "COMPLEX-FLOAT-P"
1375                #!+long-float "COMPLEX-LONG-FLOAT-P"
1376                "COMPLEX-RATIONAL-P" "COMPLEX-SINGLE-FLOAT-P"
1377                "COMPLEX-VECTOR-P" "COMPOUND-TYPE" "COMPOUND-TYPE-P"
1378                "COMPOUND-TYPE-TYPES" "CONS-TYPE" "CONS-TYPE-CAR-TYPE"
1379                "CONS-TYPE-CDR-TYPE" "CONS-TYPE-P" "CONSED-SEQUENCE"
1380                "CONSTANT" "CONSTANT-TYPE" "CONSTANT-TYPE-P"
1381                "CONSTANT-TYPE-TYPE" "CONTAINING-INTEGER-TYPE"
1382                "CONTROL-STACK-POINTER-SAP" "COPY-BYTE-VECTOR-TO-SYSTEM-AREA"
1383                "CSUBTYPEP" "CTYPE" "TYPE-HASH-VALUE" "CTYPE-OF"
1384                "CTYPE-P" "CTYPEP" "CURRENT-FP" "CURRENT-SP"
1385                "CURRENT-DYNAMIC-SPACE-START"
1386                "DATA-VECTOR-REF" "DATA-VECTOR-REF-WITH-OFFSET"
1387                "DATA-VECTOR-SET" "DATA-VECTOR-SET-WITH-OFFSET"
1388                "DECLARATION-TYPE-CONFLICT-ERROR"
1389                "DECODE-DOUBLE-FLOAT"
1390                #!+long-float "DECODE-LONG-FLOAT"
1391                "DECODE-SINGLE-FLOAT"
1392                "DEFINE-STRUCTURE-SLOT-ADDRESSOR"
1393                "DEFINED-FTYPE-MATCHES-DECLARED-FTYPE-P"
1394                "!DEFSTRUCT-WITH-ALTERNATE-METACLASS" "DESCEND-INTO"
1395                "DIVISION-BY-ZERO-ERROR" "DOUBLE-FLOAT-EXPONENT"
1396                "DOUBLE-FLOAT-HIGH-BITS" "DOUBLE-FLOAT-INT-EXPONENT"
1397                "DOUBLE-FLOAT-LOW-BITS" "DOUBLE-FLOAT-SIGNIFICAND"
1398                "FLOAT-WAIT" "DYNAMIC-SPACE-FREE-POINTER" "DYNAMIC-USAGE"
1399                "EFFECTIVE-FIND-POSITION-TEST"
1400                "EFFECTIVE-FIND-POSITION-KEY" "ERROR-NUMBER-OR-LOSE"
1401                "EXTENDED-CHAR-P" "EXTERNAL-FORMAT-DESIGNATOR"
1402                "FDEFINITION-OBJECT"
1403                "FDOCUMENTATION" "FILENAME"
1404                "FIND-AND-INIT-OR-CHECK-LAYOUT"
1405                "FIND-DEFSTRUCT-DESCRIPTION"
1406                "FLOAT-EXPONENT"
1407                "FLOAT-FORMAT-DIGITS" "FLOAT-FORMAT-NAME"
1408                "FLOAT-FORMAT-MAX" "FLOAT-INT-EXPONENT"
1409                "FLOATING-POINT-EXCEPTION" "FORM" "FORMAT-CONTROL"
1410                "*FREE-INTERRUPT-CONTEXT-INDEX*" "FUNCALLABLE-INSTANCE-P"
1411                "FUN-CODE-HEADER" "FUN-TYPE" "FUN-TYPE-ALLOWP"
1412                "FUN-TYPE-KEYP" "FUN-TYPE-KEYWORDS" "FUN-TYPE-NARGS"
1413                "FUN-TYPE-OPTIONAL" "FUN-TYPE-P" "FUN-TYPE-REQUIRED"
1414                "FUN-TYPE-REST" "FUN-TYPE-RETURNS" "FUN-TYPE-WILD-ARGS"
1415                "FUN-WORD-OFFSET" "GENERALIZED-BOOLEAN"
1416                "GET-CLOSURE-LENGTH" "GET-HEADER-DATA"
1417                "GET-LISP-OBJ-ADDRESS" "LOWTAG-OF" "WIDETAG-OF"
1418                "HAIRY-DATA-VECTOR-REF"
1419                "HAIRY-DATA-VECTOR-REF/CHECK-BOUNDS"  "HAIRY-DATA-VECTOR-SET"
1420                "HAIRY-DATA-VECTOR-SET/CHECK-BOUNDS""HAIRY-TYPE"
1421                "HAIRY-TYPE-CHECK-TEMPLATE-NAME" "HAIRY-TYPE-SPECIFIER"
1422                "HANDLE-CIRCULARITY" "HOST" "IGNORE-IT" "ILL-BIN"
1423                "ILL-BOUT" "ILL-IN" "ILL-OUT" "INDEX-OR-MINUS-1"
1424                "INDEX-TOO-LARGE-ERROR" "*!INITIAL-ASSEMBLER-ROUTINES*"
1425                "*!INITIAL-DEBUG-SOURCES*"
1426                "*!INITIAL-FDEFN-OBJECTS*" "*!INITIAL-FOREIGN-SYMBOLS*"
1427                "*!INITIAL-LAYOUTS*" "*!INITIAL-SYMBOLS*"
1428                "INTEGER-DECODE-DOUBLE-FLOAT"
1429                #!+long-float "INTEGER-DECODE-LONG-FLOAT"
1430                "INTEGER-DECODE-SINGLE-FLOAT" "INTERNAL-ERROR"
1431                #!+win32 "HANDLE-WIN32-EXCEPTION"
1432                "INTERNAL-TIME" "INTERSECTION-TYPE" "INTERSECTION-TYPE-P"
1433                "INTERSECTION-TYPE-TYPES" "INVALID-ARG-COUNT-ERROR"
1434                "INVALID-UNWIND-ERROR"
1435                "IRRATIONAL" "JUST-DUMP-IT-NORMALLY" "KEY-INFO"
1436                "KEY-INFO-NAME" "KEY-INFO-P" "KEY-INFO-TYPE"
1437                "LAYOUT-DEPTHOID" "LAYOUT-INVALID-ERROR"
1438                "LAYOUT-N-UNTAGGED-SLOTS" "LAYOUT-FOR-STD-CLASS-P"
1439                "LAYOUT-SLOT-TABLE"
1440                #!+(or x86-64 x86) "%LEA"
1441                "LEXENV" "LEXENV-DESIGNATOR" "LINE-LENGTH"
1442                "LIST-COPY-SEQ*"
1443                "LIST-FILL*"
1444                "LIST-SUBSEQ*"
1445                "ANSI-STREAM"
1446                "ANSI-STREAM-BIN" "ANSI-STREAM-BOUT" "ANSI-STREAM-CLOSE"
1447                "ANSI-STREAM-ELEMENT-TYPE"
1448                "ANSI-STREAM-FILE-POSITION"
1449                "ANSI-STREAM-IN"
1450                "ANSI-STREAM-IN-BUFFER" "ANSI-STREAM-IN-INDEX"
1451                "ANSI-STREAM-INPUT-STREAM-P" "ANSI-STREAM-MISC"
1452                "ANSI-STREAM-N-BIN" "ANSI-STREAM-OPEN-STREAM-P"
1453                "ANSI-STREAM-OUT" "ANSI-STREAM-SOUT"
1454                "ANSI-STREAM-OUTPUT-STREAM-P" "LIST-TO-VECTOR*"
1455                "LOGICAL-HOST" "LOGICAL-HOST-DESIGNATOR"
1456                #!+long-float "LONG-FLOAT-EXPONENT"
1457                #!+long-float "LONG-FLOAT-EXP-BITS"
1458                #!+long-float "LONG-FLOAT-HIGH-BITS"
1459                #!+long-float "LONG-FLOAT-LOW-BITS"
1460                #!+long-float "LONG-FLOAT-MID-BITS"
1461                "LONG-WORDS" "LRA" "LRA-CODE-HEADER" "LRA-P"
1462                "MAKE-ALIEN-TYPE-TYPE" "MAKE-ARGS-TYPE"
1463                "MAKE-ARRAY-HEADER" "MAKE-ARRAY-TYPE" "MAKE-CONS-TYPE"
1464                "MAKE-DOUBLE-FLOAT" "MAKE-FUN-TYPE" "MAKE-KEY-INFO"
1465                "MAKE-LISP-OBJ"
1466                #!+long-float "MAKE-LONG-FLOAT"
1467                "MAKE-MEMBER-TYPE" "MAKE-NAMED-TYPE" "MAKE-NULL-LEXENV"
1468                "MAKE-NUMERIC-TYPE"
1469                "MAKE-SINGLE-FLOAT" "MAKE-SPECIALIZABLE-ARRAY"
1470                "MAKE-UNPORTABLE-FLOAT"
1471                "MAKE-SHORT-VALUES-TYPE" "MAKE-SINGLE-VALUE-TYPE"
1472                "MAKE-VALUE-CELL" "MAKE-VALUES-TYPE"
1473                "MAPC-MEMBER-TYPE-MEMBERS" "MAPCAR-MEMBER-TYPE-MEMBERS"
1474                "MEMBER-TYPE" "MEMBER-TYPE-MEMBERS" "MEMBER-TYPE-P"
1475                "MEMBER-TYPE-SIZE" "MERGE-BITS"
1476                "MODIFIED-NUMERIC-TYPE"
1477                "MOST-NEGATIVE-EXACTLY-DOUBLE-FLOAT-FIXNUM"
1478                "MOST-NEGATIVE-EXACTLY-SINGLE-FLOAT-FIXNUM"
1479                "MOST-POSITIVE-EXACTLY-DOUBLE-FLOAT-FIXNUM"
1480                "MOST-POSITIVE-EXACTLY-SINGLE-FLOAT-FIXNUM"
1481                "MUTATOR-SELF" "NAMED-TYPE"
1482                "NAMED-TYPE-NAME" "NAMED-TYPE-P" "NATIVE-BYTE-ORDER"
1483                "NEGATE" "NEGATION-TYPE" "NEGATION-TYPE-TYPE"
1484                "NEVER-SUBTYPEP" "NIL-ARRAY-ACCESSED-ERROR"
1485                "NIL-FUN-RETURNED-ERROR" "NOT-<=-ERROR" "NOT-=-ERROR"
1486                "NOT-DUMPED-AT-ALL" "NUMERIC-CONTAGION" "NUMERIC-TYPE"
1487                "NUMERIC-TYPE-CLASS" "NUMERIC-TYPE-COMPLEXP"
1488                "NUMERIC-TYPE-EQUAL" "NUMERIC-TYPE-FORMAT"
1489                "NUMERIC-TYPE-HIGH" "NUMERIC-TYPE-LOW" "NUMERIC-TYPE-P"
1490                "OBJECT-NOT-ARRAY-ERROR" "OBJECT-NOT-CHARACTER-ERROR"
1491                "OBJECT-NOT-BASE-STRING-ERROR" "OBJECT-NOT-BIGNUM-ERROR"
1492                "OBJECT-NOT-BIT-VECTOR-ERROR"
1493                #!+sb-unicode "OBJECT-NOT-CHARACTER-STRING-ERROR"
1494                "OBJECT-NOT-COMPLEX-ERROR"
1495                "OBJECT-NOT-COMPLEX-FLOAT-ERROR"
1496                "OBJECT-NOT-COMPLEX-SINGLE-FLOAT-ERROR"
1497                #!+long-float "OBJECT-NOT-COMPLEX-LONG-FLOAT-ERROR"
1498                "OBJECT-NOT-COMPLEX-DOUBLE-FLOAT-ERROR"
1499                "OBJECT-NOT-COMPLEX-RATIONAL-ERROR"
1500                ;; FIXME: It's confusing using "complex" to mean both
1501                ;; "not on the real number line" and "not of a
1502                ;; SIMPLE-ARRAY nature". Perhaps we could rename all the
1503                ;; uses in the second sense as "hairy" instead?
1504                "OBJECT-NOT-COMPLEX-VECTOR-ERROR" "OBJECT-NOT-CONS-ERROR"
1505                "OBJECT-NOT-DOUBLE-FLOAT-ERROR" "OBJECT-NOT-FIXNUM-ERROR"
1506                "OBJECT-NOT-FLOAT-ERROR" "OBJECT-NOT-FUN-ERROR"
1507                "OBJECT-NOT-INSTANCE-ERROR" "OBJECT-NOT-INTEGER-ERROR"
1508                "OBJECT-NOT-LIST-ERROR"
1509                #!+long-float "OBJECT-NOT-LONG-FLOAT-ERROR"
1510                "OBJECT-NOT-NUMBER-ERROR" "OBJECT-NOT-RATIO-ERROR"
1511                "OBJECT-NOT-RATIONAL-ERROR" "OBJECT-NOT-REAL-ERROR"
1512                "OBJECT-NOT-SAP-ERROR" "OBJECT-NOT-SIGNED-BYTE-32-ERROR"
1513                ;; FIXME: 32/64-bit issues
1514                "OBJECT-NOT-SIGNED-BYTE-64-ERROR"
1515                "OBJECT-NOT-SIMPLE-ARRAY-COMPLEX-DOUBLE-FLOAT-ERROR"
1516                #!+long-float
1517                "OBJECT-NOT-SIMPLE-ARRAY-COMPLEX-LONG-FLOAT-ERROR"
1518                "OBJECT-NOT-SIMPLE-ARRAY-COMPLEX-SINGLE-FLOAT-ERROR"
1519                "OBJECT-NOT-SIMPLE-ARRAY-DOUBLE-FLOAT-ERROR"
1520                "OBJECT-NOT-SIMPLE-ARRAY-ERROR"
1521                #!+long-float "OBJECT-NOT-SIMPLE-ARRAY-LONG-FLOAT-ERROR"
1522                "OBJECT-NOT-SIMPLE-ARRAY-NIL-ERROR"
1523                "OBJECT-NOT-SIMPLE-ARRAY-SINGLE-FLOAT-ERROR"
1524                "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-15-ERROR"
1525                "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-16-ERROR"
1526                "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-2-ERROR"
1527                ;; KLUDGE: 32-bit and 64-bit ports implement a different
1528                ;; set of specialized array types.  Various bits of code
1529                ;; in SBCL assume that symbols connected to the
1530                ;; specialized array types are exported.  But there's not
1531                ;; a good way at this point to know whether the port for
1532                ;; which we're building is 32-bit or 64-bit.  Granted, we
1533                ;; could hardcode the particulars (or even come up with a
1534                ;; special :64BIT feature), but that seems a little
1535                ;; inelegant.  For now, we brute-force the issue by
1536                ;; always exporting all the names required for both
1537                ;; 32-bit and 64-bit ports.  Other bits connected to the
1538                ;; same issue are noted throughout the code below with
1539                ;; the tag "32/64-bit issues".  --njf, 2004-08-09
1540                "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-29-ERROR"
1541                "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-31-ERROR"
1542                "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-32-ERROR"
1543                "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-4-ERROR"
1544                ;; FIXME: 32/64-bit issues
1545                "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-60-ERROR"
1546                "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-63-ERROR"
1547                "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-64-ERROR"
1548                "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-7-ERROR"
1549                "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-8-ERROR"
1550                "OBJECT-NOT-SIMPLE-ARRAY-SIGNED-BYTE-16-ERROR"
1551                ;; FIXME: 32/64-bit issues
1552                "OBJECT-NOT-SIMPLE-ARRAY-SIGNED-BYTE-30-ERROR"
1553                "OBJECT-NOT-SIMPLE-ARRAY-SIGNED-BYTE-32-ERROR"
1554                ;; FIXME: 32/64-bit issues
1555                "OBJECT-NOT-SIMPLE-ARRAY-SIGNED-BYTE-61-ERROR"
1556                "OBJECT-NOT-SIMPLE-ARRAY-SIGNED-BYTE-64-ERROR"
1557                "OBJECT-NOT-SIMPLE-ARRAY-SIGNED-BYTE-8-ERROR"
1558                "OBJECT-NOT-SIMPLE-BIT-VECTOR-ERROR"
1559                "OBJECT-NOT-SIMPLE-BASE-STRING-ERROR"
1560                #!+sb-unicode "OBJECT-NOT-SIMPLE-CHARACTER-STRING-ERROR"
1561                "OBJECT-NOT-SIMPLE-STRING-ERROR"
1562                "OBJECT-NOT-SIMPLE-VECTOR-ERROR"
1563                "OBJECT-NOT-SINGLE-FLOAT-ERROR" "OBJECT-NOT-STRING-ERROR"
1564                "OBJECT-NOT-INSTANCE-ERROR" "OBJECT-NOT-SYMBOL-ERROR"
1565                "OBJECT-NOT-TYPE-ERROR"
1566                "OBJECT-NOT-UNSIGNED-BYTE-32-ERROR"
1567                ;; FIXME: 32/64-bit issues
1568                "OBJECT-NOT-UNSIGNED-BYTE-64-ERROR"
1569                "OBJECT-NOT-VECTOR-ERROR"
1570                "OBJECT-NOT-VECTOR-NIL-ERROR"
1571                "OBJECT-NOT-WEAK-POINTER-ERROR"
1572                "ODD-KEY-ARGS-ERROR" "OUTPUT-OBJECT" "OUTPUT-UGLY-OBJECT"
1573                "PACKAGE-DESIGNATOR" "PACKAGE-DOC-STRING"
1574                "PACKAGE-HASHTABLE-SIZE" "PACKAGE-HASHTABLE-FREE"
1575                "PACKAGE-INTERNAL-SYMBOLS" "PACKAGE-EXTERNAL-SYMBOLS"
1576                "PARSE-DEFMACRO" "PARSE-UNKNOWN-TYPE"
1577                "PARSE-UNKNOWN-TYPE-SPECIFIER" "PATHNAME-DESIGNATOR"
1578                "POINTER-HASH"
1579                #!+(or x86 x86-64) "*PSEUDO-ATOMIC-BITS*"
1580                "PUNT-PRINT-IF-TOO-LONG"
1581                "RANDOM-DOCUMENTATION"
1582                "RAW-INSTANCE-SLOTS-EQUALP"
1583                "READER-IMPOSSIBLE-NUMBER-ERROR"
1584                "READER-EOF-ERROR"
1585                "RESTART-DESIGNATOR"
1586                "RUN-PENDING-FINALIZERS"
1587                "SCALE-DOUBLE-FLOAT"
1588                #!+long-float "SCALE-LONG-FLOAT"
1589                "SCALE-SINGLE-FLOAT"
1590                "SCRUB-POWER-CACHE"
1591                "SEQUENCEP" "SEQUENCE-COUNT" "SEQUENCE-END"
1592                "SEQUENCE-OF-CHECKED-LENGTH-GIVEN-TYPE"
1593                "SET-ARRAY-HEADER" "SET-HEADER-DATA" "SHIFT-TOWARDS-END"
1594                "SHIFT-TOWARDS-START" "SHRINK-VECTOR" "%SHRINK-VECTOR"
1595                ;; FIXME: 32/64-bit issues
1596                "SIGNED-BYTE-32-P" "SIGNED-BYTE-64-P"
1597                "SIMPLE-ARRAY-COMPLEX-DOUBLE-FLOAT-P"
1598                #!+long-float "SIMPLE-ARRAY-COMPLEX-LONG-FLOAT-P"
1599                "SIMPLE-ARRAY-COMPLEX-SINGLE-FLOAT-P"
1600                "SIMPLE-ARRAY-DOUBLE-FLOAT-P"
1601                #!+long-float "SIMPLE-ARRAY-LONG-FLOAT-P"
1602                "SIMPLE-ARRAY-NIL-P" "SIMPLE-ARRAY-P"
1603                "SIMPLE-ARRAY-SINGLE-FLOAT-P"
1604                "SIMPLE-ARRAY-UNSIGNED-BYTE-15-P"
1605                "SIMPLE-ARRAY-UNSIGNED-BYTE-16-P"
1606                "SIMPLE-ARRAY-UNSIGNED-BYTE-2-P"
1607                ;; FIXME: 32/64-bit issues
1608                "SIMPLE-ARRAY-UNSIGNED-BYTE-29-P"
1609                "SIMPLE-ARRAY-UNSIGNED-BYTE-31-P"
1610                "SIMPLE-ARRAY-UNSIGNED-BYTE-32-P"
1611                "SIMPLE-ARRAY-UNSIGNED-BYTE-4-P"
1612                ;; FIXME: 32/64-bit issues
1613                "SIMPLE-ARRAY-UNSIGNED-BYTE-60-P"
1614                "SIMPLE-ARRAY-UNSIGNED-BYTE-63-P"
1615                "SIMPLE-ARRAY-UNSIGNED-BYTE-64-P"
1616                "SIMPLE-ARRAY-UNSIGNED-BYTE-7-P"
1617                "SIMPLE-ARRAY-UNSIGNED-BYTE-8-P"
1618                "SIMPLE-ARRAY-SIGNED-BYTE-16-P"
1619                "SIMPLE-ARRAY-SIGNED-BYTE-30-P"
1620                "SIMPLE-ARRAY-SIGNED-BYTE-32-P"
1621                ;; FIXME: 32/64-bit issues
1622                "SIMPLE-ARRAY-SIGNED-BYTE-61-P"
1623                "SIMPLE-ARRAY-SIGNED-BYTE-64-P"
1624                "SIMPLE-ARRAY-SIGNED-BYTE-8-P" "SIMPLE-BASE-STRING-P"
1625                #!+sb-unicode "SIMPLE-CHARACTER-STRING-P"
1626                "SIMPLE-PACKAGE-ERROR" "SIMPLE-UNBOXED-ARRAY"
1627                "SINGLE-FLOAT-BITS" "SINGLE-FLOAT-EXPONENT"
1628                "SINGLE-FLOAT-INT-EXPONENT" "SINGLE-FLOAT-SIGNIFICAND"
1629                "SINGLE-VALUE-TYPE" "SINGLE-VALUE-SPECIFIER-TYPE"
1630                "SPECIALIZABLE" "SPECIALIZABLE-VECTOR" "SPECIFIER-TYPE"
1631                "STACK-REF" "STREAM-DESIGNATOR" "STRING-DESIGNATOR"
1632                "STRING-FILL*"
1633                "STRING-SUBSEQ*"
1634                "STRUCTURE-RAW-SLOT-TYPE-AND-SIZE" "SUB-GC"
1635                "SYMBOLS-DESIGNATOR"
1636                "%INSTANCE-LENGTH"
1637                "%INSTANCE-REF"
1638                "%INSTANCE-SET"
1639                "SYSTEM-AREA-CLEAR"
1640                "TLS-EXHAUSTED-ERROR"
1641                "TWO-ARG-*" "TWO-ARG-+" "TWO-ARG--" "TWO-ARG-/"
1642                "TWO-ARG-/=" "TWO-ARG-<" "TWO-ARG-<=" "TWO-ARG-="
1643                "TWO-ARG->" "TWO-ARG->=" "TWO-ARG-AND" "TWO-ARG-EQV"
1644                "TWO-ARG-GCD" "TWO-ARG-IOR" "TWO-ARG-LCM" "TWO-ARG-XOR"
1645                "TYPE-DIFFERENCE" "TYPE-EXPAND" "TYPE-INTERSECTION"
1646                "TYPE-INTERSECTION2" "TYPE-APPROX-INTERSECTION2"
1647                "TYPE-SINGLE-VALUE-P" "TYPE-SPECIFIER" "TYPE-UNION"
1648                "TYPE/=" "TYPE=" "TYPES-EQUAL-OR-INTERSECT"
1649                "UNBOUND-SYMBOL-ERROR" "UNBOXED-ARRAY"
1650                "UNDEFINED-FUN-ERROR" "UNION-TYPE" "UNION-TYPE-P"
1651                "UNION-TYPE-TYPES" "UNKNOWN-ERROR"
1652                "UNKNOWN-KEY-ARG-ERROR" "UNKNOWN-TYPE" "UNKNOWN-TYPE-P"
1653                "UNKNOWN-TYPE-SPECIFIER" "UNSEEN-THROW-TAG-ERROR"
1654                ;; FIXME: 32/64-bit issues
1655                "UNSIGNED-BYTE-32-P" "UNSIGNED-BYTE-64-P"
1656                "UPDATE-OBJECT-LAYOUT-OR-INVALID"
1657                "VALUE-CELL-REF" "VALUE-CELL-SET" "VALUES-SPECIFIER-TYPE"
1658                "VALUES-SPECIFIER-TYPE-CACHE-CLEAR" "VALUES-SUBTYPEP"
1659                "VALUES-TYPE" "VALUES-TYPE-ERROR" "VALUES-TYPE-IN"
1660                "VALUES-TYPE-INTERSECTION"
1661                "VALUES-TYPE-MIN-VALUE-COUNT" "VALUES-TYPE-MAX-VALUE-COUNT"
1662                "VALUES-TYPE-MAY-BE-SINGLE-VALUE-P" "VALUES-TYPE-OPTIONAL"
1663                "VALUES-TYPE-OUT" "VALUES-TYPE-P" "VALUES-TYPE-REQUIRED"
1664                "VALUES-TYPE-REST" "VALUES-TYPE-UNION"
1665                "VALUES-TYPE-TYPES" "VALUES-TYPES"
1666                "VALUES-TYPES-EQUAL-OR-INTERSECT"
1668                "*VECTOR-WITHOUT-COMPLEX-TYPECODE-INFOS*"
1669                "VECTOR-SINGLE-FLOAT-P" "VECTOR-DOUBLE-FLOAT-P"
1670                "VECTOR-UNSIGNED-BYTE-2-P" "VECTOR-UNSIGNED-BYTE-4-P"
1671                "VECTOR-UNSIGNED-BYTE-7-P" "VECTOR-UNSIGNED-BYTE-8-P"
1672                "VECTOR-UNSIGNED-BYTE-15-P" "VECTOR-UNSIGNED-BYTE-16-P"
1673                "VECTOR-UNSIGNED-BYTE-29-P" "VECTOR-UNSIGNED-BYTE-31-P"
1674                "VECTOR-UNSIGNED-BYTE-32-P" "VECTOR-UNSIGNED-BYTE-60-P"
1675                "VECTOR-UNSIGNED-BYTE-63-P" "VECTOR-UNSIGNED-BYTE-64-P"
1676                "VECTOR-SIGNED-BYTE-8-P" "VECTOR-SIGNED-BYTE-16-P"
1677                "VECTOR-FIXNUM-P" "VECTOR-SIGNED-BYTE-32-P"
1678                "VECTOR-SIGNED-BYTE-64-P" "VECTOR-COMPLEX-SINGLE-FLOAT-P"
1679                "VECTOR-COMPLEX-DOUBLE-FLOAT-P" "VECTOR-T-P"
1681                "VECTOR-NIL-P"
1682                "VECTOR-FILL*"
1683                "VECTOR-SUBSEQ*"
1684                "VECTOR-TO-VECTOR*"
1685                "VECTOR-OF-CHECKED-LENGTH-GIVEN-LENGTH" "WITH-ARRAY-DATA"
1686                "WITH-CIRCULARITY-DETECTION" "WRONG-NUMBER-OF-INDICES-ERROR"
1687                "WITH-WORLD-LOCK"
1689                ;; bit bash fillers (FIXME: 32/64-bit issues)
1690                "UB1-BASH-FILL" "SYSTEM-AREA-UB1-FILL"
1691                "UB2-BASH-FILL" "SYSTEM-AREA-UB2-FILL"
1692                "UB4-BASH-FILL" "SYSTEM-AREA-UB4-FILL"
1693                "UB8-BASH-FILL" "SYSTEM-AREA-UB8-FILL"
1694                "UB16-BASH-FILL" "SYSTEM-AREA-UB16-FILL"
1695                "UB32-BASH-FILL" "SYSTEM-AREA-UB32-FILL"
1696                "UB64-BASH-FILL" "SYSTEM-AREA-UB64-FILL"
1698                ;; bit bash copiers (FIXME: 32/64-bit issues)
1699                "UB1-BASH-COPY" "SYSTEM-AREA-UB1-COPY"
1700                "COPY-UB1-TO-SYSTEM-AREA" "COPY-UB1-FROM-SYSTEM-AREA"
1701                "UB2-BASH-COPY" "SYSTEM-AREA-UB2-COPY"
1702                "COPY-UB2-TO-SYSTEM-AREA" "COPY-UB2-FROM-SYSTEM-AREA"
1703                "UB4-BASH-COPY" "SYSTEM-AREA-UB4-COPY"
1704                "COPY-UB4-TO-SYSTEM-AREA" "COPY-UB4-FROM-SYSTEM-AREA"
1705                "UB8-BASH-COPY" "SYSTEM-AREA-UB8-COPY"
1706                "COPY-UB8-TO-SYSTEM-AREA" "COPY-UB8-FROM-SYSTEM-AREA"
1707                "UB16-BASH-COPY" "SYSTEM-AREA-UB16-COPY"
1708                "COPY-UB16-TO-SYSTEM-AREA" "COPY-UB16-FROM-SYSTEM-AREA"
1709                "UB32-BASH-COPY" "SYSTEM-AREA-UB32-COPY"
1710                "COPY-UB32-TO-SYSTEM-AREA" "COPY-UB32-FROM-SYSTEM-AREA"
1711                "UB64-BASH-COPY" "SYSTEM-AREA-UB64-COPY"
1712                "COPY-UB64-TO-SYSTEM-AREA" "COPY-UB64-FROM-SYSTEM-AREA"
1714                ;; SIMPLE-FUN type and accessors
1715                "SIMPLE-FUN"
1716                "SIMPLE-FUN-P"
1717                "%SIMPLE-FUN-ARGLIST"
1718                "%SIMPLE-FUN-DOC"
1719                "%SIMPLE-FUN-INFO"
1720                "%SIMPLE-FUN-NAME"
1721                "%SIMPLE-FUN-NEXT"
1722                "%SIMPLE-FUN-SELF"
1723                "%SIMPLE-FUN-TYPE"
1724                "%SIMPLE-FUN-XREFS"
1726                ;; CLOSURE type and accessors
1727                "CLOSURE"
1728                "CLOSUREP"
1729                "DO-CLOSURE-VALUES"
1730                "%CLOSURE-FUN"
1731                "%CLOSURE-INDEX-REF"
1732                "%CLOSURE-VALUES"
1734                ;; Abstract function accessors
1735                "%FUN-DOC"
1736                "%FUN-FUN"
1737                "%FUN-LAMBDA-LIST"
1738                "%FUN-NAME"
1740                "FDEFN" "MAKE-FDEFN" "FDEFN-P" "FDEFN-NAME" "FDEFN-FUN"
1741                "FDEFN-MAKUNBOUND" "OUTER-FDEFN"
1742                "%COERCE-CALLABLE-TO-FUN" "FUN-SUBTYPE"
1743                "*MAXIMUM-ERROR-DEPTH*" "%SET-SYMBOL-PLIST"
1744                "INFINITE-ERROR-PROTECT"
1745                "FIND-CALLER-NAME-AND-FRAME"
1746                "FIND-INTERRUPTED-NAME-AND-FRAME"
1747                "%SET-SYMBOL-VALUE" "%SET-SYMBOL-GLOBAL-VALUE" "%SET-SYMBOL-PACKAGE"
1748                "OUTPUT-SYMBOL-NAME" "%COERCE-NAME-TO-FUN"
1749                "INVOKE-MACROEXPAND-HOOK" "DEFAULT-STRUCTURE-PRINT"
1750                "LAYOUT" "LAYOUT-LENGTH" "LAYOUT-PURE" "DSD-RAW-TYPE"
1751                "DEFSTRUCT-DESCRIPTION" "UNDECLARE-STRUCTURE" "DD-COPIER"
1752                "UNDEFINE-FUN-NAME" "DD-TYPE" "CLASSOID-STATE" "INSTANCE"
1753                "*TYPE-SYSTEM-INITIALIZED*" "FIND-LAYOUT" "DSD-NAME"
1754                "%TYPEP" "DD-RAW-INDEX" "DD-NAME" "CLASSOID-SUBCLASSES"
1755                "CLASSOID-LAYOUT" "CLASSOID-NAME" "CLASSOID-P"
1756                "DD-RAW-LENGTH" "NOTE-NAME-DEFINED" "%CODE-CODE-SIZE"
1757                "DD-SLOTS" "DD-INCLUDE" "SLOT-SETTER-LAMBDA-FORM"
1758                "%IMAGPART" "DSD-ACCESSOR-NAME" "%CODE-DEBUG-INFO"
1759                "LAYOUT-CLASSOID" "LAYOUT-INVALID"
1760                "DSD-TYPE" "%INSTANCEP" "DEFSTRUCT-SLOT-DESCRIPTION"
1761                "DD-PREDICATE-NAME"
1762                "CLASSOID-PROPER-NAME" "%NOTE-TYPE-DEFINED" "LAYOUT-INFO"
1763                "%SET-INSTANCE-LAYOUT" "DD-DEFAULT-CONSTRUCTOR"
1764                "LAYOUT-OF" "%REALPART"
1765                "STRUCTURE-CLASSOID-P" "DSD-INDEX" "STRUCTURE-CLASSOID"
1766                "%INSTANCE-LAYOUT" "LAYOUT-CLOS-HASH"
1767                "PROCLAIM-AS-FUN-NAME" "BECOME-DEFINED-FUN-NAME"
1768                "%NUMERATOR" "CLASSOID-TYPEP" "DSD-READ-ONLY"
1769                "DSD-DEFAULT" "LAYOUT-INHERITS" "DD-LENGTH"
1770                "%CODE-ENTRY-POINTS" "%DENOMINATOR"
1771                "%OTHER-POINTER-P"
1773                "STANDARD-CLASSOID" "CLASSOID-OF"
1774                "MAKE-STANDARD-CLASSOID"
1775                "CLASSOID-CELL-CLASSOID"
1776                "CLASSOID-CELL-NAME"
1777                "CLASSOID-CELL-PCL-CLASS"
1778                "CLASSOID-CELL-TYPEP"
1779                "%CLEAR-CLASSOID"
1780                "FIND-CLASSOID-CELL" "EXTRACT-FUN-TYPE"
1781                "%RANDOM-DOUBLE-FLOAT"
1782                #!+long-float "%RANDOM-LONG-FLOAT"
1783                "%RANDOM-SINGLE-FLOAT" "STATIC-CLASSOID"
1784                "%FUNCALLABLE-INSTANCE-INFO" "RANDOM-CHUNK" "BIG-RANDOM-CHUNK"
1785                "LAYOUT-CLOS-HASH-LIMIT"
1786                "BUILT-IN-CLASSOID-DIRECT-SUPERCLASSES"
1787                "BUILT-IN-CLASSOID-TRANSLATION" "RANDOM-LAYOUT-CLOS-HASH"
1788                "CLASSOID-PCL-CLASS" "FUNCALLABLE-STRUCTURE"
1789                "FUNCALLABLE-INSTANCE-FUN" "%FUNCALLABLE-INSTANCE-LAYOUT"
1790                "%SET-FUNCALLABLE-INSTANCE-LAYOUT"
1791                "BASIC-STRUCTURE-CLASSOID"
1792                "REGISTER-LAYOUT"
1793                "FUNCALLABLE-INSTANCE" "RANDOM-FIXNUM-MAX"
1794                "MAKE-STATIC-CLASSOID" "INSTANCE-LAMBDA"
1795                "%MAKE-SYMBOL"
1796                "%FUNCALLABLE-INSTANCE-FUNCTION" "SYMBOL-HASH"
1798                "EXTENDED-SEQUENCE" "*EXTENDED-SEQUENCE-TYPE*"
1799                "EXTENDED-SEQUENCE-P"
1801                "BUILT-IN-CLASSOID" "CONDITION-CLASSOID-P"
1802                "CONDITION-CLASSOID-SLOTS" "MAKE-UNDEFINED-CLASSOID"
1803                "FIND-CLASSOID" "CLASSOID" "CLASSOID-DIRECT-SUPERCLASSES"
1804                "MAKE-LAYOUT" "REDEFINE-LAYOUT-WARNING" "SLOT-CLASSOID"
1805                "INSURED-FIND-CLASSOID" "ORDER-LAYOUT-INHERITS"
1806                "STD-COMPUTE-CLASS-PRECEDENCE-LIST"
1808                ;; symbols from former SB!CONDITIONS
1809                "*HANDLER-CLUSTERS*" "*RESTART-CLUSTERS*"
1810                "*CONDITION-RESTARTS*" "SHOW-CONDITION" "CASE-FAILURE"
1811                "NAMESTRING-PARSE-ERROR" "NAMESTRING-PARSE-ERROR-OFFSET"
1812                "DESCRIBE-CONDITION" "MAKE-RESTART" "COERCE-TO-CONDITION"
1814                "CONDITION-READER-FUNCTION"
1815                "CONDITION-WRITER-FUNCTION"
1817                "CONDITION-SLOT-ALLOCATION"
1818                "CONDITION-SLOT-DOCUMENTATION"
1819                "CONDITION-SLOT-INITARGS"
1820                "CONDITION-SLOT-INITFORM"
1821                "CONDITION-SLOT-INITFORM-P"
1822                "CONDITION-SLOT-NAME" "CONDITION-SLOT-READERS"
1823                "CONDITION-SLOT-WRITERS"
1825                "REDEFINITION-WARNING"
1826                "REDEFINITION-WITH-DEFUN"
1827                "REDEFINITION-WITH-DEFGENERIC"
1828                "REDEFINITION-WITH-DEFMETHOD"
1829                "REDEFINITION-REPLACES-GENERIC-FUNCTION-P"
1830                "REDEFINITION-REPLACES-COMPILED-FUNCTION-WITH-INTERPRETED-P"
1831                "UNINTERESTING-ORDINARY-FUNCTION-REDEFINITION-P"
1832                "UNINTERESTING-GENERIC-FUNCTION-REDEFINITION-P"
1833                "UNINTERESTING-METHOD-REDEFINITION-P"
1834                "UNINTERESTING-REDEFINITION"
1835                "REDEFINITION-WITH-DEFTRANSFORM"
1837                "DUBIOUS-ASTERISKS-AROUND-VARIABLE-NAME"
1838                "ASTERISKS-AROUND-LEXICAL-VARIABLE-NAME"
1839                "ASTERISKS-AROUND-CONSTANT-VARIABLE-NAME"
1840                "UNDEFINED-ALIEN-STYLE-WARNING"
1841                #!+sb-eval
1842                "LEXICAL-ENVIRONMENT-TOO-COMPLEX"
1843                "CHARACTER-DECODING-ERROR-IN-COMMENT"
1844                "DEPRECATED-EVAL-WHEN-SITUATIONS"
1845                "PROCLAMATION-MISMATCH"
1846                "TYPE-PROCLAMATION-MISMATCH"
1847                "FTYPE-PROCLAMATION-MISMATCH"
1849                "!COLD-INIT" "!UNINTERN-INIT-ONLY-STUFF"
1850                "!GLOBALDB-COLD-INIT" "!FDEFN-COLD-INIT"
1851                "!FOREIGN-COLD-INIT" "!FUNCTION-NAMES-COLD-INIT"
1852                "!TYPE-CLASS-COLD-INIT" "!TYPEDEFS-COLD-INIT"
1853                "!ALIEN-TYPE-COLD-INIT" "!CLASSES-COLD-INIT"
1854                "!EARLY-TYPE-COLD-INIT" "!LATE-TYPE-COLD-INIT"
1855                "!FIXUP-TYPE-COLD-INIT" "!TARGET-TYPE-COLD-INIT"
1856                "!RANDOM-COLD-INIT" "!READER-COLD-INIT"
1857                "!PATHNAME-COLD-INIT" "!DEBUG-INFO-COLD-INIT"
1858                "!TYPECHECKFUNS-COLD-INIT" "!LOADER-COLD-INIT"
1859                "!EXHAUST-COLD-INIT" "!PACKAGE-COLD-INIT"
1860                "!POLICY-COLD-INIT-OR-RESANIFY"
1861                "!VM-TYPE-COLD-INIT" "!BACKQ-COLD-INIT"
1862                "!SHARPM-COLD-INIT" "!EARLY-PROCLAIM-COLD-INIT"
1863                "!LATE-PROCLAIM-COLD-INIT" "!CLASS-FINALIZE"
1864                "!CONSTANTP-COLD-INIT"
1865                "!WORLD-LOCK-COLD-INIT"
1867                "FLOAT-COLD-INIT-OR-REINIT"
1868                "GC-REINIT"
1869                "TIME-REINIT"
1870                "SIGNAL-COLD-INIT-OR-REINIT"
1871                "STREAM-COLD-INIT-OR-RESET"
1873                ;; Cleanups to run before saving a core
1874                "DEBUG-DEINIT"
1875                "FLOAT-DEINIT"
1876                "FOREIGN-DEINIT"
1877                "PROFILE-DEINIT"
1879                ;; Note: These are out of lexicographical order
1880                ;; because in CMU CL they were defined as
1881                ;; internal symbols in package "CL" imported
1882                ;; into package "C", as opposed to what we're
1883                ;; doing here, defining them as external symbols
1884                ;; in a package which is used by both "SB!C" and
1885                ;; "SB!IMPL". (SBCL's "SB!C" is directly
1886                ;; analogous to CMU CL's "C"; and for this
1887                ;; purpose, SBCL's "SB!IMPL" is analogous to CMU
1888                ;; CL's "CL".) As far as I know there's nothing
1889                ;; special about them, so they could be merged
1890                ;; into the same order as everything else in the
1891                ;; in this package. -- WHN 19990911
1892                "STRING>=*" "STRING>*" "STRING=*" "STRING<=*"
1893                "STRING<*" "STRING/=*" "%SVSET"
1894                "%SP-STRING-COMPARE" "%SETNTH" "%SETELT"
1895                "%SET-ROW-MAJOR-AREF" "%SET-FILL-POINTER"
1896                "%SET-FDEFINITION" "%SCHARSET" "%SBITSET"
1897                "%RPLACD" "%RPLACA" "%PUT" "%CHARSET" "%BITSET"
1898                "%ASET" "%ARRAY-TYPEP"))
1900    #s(sb-cold:package-data
1901       :name "SB!THREAD"
1902       :use ("CL" "SB!ALIEN" "SB!INT" "SB!SYS" "SB!KERNEL")
1903       :doc "public (but low-level): native thread support"
1904       :export ("*CURRENT-THREAD*"
1905                "DESTROY-THREAD"
1906                "INTERRUPT-THREAD"
1907                "INTERRUPT-THREAD-ERROR"
1908                "INTERRUPT-THREAD-ERROR-THREAD"
1909                "JOIN-THREAD"
1910                "JOIN-THREAD-ERROR"
1911                "JOIN-THREAD-ERROR-THREAD"
1912                "LIST-ALL-THREADS"
1913                "MAKE-THREAD"
1914                "SYMBOL-VALUE-IN-THREAD"
1915                "SYMBOL-VALUE-IN-THREAD-ERROR"
1916                "TERMINATE-THREAD"
1917                "THREAD"
1918                "THREAD-ERROR"
1919                "THREAD-ERROR-THREAD"
1920                "THREAD-ALIVE-P"
1921                "THREAD-NAME"
1922                "THREAD-YIELD"
1923                ;; Mutexes
1924                "GET-MUTEX"
1925                "HOLDING-MUTEX-P"
1926                "MAKE-MUTEX"
1927                "MUTEX"
1928                "MUTEX-NAME"
1929                "MUTEX-OWNER"
1930                "MUTEX-VALUE"
1931                "RELEASE-MUTEX"
1932                "WITH-MUTEX"
1933                "WITH-RECURSIVE-LOCK"
1934                ;; Condition variables
1935                "CONDITION-BROADCAST"
1936                "CONDITION-NOTIFY"
1937                "CONDITION-WAIT"
1938                "MAKE-WAITQUEUE"
1939                "WAITQUEUE"
1940                "WAITQUEUE-NAME"
1941                ;; Sessions
1942                "MAKE-LISTENER-THREAD"
1943                "RELEASE-FOREGROUND"
1944                "WITH-NEW-SESSION"
1945                ;; Semaphores
1946                "MAKE-SEMAPHORE"
1947                "SEMAPHORE"
1948                "SEMAPHORE-NAME"
1949                "SEMAPHORE-COUNT"
1950                "SIGNAL-SEMAPHORE"
1951                "WAIT-ON-SEMAPHORE"))
1953    #s(sb-cold:package-data
1954       :name "SB!LOOP"
1955       :doc "private: implementation details of LOOP"
1956       :use ("CL")
1957       :export ())
1959    #s(sb-cold:package-data
1960       :name "SB!MOP"
1961       :doc
1962       "public: the MetaObject Protocol interface, as defined by
1963 The Art of the Metaobject Protocol, by Kiczales, des Rivieres and Bobrow:
1964 ISBN 0-262-61074-4, with exceptions as noted in the User Manual."
1965       :use ("CL")
1966       :reexport ("ADD-METHOD"
1967                  "ALLOCATE-INSTANCE"
1968                  "CLASS-NAME" "COMPUTE-APPLICABLE-METHODS"
1969                  "ENSURE-GENERIC-FUNCTION" "MAKE-INSTANCE"
1970                  "METHOD-QUALIFIERS" "REMOVE-METHOD"
1971                  "BUILT-IN-CLASS" "CLASS"
1972                  "FUNCTION" "GENERIC-FUNCTION"
1973                  "METHOD" "METHOD-COMBINATION"
1974                  "STANDARD-CLASS" "STANDARD-GENERIC-FUNCTION"
1975                  "STANDARD-METHOD" "STANDARD-OBJECT" "T")
1976       :export ("ADD-DEPENDENT"
1977                "ADD-DIRECT-METHOD"
1978                "ADD-DIRECT-SUBCLASS"
1979                "CLASS-DEFAULT-INITARGS"
1980                "CLASS-DIRECT-DEFAULT-INITARGS"
1981                "CLASS-DIRECT-SLOTS"
1982                "CLASS-DIRECT-SUBCLASSES"
1983                "CLASS-DIRECT-SUPERCLASSES"
1984                "CLASS-FINALIZED-P"
1985                "CLASS-PRECEDENCE-LIST"
1986                "CLASS-PROTOTYPE"
1987                "CLASS-SLOTS"
1988                "COMPUTE-APPLICABLE-METHODS-USING-CLASSES"
1989                "COMPUTE-CLASS-PRECEDENCE-LIST"
1990                "COMPUTE-DEFAULT-INITARGS"
1991                "COMPUTE-DISCRIMINATING-FUNCTION"
1992                "COMPUTE-EFFECTIVE-METHOD"
1993                "COMPUTE-EFFECTIVE-SLOT-DEFINITION"
1994                "COMPUTE-SLOTS"
1995                "DIRECT-SLOT-DEFINITION"
1996                "DIRECT-SLOT-DEFINITION-CLASS"
1997                "EFFECTIVE-SLOT-DEFINITION"
1998                "EFFECTIVE-SLOT-DEFINITION-CLASS"
1999                "ENSURE-CLASS"
2000                "ENSURE-CLASS-USING-CLASS"
2001                "ENSURE-GENERIC-FUNCTION-USING-CLASS"
2002                "EQL-SPECIALIZER"
2003                "EQL-SPECIALIZER-OBJECT"
2004                "EXTRACT-LAMBDA-LIST"
2005                "EXTRACT-SPECIALIZER-NAMES"
2006                "FINALIZE-INHERITANCE"
2007                "FIND-METHOD-COMBINATION"
2008                "FORWARD-REFERENCED-CLASS"
2009                "FUNCALLABLE-STANDARD-CLASS"
2010                "FUNCALLABLE-STANDARD-INSTANCE-ACCESS"
2011                "FUNCALLABLE-STANDARD-OBJECT"
2012                "GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER"
2013                "GENERIC-FUNCTION-DECLARATIONS"
2014                "GENERIC-FUNCTION-LAMBDA-LIST"
2015                "GENERIC-FUNCTION-METHOD-CLASS"
2016                "GENERIC-FUNCTION-METHOD-COMBINATION"
2017                "GENERIC-FUNCTION-METHODS"
2018                "GENERIC-FUNCTION-NAME"
2019                "INTERN-EQL-SPECIALIZER"
2020                "MAKE-METHOD-LAMBDA"
2021                "MAP-DEPENDENTS"
2022                "METAOBJECT"
2023                "METHOD-FUNCTION"
2024                "METHOD-GENERIC-FUNCTION"
2025                "METHOD-LAMBDA-LIST"
2026                "METHOD-SPECIALIZERS"
2027                "ACCESSOR-METHOD-SLOT-DEFINITION"
2028                "READER-METHOD-CLASS"
2029                "REMOVE-DEPENDENT"
2030                "REMOVE-DIRECT-METHOD"
2031                "REMOVE-DIRECT-SUBCLASS"
2032                "SET-FUNCALLABLE-INSTANCE-FUNCTION"
2033                "SLOT-BOUNDP-USING-CLASS"
2034                "SLOT-DEFINITION"
2035                "SLOT-DEFINITION-ALLOCATION"
2036                "SLOT-DEFINITION-INITARGS"
2037                "SLOT-DEFINITION-INITFORM"
2038                "SLOT-DEFINITION-INITFUNCTION"
2039                "SLOT-DEFINITION-LOCATION"
2040                "SLOT-DEFINITION-NAME"
2041                "SLOT-DEFINITION-READERS"
2042                "SLOT-DEFINITION-WRITERS"
2043                "SLOT-DEFINITION-TYPE"
2044                "SLOT-MAKUNBOUND-USING-CLASS"
2045                "SLOT-VALUE-USING-CLASS"
2046                "SPECIALIZER"
2047                "SPECIALIZER-DIRECT-GENERIC-FUNCTIONS"
2048                "SPECIALIZER-DIRECT-METHODS"
2049                "STANDARD-ACCESSOR-METHOD"
2050                "STANDARD-DIRECT-SLOT-DEFINITION"
2051                "STANDARD-EFFECTIVE-SLOT-DEFINITION"
2052                "STANDARD-INSTANCE-ACCESS"
2053                "STANDARD-READER-METHOD"
2054                "STANDARD-SLOT-DEFINITION"
2055                "STANDARD-WRITER-METHOD"
2056                "UPDATE-DEPENDENT"
2057                "VALIDATE-SUPERCLASS"
2058                "WRITER-METHOD-CLASS"))
2060    #s(sb-cold:package-data
2061       :name "SB!PCL"
2062       :doc
2063       "semi-public: This package includes useful meta-object protocol
2064 extensions, but even they are not guaranteed to be present in later
2065 versions of SBCL, and the other stuff in here is definitely not
2066 guaranteed to be present in later versions of SBCL.  Use of this
2067 package is deprecated in favour of SB-MOP."
2068       :use ("CL" "SB!MOP" "SB!INT" "SB!EXT" "SB!WALKER" "SB!KERNEL")
2069       ;; experimental SBCL-only (for now) symbols
2070       :export ("MAKE-METHOD-SPECIALIZERS-FORM"
2071                "PARSE-SPECIALIZER-USING-CLASS"
2072                "UNPARSE-SPECIALIZER-USING-CLASS")
2073       ;; FIXME: After a little while, these reexports can probably go
2074       ;; away, as they're superseded by the use of SB-MOP as the
2075       ;; publically-accessible package.
2076       :reexport ( ;; CL symbols
2077                  "ADD-METHOD"
2078                  "ALLOCATE-INSTANCE"
2079                  "CLASS-NAME" "COMPUTE-APPLICABLE-METHODS"
2080                  "ENSURE-GENERIC-FUNCTION" "MAKE-INSTANCE"
2081                  "METHOD-QUALIFIERS" "REMOVE-METHOD"
2082                  ;; MOP symbols
2083                  "ADD-DEPENDENT"
2084                  "ADD-DIRECT-METHOD"
2085                  "ADD-DIRECT-SUBCLASS"
2086                  "CLASS-DEFAULT-INITARGS"
2087                  "CLASS-DIRECT-DEFAULT-INITARGS"
2088                  "CLASS-DIRECT-SLOTS"
2089                  "CLASS-DIRECT-SUBCLASSES"
2090                  "CLASS-DIRECT-SUPERCLASSES"
2091                  "CLASS-FINALIZED-P"
2092                  "CLASS-PRECEDENCE-LIST"
2093                  "CLASS-PROTOTYPE"
2094                  "CLASS-SLOTS"
2095                  "COMPUTE-APPLICABLE-METHODS-USING-CLASSES"
2096                  "COMPUTE-CLASS-PRECEDENCE-LIST"
2097                  "COMPUTE-DEFAULT-INITARGS"
2098                  "COMPUTE-DISCRIMINATING-FUNCTION"
2099                  "COMPUTE-EFFECTIVE-METHOD"
2100                  "COMPUTE-EFFECTIVE-SLOT-DEFINITION"
2101                  "COMPUTE-SLOTS"
2102                  "DIRECT-SLOT-DEFINITION"
2103                  "DIRECT-SLOT-DEFINITION-CLASS"
2104                  "EFFECTIVE-SLOT-DEFINITION"
2105                  "EFFECTIVE-SLOT-DEFINITION-CLASS"
2106                  "ENSURE-CLASS"
2107                  "ENSURE-CLASS-USING-CLASS"
2108                  "ENSURE-GENERIC-FUNCTION-USING-CLASS"
2109                  "EQL-SPECIALIZER"
2110                  "EQL-SPECIALIZER-OBJECT"
2111                  "EXTRACT-LAMBDA-LIST"
2112                  "EXTRACT-SPECIALIZER-NAMES"
2113                  "FINALIZE-INHERITANCE"
2114                  "FIND-METHOD-COMBINATION"
2115                  "FORWARD-REFERENCED-CLASS"
2116                  "FUNCALLABLE-STANDARD-CLASS"
2117                  "FUNCALLABLE-STANDARD-INSTANCE-ACCESS"
2118                  "FUNCALLABLE-STANDARD-OBJECT"
2119                  "GENERIC-FUNCTION-ARGUMENT-PRECEDENCE-ORDER"
2120                  "GENERIC-FUNCTION-DECLARATIONS"
2121                  "GENERIC-FUNCTION-LAMBDA-LIST"
2122                  "GENERIC-FUNCTION-METHOD-CLASS"
2123                  "GENERIC-FUNCTION-METHOD-COMBINATION"
2124                  "GENERIC-FUNCTION-METHODS"
2125                  "GENERIC-FUNCTION-NAME"
2126                  "INTERN-EQL-SPECIALIZER"
2127                  "MAKE-METHOD-LAMBDA"
2128                  "MAP-DEPENDENTS"
2129                  "METHOD-FUNCTION"
2130                  "METHOD-GENERIC-FUNCTION"
2131                  "METHOD-LAMBDA-LIST"
2132                  "METHOD-SPECIALIZERS"
2133                  "ACCESSOR-METHOD-SLOT-DEFINITION"
2134                  "READER-METHOD-CLASS"
2135                  "REMOVE-DEPENDENT"
2136                  "REMOVE-DIRECT-METHOD"
2137                  "REMOVE-DIRECT-SUBCLASS"
2138                  "SET-FUNCALLABLE-INSTANCE-FUNCTION"
2139                  "SLOT-BOUNDP-USING-CLASS"
2140                  "SLOT-DEFINITION"
2141                  "SLOT-DEFINITION-ALLOCATION"
2142                  "SLOT-DEFINITION-INITARGS"
2143                  "SLOT-DEFINITION-INITFORM"
2144                  "SLOT-DEFINITION-INITFUNCTION"
2145                  "SLOT-DEFINITION-LOCATION"
2146                  "SLOT-DEFINITION-NAME"
2147                  "SLOT-DEFINITION-READERS"
2148                  "SLOT-DEFINITION-WRITERS"
2149                  "SLOT-DEFINITION-TYPE"
2150                  "SLOT-MAKUNBOUND-USING-CLASS"
2151                  "SLOT-VALUE-USING-CLASS"
2152                  "SPECIALIZER"
2153                  "SPECIALIZER-DIRECT-GENERIC-FUNCTIONS"
2154                  "SPECIALIZER-DIRECT-METHODS"
2155                  "STANDARD-ACCESSOR-METHOD"
2156                  "STANDARD-DIRECT-SLOT-DEFINITION"
2157                  "STANDARD-EFFECTIVE-SLOT-DEFINITION"
2158                  "STANDARD-INSTANCE-ACCESS"
2159                  "STANDARD-READER-METHOD"
2160                  "STANDARD-SLOT-DEFINITION"
2161                  "STANDARD-WRITER-METHOD"
2162                  "UPDATE-DEPENDENT"
2163                  "VALIDATE-SUPERCLASS"
2164                  "WRITER-METHOD-CLASS"))
2166    #s(sb-cold:package-data
2167       :name "SB!PRETTY"
2168       :doc "private: implementation of pretty-printing"
2169       :use ("CL" "SB!EXT" "SB!INT" "SB!KERNEL")
2170       :export ("OUTPUT-PRETTY-OBJECT"
2171                "PRETTY-STREAM" "PRETTY-STREAM-P"
2172                "PPRINT-DISPATCH-TABLE"
2173                "!PPRINT-COLD-INIT"))
2175    #s(sb-cold:package-data
2176       :name "SB!PROFILE"
2177       :doc "public: the interface to the profiler"
2178       :use ("CL" "SB!EXT" "SB!INT" "SB!KERNEL")
2179       :export ("PROFILE" "REPORT" "RESET" "UNPROFILE"))
2181    #s(sb-cold:package-data
2182       :name "SB!SEQUENCE"
2183       :doc "semi-public: implements something which might eventually
2184 be submitted as a CDR"
2185       :use ()
2186       :export ("DOSEQUENCE"
2188                "MAKE-SEQUENCE-ITERATOR" "MAKE-SIMPLE-SEQUENCE-ITERATOR"
2190                "ITERATOR-STEP" "ITERATOR-ENDP" "ITERATOR-ELEMENT"
2191                "ITERATOR-INDEX" "ITERATOR-COPY"
2193                "WITH-SEQUENCE-ITERATOR" "WITH-SEQUENCE-ITERATOR-FUNCTIONS"
2195                "CANONIZE-TEST" "CANONIZE-KEY"
2197                "LENGTH" "ELT"
2198                "MAKE-SEQUENCE-LIKE" "ADJUST-SEQUENCE"
2200                "COUNT" "COUNT-IF" "COUNT-IF-NOT"
2201                "FIND" "FIND-IF" "FIND-IF-NOT"
2202                "POSITION" "POSITION-IF" "POSITION-IF-NOT"
2203                "SUBSEQ" "COPY-SEQ" "FILL"
2204                "NSUBSTITUTE" "NSUBSTITUTE-IF" "NSUBSTITUTE-IF-NOT"
2205                "SUBSTITUTE" "SUBSTITUTE-IF" "SUBSTITUTE-IF-NOT"
2206                "REPLACE" "REVERSE" "NREVERSE" "REDUCE"
2207                "MISMATCH" "SEARCH"
2208                "DELETE" "DELETE-IF" "DELETE-IF-NOT"
2209                "REMOVE" "REMOVE-IF" "REMOVE-IF-NOT"
2210                "DELETE-DUPLICATES" "REMOVE-DUPLICATES" "SORT" "STABLE-SORT"))
2212    #s(sb-cold:package-data
2213       :name "SB!SYS"
2214       :doc
2215       "private: In theory, this \"contains functions and information
2216 necessary for system interfacing\" (said cmu-user.tex at the time
2217 of the SBCL code fork). That probably was and is a good idea, but in
2218 practice, the distinctions between this package and SB-KERNEL
2219 and even SB-VM seem to have become somewhat blurred over the years.
2220 Some anomalies (e.g. FIND-IF-IN-CLOSURE being in SB-SYS instead of
2221 SB-KERNEL) have been undone, but probably more remain."
2222       :use ("CL" "SB!EXT" "SB!INT")
2223       :export (;; FIXME: %PRIMITIVE shouldn't be here. (I now know that %SYS
2224                ;; is for OS-dependent stuff. %PRIMITIVE should probably be in
2225                ;; SB!KERNEL.)
2226                "%PRIMITIVE"
2227                "%STANDARD-CHAR-P"
2228                "*ALLOW-WITH-INTERRUPTS*"
2229                "*INTERRUPTS-ENABLED*"
2230                "*INTERRUPT-PENDING*"
2231                "*LINKAGE-INFO*"
2232                "*LONG-SITE-NAME*" "*SHORT-SITE-NAME*"
2233                "*PERIODIC-POLLING-FUNCTION*"
2234                "*PERIODIC-POLLING-PERIOD*"
2235                "*RUNTIME-DLHANDLE*"
2236                "*SHARED-OBJECTS*"
2237                "*STATIC-FOREIGN-SYMBOLS*"
2238                "*STDERR*" "*STDIN*"
2239                "*STDOUT*"
2240                "*TTY*"
2241                "ADD-FD-HANDLER"
2242                "ALLOCATE-SYSTEM-MEMORY"
2243                "ALLOW-WITH-INTERRUPTS"
2244                "BEEP"
2245                "BREAKPOINT-ERROR"
2246                "CLOSE-SHARED-OBJECTS"
2247                "DEADLINE-TIMEOUT"
2248                "DEALLOCATE-SYSTEM-MEMORY"
2249                "DECODE-TIMEOUT"
2250                "DECODE-INTERNAL-TIME"
2251                "DEFAULT-INTERRUPT"
2252                "DEFER-DEADLINE"
2253                "DYNAMIC-FOREIGN-SYMBOLS-P"
2254                "DLOPEN-OR-LOSE"
2255                "FROB-DO-BODY"
2256                "ENABLE-INTERRUPT"
2257                "ENSURE-DYNAMIC-FOREIGN-SYMBOL-ADDRESS"
2258                "EXTERN-ALIEN-NAME"
2259                "FD-STREAM" "FD-STREAM-FD" "FD-STREAM-P"
2260                "FIND-DYNAMIC-FOREIGN-SYMBOL-ADDRESS"
2261                "FIND-FOREIGN-SYMBOL-ADDRESS"
2262                "FIND-FOREIGN-SYMBOL-IN-TABLE"
2263                "FOREIGN-SYMBOL-SAP"
2264                "FOREIGN-SYMBOL-ADDRESS"
2265                "FOREIGN-SYMBOL-DATAREF-SAP"
2266                "GET-MACHINE-VERSION" "GET-PAGE-SIZE" "GET-SYSTEM-INFO"
2267                "IGNORE-INTERRUPT"
2268                "IN-INTERRUPTION"
2269                "INTERACTIVE-INTERRUPT"
2270                "INT-SAP"
2271                "INVALIDATE-DESCRIPTOR"
2272                "INVOKE-INTERRUPTION"
2273                "IO-TIMEOUT"
2274                "LIST-DYNAMIC-FOREIGN-SYMBOLS"
2275                "MACRO" "MAKE-FD-STREAM"
2276                "MEMORY-FAULT-ERROR"
2277                "MEMMOVE"
2278                "OS-COLD-INIT-OR-REINIT" "OS-CONTEXT-T" "OUTPUT-RAW-BYTES"
2279                "READ-N-BYTES"
2280                "REMOVE-FD-HANDLER"
2281                "REOPEN-SHARED-OBJECTS"
2282                "SAP+" "SAP-"
2283                "SAP-FOREIGN-SYMBOL"
2284                "SAP-INT"
2285                "SAP-REF-16" "SAP-REF-32" "SAP-REF-64" "SAP-REF-WORD"
2286                "SAP-REF-8"
2287                "SAP-REF-DOUBLE" "SAP-REF-LONG"
2288                "SAP-REF-SAP" "SAP-REF-SINGLE"
2289                "SAP<" "SAP<=" "SAP=" "SAP>" "SAP>="
2290                "SCRUB-CONTROL-STACK" "SERVE-ALL-EVENTS"
2291                "SIGNAL-DEADLINE"
2292                "SERVE-EVENT"
2293                "SIGNED-SAP-REF-16" "SIGNED-SAP-REF-32"
2294                "SIGNED-SAP-REF-64" "SIGNED-SAP-REF-WORD" "SIGNED-SAP-REF-8"
2295                ;; FIXME: STRUCTURE!OBJECT stuff probably belongs in SB!KERNEL.
2296                "STRUCTURE!OBJECT" "STRUCTURE!OBJECT-MAKE-LOAD-FORM"
2297                "SYSTEM-AREA-POINTER" "SYSTEM-AREA-POINTER-P"
2298                "SYSTEM-CONDITION" "SYSTEM-CONDITION-ADDRESS"
2299                "SYSTEM-CONDITION-CONTEXT"
2300                "REINIT-INTERNAL-REAL-TIME"
2301                "SYSTEM-INTERNAL-RUN-TIME"
2302                "UNDEFINED-FOREIGN-SYMBOLS-P"
2303                "UPDATE-LINKAGE-TABLE" "VECTOR-SAP"
2304                "WAIT-UNTIL-FD-USABLE"
2305                "WITH-DEADLINE"
2306                "WITH-FD-HANDLER"
2307                "WITH-INTERRUPTS" "WITH-LOCAL-INTERRUPTS"
2308                "WITH-PINNED-OBJECTS" "WITHOUT-GCING"
2309                "WITHOUT-INTERRUPTS"
2310                "WITH-INTERRUPT-BINDINGS"
2311                "WORDS"))
2313    #s(sb-cold:package-data
2314       :name "SB!UNIX"
2315       :doc
2316       "private: a wrapper layer for SBCL itself to use when talking
2317 with an underlying Unix-y operating system.
2318 This was a public package in CMU CL, but that was different.
2319 CMU CL's UNIX package tried to provide a comprehensive,
2320 stable Unix interface suitable for the end user.
2321 This package only tries to implement what happens to be
2322 needed by the current implementation of SBCL, and makes
2323 no guarantees of interface stability."
2324       :use ("CL" "SB!ALIEN" "SB!EXT" "SB!INT" "SB!SYS")
2325       :export ( ;; wrappers around Unix stuff to give just what Lisp needs
2326                "NANOSLEEP"
2327                "UID-USERNAME"
2328                "UID-HOMEDIR"
2329                "WITH-RESTARTED-SYSCALL"
2330                "SB-MKSTEMP"
2332                ;; stuff with a one-to-one mapping to Unix constructs
2333                "D-INO" "D-NAME" "D-NAMLEN" "D-OFF" "D-RECLEN" "DEV-T" "DIRECT"
2334                "EXECGRP" "EXECOTH" "EXECOWN" "F-DUPFD" "F-GETFD" "F-GETFL"
2335                "F-GETOWN" "F-SETFD" "F-SETFL" "F-SETOWN" "FAPPEND" "FASYNC"
2336                "FCREAT" "FEXCL" "FIONREAD" "FNDELAY" "FTRUNC" "F_OK" "GID-T"
2337                "INO-T" "UNIX-ACCESS" "UNIX-SETITIMER" "UNIX-GETITIMER"
2338                "KBDCGET" "KBDCRESET"
2339                "KBDCRST" "KBDCSET" "KBDCSSTD" "KBDGCLICK" "KBDSCLICK" "KBDSGET"
2340                "L_INCR" "L_SET" "L_XTND" "OFF-T" "O_APPEND" "O_CREAT" "O_EXCL"
2341                "O_RDONLY" "O_RDWR" "O_TRUNC" "O_WRONLY" "POSIX-GETCWD"
2342                "POSIX-GETCWD/" "READGRP" "READOTH" "READOWN" "RLIM-CUR"
2343                "RLIM-MAX" "RU-IDRSS" "RU-INBLOCK" "RU-ISRSS" "RU-IXRSS"
2344                "RU-MAJFLT" "RU-MAXRSS" "RU-MINFLT" "RU-MSGRCV" "RU-MSGSND"
2345                "RU-NIVCSW" "RU-NSIGNALS" "RU-NSWAP" "RU-NVCSW" "RU-OUBLOCK"
2346                "RU-STIME" "RU-UTIME" "RUSAGE_CHILDREN" "RUSAGE_SELF" "RUSEAGE"
2347                "R_OK" "S-IEXEC" "S-IFBLK" "S-IFCHR" "S-IFDIR" "S-IFIFO" "S-IFLNK" "S-IFMT"
2348                "S-IFREG" "S-IFSOCK" "S-IREAD" "S-ISGID" "S-ISUID" "S-ISVTX"
2349                "S-IWRITE" "SAVETEXT" "SB-MKSTEMP" "SC-MASK" "SC-ONSTACK"
2350                "SETUIDEXEC" "SG-ERASE" "SG-FLAGS" "SG-ISPEED" "SG-KILL"
2351                "SG-OSPEED" "SGTTYB" "SIZE-T" "ST-ATIME" "ST-BLKSIZE" "ST-BLOCKS"
2352                "ST-CTIME" "ST-DEV" "ST-GID" "ST-MODE" "ST-MTIME" "ST-NLINK"
2353                "ST-RDEV" "ST-SIZE" "ST-UID" "STAT" "TERMINAL-SPEEDS" "TIME-T"
2354                "TIMEVAL" "TIMEZONE" "TIOCFLUSH" "TIOCGETC" "TIOCGETP" "TIOCGLTC"
2355                "TIOCGPGRP" "TIOCGWINSZ" "TIOCNOTTY" "TIOCSETC" "TIOCSETP"
2356                "TIOCSLTC" "TIOCSPGRP" "TIOCSWINSZ" "TV-SEC" "TV-USEC"
2357                "TZ-DSTTIME" "TZ-MINUTESWEST" "UID-T" "UNIX-CLOSE"
2358                "UNIX-CLOSEDIR" "UNIX-DIRENT-NAME" "UNIX-DUP""UNIX-EXIT"
2359                "UNIX-FILE-MODE" "UNIX-FSTAT"
2360                "UNIX-GETHOSTNAME" "UNIX-GETPID" "UNIX-GETRUSAGE"
2361                "UNIX-GETTIMEOFDAY" "UNIX-GETUID" "UNIX-GID" "UNIX-IOCTL"
2362                "UNIX-ISATTY" "UNIX-LSEEK" "UNIX-LSTAT" "UNIX-MKDIR"
2363                "UNIX-OPEN" "UNIX-OPENDIR" "UNIX-PATHNAME" "UNIX-PID"
2364                "UNIX-PIPE" "UNIX-READ" "UNIX-READDIR" "UNIX-READLINK" "UNIX-REALPATH"
2365                "UNIX-RENAME" "UNIX-SELECT" "UNIX-STAT" "UNIX-UID"
2366                "UNIX-UNLINK" "UNIX-WRITE"
2367                "WINSIZE"
2368                "WRITEGRP" "WRITEOTH" "WRITEOWN" "WS-COL" "WS-ROW" "WS-XPIXEL"
2369                "WS-YPIXEL" "WNOHANG" "WSTOPPED" "WUNTRACED" "W_OK" "X_OK"
2371                ;; signals
2372                "SIGALRM" "SIGBUS" "SIGCHLD" "SIGCONT" "SIGEMT" "SIGFPE"
2373                "SIGHUP" "SIGILL" "SIGINT" "SIGIO" "SIGIOT" "SIGKILL"
2374                "SIGPIPE" "SIGPROF" "SIGQUIT" "SIGSEGV" "SIGSTOP" "SIGSYS"
2375                "SIGTERM" "SIGTRAP" "SIGTSTP" "SIGTTIN" "SIGTTOU" "SIGURG"
2376                "SIGUSR1" "SIGUSR2" "SIGVTALRM" "SIGWAITING" "SIGWINCH"
2377                "SIGXCPU" "SIGXFSZ"
2379                ;; errors
2380                "E2BIG" "EADDRINUSE" "EADDRNOTAVAIL" "EAFNOSUPPORT"
2381                "EAGAIN" "EALREADY" "EBADF" "EBUSY" "ECHILD" "ECONNABORTED"
2382                "ECONNREFUSED" "ECONNRESET" "EDEADLK" "EDESTADDRREQ" "EDOM"
2383                "EDQUOT" "EEXIST" "EFAULT" "EFBIG" "EHOSTDOWN"
2384                "EHOSTUNREACH" "EINPROGRESS" "EINTR" "EINVAL" "EIO"
2385                "EISCONN" "EISDIR" "ELOCAL" "ELOOP" "EMFILE" "EMLINK"
2386                "EMSGSIZE" "ENAMETOOLONG" "ENETDOWN" "ENETRESET"
2387                "ENETUNREACH" "ENFILE" "ENOBUFS" "ENODEV" "ENOENT"
2388                "ENOEXEC" "ENOMEM" "ENOPROTOOPT" "ENOSPC" "ENOTBLK"
2389                "ENOTCONN" "ENOTEMPTY" "ENOTSOCK" "ENOTTY" "ENXIO"
2390                "EOPNOTSUPP" "EPERM" "EPFNOSUPPORT" "EPIPE" "EPROCLIM"
2391                "EPROTONOSUPPORT" "EPROTOTYPE" "ERANGE" "EREMOTE"
2392                "ERESTART" "EROFS" "ESHUTDOWN" "ESOCKTNOSUPPORT" "ESPIPE"
2393                "ESRCH" "ESUCCESS" "ETIMEDOUT" "ETOOMANYREFS" "ETXTBSY"
2394                "EUSERS" "EVICEERR" "EVICEOP" "EWOULDBLOCK" "EXDEV"
2396                "FD-ISSET" "FD-SET" "LTCHARS" "UNIX-FAST-SELECT"
2397                "UNIX-KILL" "CODESET"
2398                "TCSETPGRP" "FD-ZERO" "FD-CLR" "CHECK" "UNIX-RESOLVE-LINKS"
2399                "FD-SETSIZE" "TCGETPGRP" "UNIX-FAST-GETRUSAGE"
2400                "UNIX-KILLPG"
2401                "TIOCSIGSEND"
2402                "C-IFLAG" "C-LFLAG" "C-OFLAG"
2403                "C-CFLAG" "TCSAFLUSH" "C-CC" "SIOCSPGRP" "TERMIOS"
2404                "O_NDELAY" "O_NOCTTY"
2405                "O_NONBLOCK" "TCSANOW" "TCSADRAIN" "TCIFLUSH" "TCOFLUSH"
2406                "TCIOFLUSH" "TTY-IGNBRK" "TTY-BRKINT" "TTY-IGNPAR" "TTY-PARMRK"
2407                "TTY-INPCK" "TTY-ISTRIP" "TTY-INLCR" "TTY-IGNCR" "TTY-ICRNL"
2408                "TTY-IUCLC" "TTY-IXON" "TTY-IXANY" "TTY-IXOFF" "TTY-IENQAK"
2409                "TTY-IMAXBEL" "TTY-OPOST" "TTY-OLCUC" "TTY-ONLCR" "TTY-OCRNL"
2410                "TTY-ONOCR" "TTY-ONLRET" "TTY-OFILL" "TTY-OFDEL" "TTY-ISIG"
2411                "TTY-ICANON" "TTY-XCASE" "TTY-ECHO" "TTY-ECHOE" "TTY-ECHOK"
2412                "TTY-ECHONL" "TTY-NOFLSH" "TTY-IEXTEN" "TTY-TOSTOP" "TTY-ECHOCTL"
2413                "TTY-ECHOPRT" "TTY-ECHOKE"  "TTY-DEFECHO" "TTY-FLUSHO"
2414                "TTY-PENDIN" "TTY-CSTOPB" "TTY-CREAD" "TTY-PARENB" "TTY-PARODD"
2415                "TTY-HUPCL" "TTY-CLOCAL" "RCV1EN" "XMT1EN" "TTY-LOBLK" "VINTR"
2416                "VQUIT" "VERASE" "VKILL" "VEOF" "VEOL" "VEOL2" "TTY-CBAUD"
2417                "TTY-CSIZE" "TTY-CS5" "TTY-CS6" "TTY-CS7" "TTY-CS8" "VMIN" "VTIME"
2418                "VSUSP" "VSTART" "VSTOP" "VDSUSP"
2419                #!+(or svr4 bsd linux) "O_NDELAY"
2420                #!+(or svr4 linux)
2421                ("EADDRINUSE"
2422                 "EADDRNOTAVAIL" "EADV"
2423                 "EAFNOSUPPORT" "EALREADY" "EBADE" "EBADFD"
2424                 "EBADMSG" "EBADR" "EBADRQC"
2425                 "EBADSLT" "EBFONT" #!+svr4 "ECANCELED"
2426                 "ECHRNG" "ECOMM" "ECONNABORTED"
2427                 "ECONNREFUSED" "ECONNRESET" "EDEADLK"
2428                 "EDEADLOCK" "EDESTADDRREQ" #!+linux "EDOTDOT"
2429                 #!+linux "EDQUOT" "EHOSTDOWN" "EHOSTUNREACH"
2430                 "EIDRM" "EILSEQ" "EINPROGRESS"
2431                 "EISCONN" #!+linux "EISNAM" "EL2HLT"
2432                 "EL2NSYNC" "EL3HLT" "EL3RST" "ELIBACC"
2433                 "ELIBBAD" "ELIBEXEC" "ELIBMAX" "ELIBSCN"
2434                 "ELNRNG" "ELOOP" "EMSGSIZE" "EMULTIHOP"
2435                 "ENAMETOOLONG" #!+linux "ENAVAIL"
2436                 "ENETDOWN" "ENETRESET" "ENETUNREACH" "ENOANO"
2437                 "ENOBUFS" "ENOCSI" "ENODATA" "ENOLCK"
2438                 "ENOLINK" "ENOMSG" "ENONET" "ENOPKG"
2439                 "ENOPROTOOPT" "ENOSR" "ENOSTR" "ENOSYS"
2440                 "ENOTCONN" "ENOTEMPTY" #!+linux "ENOTNAM"
2441                 "ENOTSOCK" #!+svr4 "ENOTSUP" "ENOTUNIQ"
2442                 "EOPNOTSUPP" "EOVERFLOW" "EPFNOSUPPORT"
2443                 "EPROTO" "EPROTONOSUPPORT" "EPROTOTYPE"
2444                 "EREMCHG" "EREMOTE" #!+linux "EREMOTEIO"
2445                 "ERESTART" "ESHUTDOWN" "ESOCKTNOSUPPORT"
2446                 "ESRMNT" "ESTALE" "ESTRPIPE" "ETIME"
2447                 "ETIMEDOUT" "ETOOMANYREFS" #!+linux "EUCLEAN"
2448                 "EUNATCH" "EUSERS" "EWOULDBLOCK" "EXFULL")))
2450    #s(sb-cold:package-data
2451       :name "SB!VM"
2452       :doc
2453       "internal: the default place to hide information about the hardware and data
2454 structure representations"
2455       :use ("CL" "SB!ALIEN" "SB!ALIEN-INTERNALS" "SB!ASSEM" "SB!C"
2456                  "SB!EXT" "SB!FASL" "SB!INT" "SB!KERNEL" "SB!SYS" "SB!UNIX")
2457       :export ("*ALLOC-SIGNAL*"
2458                "*ASSEMBLY-UNIT-LENGTH*"
2459                "*PRIMITIVE-OBJECTS*"
2460                "+HIGHEST-NORMAL-GENERATION+"
2461                "+PSEUDO-STATIC-GENERATION+"
2462                "AFTER-BREAKPOINT-TRAP"
2463                "ANY-REG-SC-NUMBER" "ARRAY-DATA-SLOT" "ARRAY-DIMENSIONS-OFFSET"
2464                "ARRAY-DISPLACED-P-SLOT" "ARRAY-DISPLACEMENT-SLOT"
2465                "ARRAY-DISPLACED-FROM-SLOT"
2466                "ARRAY-ELEMENTS-SLOT" "ARRAY-FILL-POINTER-P-SLOT"
2467                "ARRAY-FILL-POINTER-SLOT" "ATOMIC-FLAG"
2468                "CHARACTER-REG-SC-NUMBER"
2469                "CHARACTER-STACK-SC-NUMBER" "CHARACTER-WIDETAG"
2470                "BIGNUM-DIGITS-OFFSET" "BIGNUM-WIDETAG" "BINDING-SIZE"
2471                "BINDING-SYMBOL-SLOT" "BINDING-VALUE-SLOT" "BREAKPOINT-TRAP"
2472                "N-BYTE-BITS" "BYTE-REG-SC-NUMBER"
2473                "CATCH-BLOCK-CURRENT-CODE-SLOT"
2474                "CATCH-BLOCK-CURRENT-CONT-SLOT" "CATCH-BLOCK-CURRENT-UWP-SLOT"
2475                "CATCH-BLOCK-ENTRY-PC-SLOT" "CATCH-BLOCK-PREVIOUS-CATCH-SLOT"
2476                "CATCH-BLOCK-SC-NUMBER" "CATCH-BLOCK-SIZE" "CATCH-BLOCK-SIZE-SLOT"
2477                "CATCH-BLOCK-TAG-SLOT" "CERROR-TRAP"
2478                "CLOSURE-FUN-SLOT"
2479                "CLOSURE-HEADER-WIDETAG" "CLOSURE-INFO-OFFSET"
2480                "CODE-CODE-SIZE-SLOT" "CODE-CONSTANTS-OFFSET"
2481                "CODE-DEBUG-INFO-SLOT" "CODE-ENTRY-POINTS-SLOT"
2482                "CODE-HEADER-WIDETAG"
2483                "CODE-TRACE-TABLE-OFFSET-SLOT" "COMPLEX-ARRAY-WIDETAG"
2484                "COMPLEX-BIT-VECTOR-WIDETAG" "COMPLEX-DOUBLE-FLOAT-FILLER-SLOT"
2485                "COMPLEX-DOUBLE-FLOAT-IMAG-SLOT" "COMPLEX-DOUBLE-FLOAT-REAL-SLOT"
2486                "COMPLEX-DOUBLE-FLOAT-SIZE" "COMPLEX-DOUBLE-FLOAT-WIDETAG"
2487                "COMPLEX-DOUBLE-REG-SC-NUMBER" "COMPLEX-DOUBLE-STACK-SC-NUMBER"
2488                "COMPLEX-IMAG-SLOT" "COMPLEX-REAL-SLOT"
2489                #!+long-float "COMPLEX-LONG-FLOAT-IMAG-SLOT"
2490                #!+long-float "COMPLEX-LONG-FLOAT-REAL-SLOT"
2491                #!+long-float "COMPLEX-LONG-FLOAT-SIZE"
2492                #!+long-float "COMPLEX-LONG-FLOAT-WIDETAG"
2493                #!+long-float "COMPLEX-LONG-REG-SC-NUMBER"
2494                #!+long-float "COMPLEX-LONG-STACK-SC-NUMBER"
2495                #!-x86-64 #!-x86-64
2496                "COMPLEX-SINGLE-FLOAT-IMAG-SLOT" "COMPLEX-SINGLE-FLOAT-REAL-SLOT"
2497                #!+x86-64
2498                "COMPLEX-SINGLE-FLOAT-DATA-SLOT"
2499                "COMPLEX-SINGLE-FLOAT-SIZE" "COMPLEX-SINGLE-FLOAT-WIDETAG"
2500                "COMPLEX-SINGLE-REG-SC-NUMBER" "COMPLEX-SINGLE-STACK-SC-NUMBER"
2501                "COMPLEX-SIZE" "COMPLEX-BASE-STRING-WIDETAG"
2502                #!+sb-unicode "COMPLEX-CHARACTER-STRING-WIDETAG"
2503                "COMPLEX-WIDETAG"
2504                "COMPLEX-VECTOR-NIL-WIDETAG"
2505                "COMPLEX-VECTOR-WIDETAG" "CONS-CAR-SLOT" "CONS-CDR-SLOT"
2506                "CONS-SIZE" "CONSTANT-SC-NUMBER"
2507                "CONTEXT-FLOATING-POINT-MODES" "CONTEXT-FLOAT-REGISTER"
2508                "CONTEXT-PC" "CONTEXT-REGISTER"
2509                "CONTROL-STACK-SC-NUMBER" "COUNT-NO-OPS"
2510                "*CURRENT-CATCH-BLOCK*"
2511                "CURRENT-FLOAT-TRAP" "DEFINE-FOR-EACH-PRIMITIVE-OBJECT"
2512                "DESCRIPTOR-REG-SC-NUMBER" "DESCRIPTOR-VS-NON-DESCRIPTOR-STORAGE"
2513                "DOUBLE-FLOAT-EXPONENT-BYTE" "DOUBLE-FLOAT-BIAS"
2514                "DOUBLE-FLOAT-DIGITS" "DOUBLE-FLOAT-EXPONENT-BYTE"
2515                "DOUBLE-FLOAT-FILLER-SLOT" "DOUBLE-FLOAT-HIDDEN-BIT"
2516                "DOUBLE-FLOAT-NORMAL-EXPONENT-MAX"
2517                "DOUBLE-FLOAT-NORMAL-EXPONENT-MIN" "DOUBLE-FLOAT-SIGNIFICAND-BYTE"
2518                "DOUBLE-FLOAT-SIZE" "DOUBLE-FLOAT-TRAPPING-NAN-BIT"
2519                "DOUBLE-FLOAT-WIDETAG" "DOUBLE-FLOAT-VALUE-SLOT"
2520                "DOUBLE-INT-CARG-REG-SC-NUMBER" "DOUBLE-REG-SC-NUMBER"
2521                "DOUBLE-STACK-SC-NUMBER"
2522                "ERROR-TRAP" "EVEN-FIXNUM-LOWTAG"
2523                "EXPORTED-STATIC-SYMBOLS"
2524                "FDEFN-FUN-SLOT" "FDEFN-NAME-SLOT" "FDEFN-RAW-ADDR-SLOT"
2525                "FDEFN-SIZE" "FDEFN-WIDETAG" "FIXNUMIZE"
2526                "FIXNUM-TAG-MASK"
2527                "FIXUP-CODE-OBJECT" "FLOAT-DENORMAL-TRAP-BIT"
2528                "FLOAT-DIVIDE-BY-ZERO-TRAP-BIT"
2529                "FLOAT-IMPRECISE-TRAP-BIT" "FLOAT-INVALID-TRAP-BIT"
2530                "FLOAT-OVERFLOW-TRAP-BIT" "FLOAT-SIGN-SHIFT"
2531                "FLOAT-UNDERFLOW-TRAP-BIT" "FLOATING-POINT-MODES"
2532                "FORWARDING-POINTER-TYPE"
2533                "FP-CONSTANT-SC-NUMBER"
2534                "FP-DOUBLE-ZERO-SC-NUMBER" "FP-SINGLE-ZERO-SC-NUMBER"
2535                "FUNCALLABLE-INSTANCE-TRAMPOLINE-SLOT"
2536                "FUNCALLABLE-INSTANCE-HEADER-WIDETAG"
2537                "FUNCALLABLE-INSTANCE-INFO-OFFSET"
2538                "SIMPLE-FUN-ARGLIST-SLOT" "SIMPLE-FUN-CODE-OFFSET"
2539                "FUN-END-BREAKPOINT-TRAP"
2540                "SIMPLE-FUN-HEADER-CODE-OFFSET"
2541                "SIMPLE-FUN-HEADER-NEXT-SLOT"
2542                "SIMPLE-FUN-HEADER-SELF-SLOT"
2543                "SIMPLE-FUN-HEADER-WIDETAG"
2544                "SIMPLE-FUN-HEADER-TYPE-SLOT"
2545                "SIMPLE-FUN-NAME-SLOT"
2546                "SIMPLE-FUN-NEXT-SLOT"
2547                "FUN-POINTER-LOWTAG"
2548                "SIMPLE-FUN-SELF-SLOT"
2549                "SIMPLE-FUN-TYPE-SLOT"
2550                "GENCGC-PAGE-BYTES"
2551                #!+ppc "PSEUDO-ATOMIC-INTERRUPTED-FLAG"
2552                #!+ppc "PSEUDO-ATOMIC-FLAG"
2553                "GENESIS" "HALT-TRAP" "IGNORE-ME-SC-NUMBER"
2554                "IMMEDIATE-CHARACTER-SC-NUMBER" "IMMEDIATE-SAP-SC-NUMBER"
2555                "IMMEDIATE-SC-NUMBER"
2556                #!+inline-constants "CANONICALIZE-INLINE-CONSTANT"
2557                #!+inline-constants "INLINE-CONSTANT-VALUE"
2558                #!+inline-constants "EMIT-CONSTANT-SEGMENT-HEADER"
2559                #!+inline-constants "SORT-INLINE-CONSTANTS"
2560                #!+inline-constants "EMIT-INLINE-CONSTANT"
2561                "INSTANCE-HEADER-WIDETAG" "INSTANCE-POINTER-LOWTAG"
2562                "INSTANCE-SLOTS-OFFSET" "INSTANCE-USAGE"
2563                "INTERIOR-REG-SC-NUMBER" "INTERNAL-ERROR-ARGS"
2564                "INTERRUPTED-FLAG" "LIST-ALLOCATED-OBJECTS" "LIST-POINTER-LOWTAG"
2565                ;; FIXME: Possibly these other parameters (see
2566                ;; compiler/{x86,sparc}/parms.lisp) should be defined
2567                ;; conditionally on #!+LONG-FLOAT)
2568                "LONG-FLOAT-BIAS" "LONG-FLOAT-DIGITS" "LONG-FLOAT-EXPONENT-BYTE"
2569                "LONG-FLOAT-HIDDEN-BIT" "LONG-FLOAT-NORMAL-EXPONENT-MAX"
2570                "LONG-FLOAT-NORMAL-EXPONENT-MIN" "LONG-FLOAT-SIGNIFICAND-BYTE"
2571                #!+long-float "LONG-FLOAT-SIZE"
2572                "LONG-FLOAT-TRAPPING-NAN-BIT"
2573                #!+long-float "LONG-FLOAT-WIDETAG"
2574                #!+long-float "LONG-FLOAT-VALUE-SLOT"
2575                #!+long-float "LONG-REG-SC-NUMBER"
2576                #!+long-float "LONG-STACK-SC-NUMBER"
2577                "LOWTAG-LIMIT" "LOWTAG-MASK"
2578                "LRA-SAVE-OFFSET"
2579                #!+(and sb-thread sb-lutex) "LUTEX-WIDETAG"
2580                "MEMORY-USAGE" "MOST-POSITIVE-COST"
2581                "N-LOWTAG-BITS"
2582                "N-FIXNUM-TAG-BITS"
2583                "N-POSITIVE-FIXNUM-BITS"
2584                "NEGATIVE-IMMEDIATE-SC-NUMBER"
2585                "NFP-SAVE-OFFSET"
2586                "NON-DESCRIPTOR-REG-SC-NUMBER"
2587                "NULL-SC-NUMBER"
2588                "OBJECT-NOT-LIST-TRAP" "OBJECT-NOT-INSTANCE-TRAP"
2589                "OCFP-SAVE-OFFSET"
2590                "ODD-FIXNUM-LOWTAG"
2591                "OFFSET-STATIC-SYMBOL"
2592                "OTHER-IMMEDIATE-0-LOWTAG"
2593                "OTHER-IMMEDIATE-1-LOWTAG"
2594                ;; FIXME: 32/64-bit issues
2595                "OTHER-IMMEDIATE-2-LOWTAG"
2596                "OTHER-IMMEDIATE-3-LOWTAG"
2597                "OTHER-POINTER-LOWTAG"
2598                "PAD-DATA-BLOCK" "PENDING-INTERRUPT-TRAP"
2599                "PRIMITIVE-OBJECT" "PRIMITIVE-OBJECT-WIDETAG"
2600                "PRIMITIVE-OBJECT-LOWTAG" "PRIMITIVE-OBJECT-NAME"
2601                "PRIMITIVE-OBJECT-OPTIONS" "PRIMITIVE-OBJECT-P"
2602                "PRIMITIVE-OBJECT-SIZE" "PRIMITIVE-OBJECT-SLOTS"
2603                "PRIMITIVE-OBJECT-VARIABLE-LENGTH-P" "PRINT-ALLOCATED-OBJECTS"
2604                "RANDOM-IMMEDIATE-SC-NUMBER" "RATIO-DENOMINATOR-SLOT"
2605                "RATIO-NUMERATOR-SLOT" "RATIO-SIZE" "RATIO-WIDETAG"
2606                "*READ-ONLY-SPACE-FREE-POINTER*"
2607                "REGISTER-SAVE-PENALTY" "RETURN-PC-HEADER-WIDETAG"
2608                "RETURN-PC-RETURN-POINT-OFFSET" "RETURN-PC-SAVE-OFFSET"
2609                "SAETP-CTYPE" "SAETP-INITIAL-ELEMENT-DEFAULT"
2610                "SAETP-N-BITS" "SAETP-TYPECODE" "SAETP-PRIMITIVE-TYPE-NAME"
2611                "SAETP-N-PAD-ELEMENTS" "SAETP-SPECIFIER"
2612                "SAETP-COMPLEX-TYPECODE" "SAETP-IMPORTANCE"
2613                "SAETP-FIXNUM-P"
2614                "VALID-BIT-BASH-SAETP-P"
2615                "*SPECIALIZED-ARRAY-ELEMENT-TYPE-PROPERTIES*"
2616                "SANCTIFY-FOR-EXECUTION"
2617                "SAP-POINTER-SLOT" "SAP-REG-SC-NUMBER" "SAP-SIZE"
2618                "SAP-STACK-SC-NUMBER" "SAP-WIDETAG"
2619                "SIGFPE-HANDLER" "SIGNED-REG-SC-NUMBER" "SIGNED-STACK-SC-NUMBER"
2620                "SIGNED-WORD"
2621                "SIMPLE-ARRAY-COMPLEX-DOUBLE-FLOAT-WIDETAG"
2622                #!+long-float "SIMPLE-ARRAY-COMPLEX-LONG-FLOAT-WIDETAG"
2623                "SIMPLE-ARRAY-COMPLEX-SINGLE-FLOAT-WIDETAG"
2624                "SIMPLE-ARRAY-DOUBLE-FLOAT-WIDETAG"
2625                #!+long-float "SIMPLE-ARRAY-LONG-FLOAT-WIDETAG"
2626                "SIMPLE-ARRAY-NIL-WIDETAG"
2627                "SIMPLE-ARRAY-SINGLE-FLOAT-WIDETAG"
2628                "SIMPLE-ARRAY-WIDETAG"
2629                "SIMPLE-ARRAY-UNSIGNED-BYTE-15-WIDETAG"
2630                "SIMPLE-ARRAY-UNSIGNED-BYTE-16-WIDETAG"
2631                "SIMPLE-ARRAY-UNSIGNED-BYTE-2-WIDETAG"
2632                ;; FIXME: 32/64-bit issues
2633                "SIMPLE-ARRAY-UNSIGNED-BYTE-29-WIDETAG"
2634                "SIMPLE-ARRAY-UNSIGNED-BYTE-31-WIDETAG"
2635                "SIMPLE-ARRAY-UNSIGNED-BYTE-32-WIDETAG"
2636                ;; FIXME: 32/64-bit issues
2637                "SIMPLE-ARRAY-UNSIGNED-BYTE-60-WIDETAG"
2638                "SIMPLE-ARRAY-UNSIGNED-BYTE-63-WIDETAG"
2639                "SIMPLE-ARRAY-UNSIGNED-BYTE-64-WIDETAG"
2640                "SIMPLE-ARRAY-UNSIGNED-BYTE-4-WIDETAG"
2641                "SIMPLE-ARRAY-UNSIGNED-BYTE-7-WIDETAG"
2642                "SIMPLE-ARRAY-UNSIGNED-BYTE-8-WIDETAG"
2643                "SIMPLE-ARRAY-SIGNED-BYTE-16-WIDETAG"
2644                ;; FIXME: 32/64-bit issues
2645                "SIMPLE-ARRAY-SIGNED-BYTE-30-WIDETAG"
2646                "SIMPLE-ARRAY-SIGNED-BYTE-32-WIDETAG"
2647                ;; FIXME: 32/64-bit issues
2648                "SIMPLE-ARRAY-SIGNED-BYTE-61-WIDETAG"
2649                "SIMPLE-ARRAY-SIGNED-BYTE-64-WIDETAG"
2650                "SIMPLE-ARRAY-SIGNED-BYTE-8-WIDETAG"
2651                "SIMPLE-BIT-VECTOR-WIDETAG"
2652                "SIMPLE-BASE-STRING-WIDETAG"
2653                #!+sb-unicode "SIMPLE-CHARACTER-STRING-WIDETAG"
2654                "SIMPLE-VECTOR-WIDETAG" "SINGLE-FLOAT-BIAS"
2655                "SINGLE-FLOAT-DIGITS" "SINGLE-FLOAT-EXPONENT-BYTE"
2656                "SINGLE-FLOAT-HIDDEN-BIT" "SINGLE-FLOAT-NORMAL-EXPONENT-MAX"
2657                "SINGLE-FLOAT-NORMAL-EXPONENT-MIN" "SINGLE-FLOAT-SIGNIFICAND-BYTE"
2658                "SINGLE-FLOAT-SIZE" "SINGLE-FLOAT-TRAPPING-NAN-BIT"
2659                "SINGLE-FLOAT-WIDETAG" "SINGLE-FLOAT-VALUE-SLOT"
2660                "SINGLE-INT-CARG-REG-SC-NUMBER"
2661                "SINGLE-REG-SC-NUMBER" "SINGLE-STACK-SC-NUMBER"
2662                "SINGLE-STEP-AROUND-TRAP"
2663                "SINGLE-STEP-BEFORE-TRAP"
2664                "SINGLE-VALUE-RETURN-BYTE-OFFSET" "SLOT-DOCS"
2665                "SLOT-LENGTH" "SLOT-NAME" "SLOT-OFFSET" "SLOT-OPTIONS"
2666                "SLOT-REST-P" "*STATIC-FUNS*" "STATIC-FUN-OFFSET"
2667                "STATIC-SYMBOL-OFFSET" "STATIC-SYMBOL-P"
2668                "*STATIC-SPACE-FREE-POINTER*" "*STATIC-SYMBOLS*"
2669                "STRUCTURE-USAGE"
2670                "SYMBOL-HASH-SLOT" "SYMBOL-HEADER-WIDETAG" "SYMBOL-NAME-SLOT"
2671                "SYMBOL-PACKAGE-SLOT" "SYMBOL-PLIST-SLOT"
2672                "SYMBOL-SIZE" "SYMBOL-UNUSED-SLOT" "SYMBOL-VALUE-SLOT"
2673                "*BINDING-STACK-START*"
2674                "*CONTROL-STACK-START*" "*CONTROL-STACK-END*"
2675                "CONTROL-STACK-POINTER-VALID-P"
2676                "DYNAMIC-SPACE-START" "DYNAMIC-SPACE-END"
2677                #!+gencgc "MAX-DYNAMIC-SPACE-END"
2678                #!+c-stack-is-control-stack "ALTERNATE-SIGNAL-STACK-START"
2679                #!-gencgc "DYNAMIC-0-SPACE-START"
2680                #!-gencgc "DYNAMIC-0-SPACE-END"
2681                #!-gencgc "DYNAMIC-1-SPACE-START"
2682                #!-gencgc "DYNAMIC-1-SPACE-END"
2683                "READ-ONLY-SPACE-START" "READ-ONLY-SPACE-END"
2684                "TARGET-BYTE-ORDER" "TARGET-HEAP-ADDRESS-SPACE"
2685                "STATIC-SPACE-START" "STATIC-SPACE-END"
2686                #!+linkage-table "LINKAGE-TABLE-SPACE-START"
2687                #!+linkage-table "LINKAGE-TABLE-SPACE-END"
2688                #!+linkage-table "LINKAGE-TABLE-ENTRY-SIZE"
2689                "TLS-SIZE"
2690                "TRACE-TABLE-CALL-SITE"
2691                "TRACE-TABLE-FUN-EPILOGUE" "TRACE-TABLE-FUN-PROLOGUE"
2692                "TRACE-TABLE-NORMAL" "N-WIDETAG-BITS" "WIDETAG-MASK"
2693                "UNBOUND-MARKER-WIDETAG"
2694                "NO-TLS-VALUE-MARKER-WIDETAG"
2695                "UNSIGNED-IMMEDIATE-SC-NUMBER"
2696                "UNSIGNED-REG-SC-NUMBER" "UNSIGNED-STACK-SC-NUMBER"
2697                "UNWIND-BLOCK-CURRENT-CODE-SLOT" "UNWIND-BLOCK-CURRENT-CONT-SLOT"
2698                "UNWIND-BLOCK-CURRENT-UWP-SLOT" "UNWIND-BLOCK-ENTRY-PC-SLOT"
2699                "UNWIND-BLOCK-SIZE" "VALUE-CELL-HEADER-WIDETAG" "VALUE-CELL-SIZE"
2700                "VALUE-CELL-VALUE-SLOT" "VECTOR-DATA-OFFSET" "VECTOR-LENGTH-SLOT"
2701                "VECTOR-MUST-REHASH-SUBTYPE" "VECTOR-NORMAL-SUBTYPE"
2702                "VECTOR-VALID-HASHING-SUBTYPE"
2703                "WEAK-POINTER-BROKEN-SLOT" "WEAK-POINTER-NEXT-SLOT"
2704                "WEAK-POINTER-SIZE" "WEAK-POINTER-WIDETAG"
2705                "WEAK-POINTER-VALUE-SLOT"
2706                "WORD" "N-WORD-BITS" "N-WORD-BYTES" "N-MACHINE-WORD-BITS"
2707                "WORD-REG-SC-NUMBER" "WORD-SHIFT"
2708                #!+win32 "CONTEXT-RESTORE-TRAP"
2709                "ZERO-SC-NUMBER"))
2711    #s(sb-cold:package-data
2712       :name "SB!WALKER"
2713       :doc "internal: a code walker used by PCL"
2714       :use ("CL" "SB!INT" "SB!EXT")
2715       :export ("DEFINE-WALKER-TEMPLATE"
2716                "WALK-FORM"
2717                "*WALK-FORM-EXPAND-MACROS-P*"
2718                "VAR-LEXICAL-P" "VAR-SPECIAL-P"
2719                "VAR-GLOBALLY-SPECIAL-P"
2720                "*VAR-DECLARATIONS*" "VAR-DECLARATION"
2722                ;; These were exported from the original PCL version of this
2723                ;; package, but aren't used in SBCL.
2724                ;;"NESTED-WALK-FORM" "MACROEXPAND-ALL"
2725                ))
2727    #!+sb-eval
2728    #s(sb-cold:package-data
2729       :name "SB!EVAL"
2730       :doc "internal: the evaluator implementation used to execute code without compiling it."
2731       :use ("CL" "SB!KERNEL" "SB!EXT")
2732       :reexport ("*EVAL-CALLS*")
2733       :export ("INTERPRETED-FUNCTION"
2734                "INTERPRETED-FUNCTION-P"
2735                "INTERPRETED-FUNCTION-NAME"
2736                "INTERPRETED-FUNCTION-DEBUG-NAME"
2737                "INTERPRETED-FUNCTION-LAMBDA-LIST"
2738                "INTERPRETED-FUNCTION-DEBUG-LAMBDA-LIST"
2739                "INTERPRETED-FUNCTION-DOCUMENTATION"
2740                "INTERPRETED-FUNCTION-BODY"
2741                "INTERPRETED-FUNCTION-SOURCE-LOCATION"
2742                "EVAL-IN-ENVIRONMENT"
2743                "MAKE-NULL-ENVIRONMENT"
2744                "EVAL-IN-NATIVE-ENVIRONMENT"
2745                "PREPARE-FOR-COMPILE"
2746                "COUNT-EVAL-CALLS"
2747                "*EVAL-LEVEL*"))
2749    #!+win32
2750    #s(sb-cold:package-data
2751       :name "SB!WIN32"
2752       :doc "private: a wrapper layer for Win32 functions needed by
2753 SBCL itself"
2754       :use ("CL" "SB!ALIEN" "SB!EXT" "SB!INT" "SB!SYS")
2755       :export ("BOOL"
2756                "DWORD" "FD-CLEAR-INPUT" "FD-LISTEN"
2757                "FLUSH-CONSOLE-INPUT-BUFFER" "FORMAT-MESSAGE"
2758                "GET-LAST-ERROR" "GET-OSFHANDLE" "HANDLE"
2759                "HANDLE-CLEAR-INPUT" "HANDLE-LISTEN" "INT-PTR"
2760                "INVALID-HANDLE" "MILLISLEEP" "PEEK-CONSOLE-INPUT"
2761                "PEEK-NAMED-PIPE" "READ-FILE" "WRITE-FILE"
2762                "WITH-PROCESS-TIMES" "GET-VERSION-EX")))