"DECODE-DOUBLE-FLOAT"
#!+long-float "DECODE-LONG-FLOAT"
"DECODE-SINGLE-FLOAT"
+ "DEFINE-STRUCTURE-SLOT-ADDRESSOR"
+ "DEFINE-STRUCTURE-SLOT-COMPARE-AND-EXCHANGE"
"DEFINED-FTYPE-MATCHES-DECLARED-FTYPE-P"
"!DEFSTRUCT-WITH-ALTERNATE-METACLASS" "DESCEND-INTO"
"DISPLACED-TO-ARRAY-TOO-SMALL-ERROR"
"EXTENDED-CHAR-P"
"FAILED-%WITH-ARRAY-DATA" "FDEFINITION-OBJECT"
"FDOCUMENTATION" "FILENAME"
- "FIND-AND-INIT-OR-CHECK-LAYOUT" "FLOAT-EXPONENT"
+ "FIND-AND-INIT-OR-CHECK-LAYOUT"
+ "FIND-DEFSTRUCT-DESCRIPTION"
+ "FLOAT-EXPONENT"
"FLOAT-FORMAT-DIGITS" "FLOAT-FORMAT-NAME"
"FLOAT-FORMAT-MAX" "FLOAT-INT-EXPONENT"
"FLOATING-POINT-EXCEPTION" "FORM" "FORMAT-CONTROL"
#s(sb-cold:package-data
:name "SB!THREAD"
- :use ("CL" "SB!ALIEN" "SB!INT" "SB!SYS")
+ :use ("CL" "SB!ALIEN" "SB!INT" "SB!SYS" "SB!KERNEL")
:doc "public (but low-level): native thread support"
:export ("*CURRENT-THREAD*" "THREAD" "MAKE-THREAD"
"THREAD-NAME" "THREAD-ALIVE-P"
"LIST-ALL-THREADS"
+ "JOIN-THREAD" "JOIN-THREAD-ERROR" "JOIN-THREAD-ERROR-THREAD"
"INTERRUPT-THREAD-ERROR"
"INTERRUPT-THREAD-ERROR-THREAD"
"INTERRUPT-THREAD" "TERMINATE-THREAD" "DESTROY-THREAD"
"%PRIMITIVE"
"%STANDARD-CHAR-P"
"*FOREIGN-LOCK*"
+ "*INTERRUPTS-ENABLED*" "*INTERRUPT-PENDING*"
"*LINKAGE-INFO*"
"*LONG-SITE-NAME*" "*SHORT-SITE-NAME*"
"*RUNTIME-DLHANDLE*"
;; FIXME: STRUCTURE!OBJECT stuff probably belongs in SB!KERNEL.
"STRUCTURE!OBJECT" "STRUCTURE!OBJECT-MAKE-LOAD-FORM"
"SYSTEM-AREA-POINTER" "SYSTEM-AREA-POINTER-P"
- "SYSTEM-INTERNAL-REAL-TIME"
+ "REINIT-INTERNAL-REAL-TIME"
"SYSTEM-INTERNAL-RUN-TIME"
"UNDEFINED-FOREIGN-SYMBOLS-P"
"UPDATE-LINKAGE-TABLE" "VECTOR-SAP"