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