0.9.12.10:

[sbcl.git] / package-data-list.lisp-expr

diff --git a/package-data-list.lisp-expr b/package-data-list.lisp-expr
index 30323fc..3db5059 100644 (file)
--- a/package-data-list.lisp-expr
+++ b/package-data-list.lisp-expr
@@ -58,13 +58,13 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
              "FREE-ALIEN"
              "GET-ERRNO"
              "INT"
-             "LOAD-1-FOREIGN" "LOAD-FOREIGN" "LOAD-SHARED-OBJECT" "LONG"
+             "LOAD-1-FOREIGN" "LOAD-FOREIGN" "LOAD-SHARED-OBJECT" "LONG" "LONG-LONG"
              "MAKE-ALIEN"
              "NULL-ALIEN"
              "SAP-ALIEN" "SHORT" "SIGNED" "SLOT" "STRUCT"
              "UNDEFINED-ALIEN-ERROR"
              "UNSIGNED"
-             "UNSIGNED-CHAR" "UNSIGNED-INT" "UNSIGNED-LONG" "UNSIGNED-SHORT"
+             "UNSIGNED-CHAR" "UNSIGNED-INT" "UNSIGNED-LONG" "UNSIGNED-LONG-LONG" "UNSIGNED-SHORT"
              "UTF8-STRING"
              "VOID"
              "WITH-ALIEN"))
@@ -102,13 +102,14 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
                "ALIEN-VALUE" "ALIEN-VALUE-TYPE"
                "ALIEN-VALUE-SAP" "ALIEN-VALUE-P"
                "ALIEN-VALUES-TYPE" "ALIEN-VALUES-TYPE-P"
-               "ALIEN-VALUES-TYPE-VALUES" "ALIGN-OFFSET" "COMPUTE-ALIEN-REP-TYPE"
+               "ALIEN-VALUES-TYPE-VALUES" "ALIGN-OFFSET" "ALIEN-VOID-TYPE-P"
+               "COMPUTE-ALIEN-REP-TYPE"
                "COMPUTE-DEPORT-LAMBDA" "COMPUTE-DEPOSIT-LAMBDA"
                "COMPUTE-EXTRACT-LAMBDA" "COMPUTE-LISP-REP-TYPE"
                "COMPUTE-NATURALIZE-LAMBDA" "DEFINE-ALIEN-TYPE-CLASS"
                "DEFINE-ALIEN-TYPE-METHOD" "DEFINE-ALIEN-TYPE-TRANSLATOR" "DEPORT"
                "DEPOSIT-ALIEN-VALUE" "DISPOSE-LOCAL-ALIEN"
-               "ENTER-ALIEN-CALLBACK"
+               "*ENTER-ALIEN-CALLBACK*" "ENTER-ALIEN-CALLBACK"
                "EXTRACT-ALIEN-VALUE"
                "HEAP-ALIEN-INFO" "HEAP-ALIEN-INFO-P" "HEAP-ALIEN-INFO-SAP-FORM"
                "HEAP-ALIEN-INFO-TYPE" "INVOKE-ALIEN-TYPE-METHOD" "LOCAL-ALIEN"
@@ -215,6 +216,8 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
                "*SETF-ASSUMED-FBOUNDP*"
                "*SUPPRESS-VALUES-DECLARATION*"
 
+               #!+x86 "SET-FPU-WORD-FOR-C"
+               #!+x86 "SET-FPU-WORD-FOR-LISP"
                "ALLOC-ALIEN-STACK-SPACE" "ALLOC-NUMBER-STACK-SPACE"
                "ALLOCATE-CODE-OBJECT" "ALLOCATE-FRAME"
                "ALLOCATE-DYNAMIC-CODE-OBJECT" "ALLOCATE-FULL-CALL-FRAME"
@@ -247,6 +250,10 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
                "!DEF-PRIMITIVE-TYPE" "!DEF-PRIMITIVE-TYPE-ALIAS"
                "DEFINE-SOURCE-TRANSFORM" "!DEF-VM-SUPPORT-ROUTINE"
                "DEFINE-ASSEMBLY-ROUTINE"
+               "DEFINITION-SOURCE-LOCATION"
+               "DEFINITION-SOURCE-LOCATION-NAMESTRING"
+               "DEFINITION-SOURCE-LOCATION-TOPLEVEL-FORM-NUMBER"
+               "DEFINITION-SOURCE-LOCATION-PLIST"
                "DEFINE-MODULAR-FUN"
                "DEFINE-MOVE-FUN"
                "DEFINE-MOVE-VOP" "DEFINE-STORAGE-BASE"
@@ -306,6 +313,7 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
                "SC-OFFSET-OFFSET" "SC-OFFSET-SCN" "SC-OR-LOSE" "SC-P" "SC-SB"
                "SET-UNWIND-PROTECT" "SET-VECTOR-SUBTYPE"
                "SETUP-CLOSURE-ENVIRONMENT" "SETUP-ENVIRONMENT"
+               "SOURCE-LOCATION"
                "SOURCE-TRANSFORM-LAMBDA"
                "SPECIFY-SAVE-TN"
                "TAIL-CALL" "TAIL-CALL-NAMED"
@@ -363,7 +371,10 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
                "VM-SUPPORT-ROUTINES-GENERATE-CALL-SEQUENCE"
                "VM-SUPPORT-ROUTINES-GENERATE-RETURN-SEQUENCE"
                "VM-SUPPORT-ROUTINES-EMIT-NOP"
-               "VM-SUPPORT-ROUTINES-LOCATION-NUMBER"))
+               "VM-SUPPORT-ROUTINES-LOCATION-NUMBER"
+
+               "WITH-SOURCE-LOCATION"
+               "*SOURCE-LOCATION-THUNKS*"))
 
    #s(sb-cold:package-data
       :name "SB!DEBUG"
@@ -528,7 +539,7 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*."
                "*!LOAD-TIME-VALUES*"
                "LOAD-TYPE-PREDICATE"
                "NEW-DIRECTORY-CORE-ENTRY-TYPE-CODE"
-               "OPEN-FASL-OUTPUT"
+               "OPEN-FASL-OUTPUT" "PAGE-TABLE-CORE-ENTRY-TYPE-CODE"
                "READ-ONLY-CORE-SPACE-ID"
                "*!REVERSED-COLD-TOPLEVELS*"
                "STATIC-CORE-SPACE-ID"
@@ -553,7 +564,7 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*."
       :use ("CL" "SB!ALIEN" "SB!INT" "SB!SYS" "SB!GRAY")
       :export ( ;; Information about how the program was invoked is
                ;; nonstandard but very useful.
-               "*POSIX-ARGV*"
+               "*POSIX-ARGV*" "*CORE-PATHNAME*"
                "POSIX-GETENV" "POSIX-ENVIRON"
 
                ;; People have various good reasons to mess with the GC.
@@ -726,8 +737,17 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*."
                "PROCESS-PID" "PROCESS-PLIST" "PROCESS-PTY" "PROCESS-STATUS"
                "PROCESS-STATUS-HOOK" "PROCESS-WAIT"
 
+               ;; pathnames
+               "NATIVE-PATHNAME"
+               "PARSE-NATIVE-NAMESTRING"
+               "NATIVE-NAMESTRING"
+
                ;; external-format support
-               "OCTETS-TO-STRING" "STRING-TO-OCTETS"))
+               "OCTETS-TO-STRING" "STRING-TO-OCTETS"
+
+               ;; timer
+               "TIMER" "MAKE-TIMER" "TIMER-NAME" "TIMER-SCHEDULED-P"
+               "SCHEDULE-TIMER" "UNSCHEDULE-TIMER" "LIST-ALL-TIMERS"))
 
    #s(sb-cold:package-data
       :name "SB!FORMAT"
@@ -768,6 +788,9 @@ retained, possibly temporariliy, because it might be used internally."
       :export (;; lambda list keyword extensions
                "&MORE"
 
+               ;; communication between the runtime and Lisp
+               "*CORE-STRING*"
+
                ;; INFO stuff doesn't belong in a user-visible package, we
                ;; should be able to change it without apology.
                "*INFO-ENVIRONMENT*"
@@ -778,6 +801,10 @@ retained, possibly temporariliy, because it might be used internally."
                "INFO"
                "MAKE-INFO-ENVIRONMENT"
 
+               ;; Constant form evaluation
+               "CONSTANT-FORM-VALUE"
+               "CONSTANT-TYPEP"
+
                ;; stepping control
                "*STEPPING*" "*STEP*"
 
@@ -794,7 +821,9 @@ retained, possibly temporariliy, because it might be used internally."
                "*SETF-FDEFINITION-HOOK*"
 
                ;; error-reporting facilities
-               "ENCAPSULATED-CONDITION" "COMPILED-PROGRAM-ERROR"
+               "COMPILED-PROGRAM-ERROR"
+               "ENCAPSULATED-CONDITION"
+               "INTERPRETED-PROGRAM-ERROR"
                "SIMPLE-CONTROL-ERROR" "SIMPLE-FILE-ERROR"
                "SIMPLE-PARSE-ERROR" "SIMPLE-PROGRAM-ERROR"
                "SIMPLE-STREAM-ERROR" "SIMPLE-STORAGE-CONDITION"
@@ -889,7 +918,7 @@ retained, possibly temporariliy, because it might be used internally."
                "TYPE-WARNING" "LOCAL-ARGUMENT-MISMATCH"
                "FORMAT-ARGS-MISMATCH" "FORMAT-TOO-FEW-ARGS-WARNING"
                "FORMAT-TOO-MANY-ARGS-WARNING" "EXTENSION-FAILURE"
-               "STRUCTURE-INITARG-NOT-KEYWORD"
+               "STRUCTURE-INITARG-NOT-KEYWORD" "CONSTANT-MODIFIED"
 
                "NAME-CONFLICT" "NAME-CONFLICT-FUNCTION"
                "NAME-CONFLICT-DATUM" "NAME-CONFLICT-SYMBOLS"
@@ -1096,7 +1125,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "%CHECK-BOUND" "%CHECK-VECTOR-SEQUENCE-BOUNDS"
                "%CLOSURE-FUN" "%CLOSURE-INDEX-REF" "%COS" "%COS-QUICK"
                "%COSH" "%DATA-VECTOR-AND-INDEX" "%DEPOSIT-FIELD"
-               "%DOUBLE-FLOAT" "%DPB" "%EXP" "%EXPM1" "%FIND-POSITION"
+               "%DOUBLE-FLOAT" "%DPB" "%EQL" "%EXP" "%EXPM1" "%FIND-POSITION"
                "%FIND-POSITION-VECTOR-MACRO" "%FIND-POSITION-IF"
                "%FIND-POSITION-IF-VECTOR-MACRO" "%FIND-POSITION-IF-NOT"
                "%FIND-POSITION-IF-NOT-VECTOR-MACRO" "%FUN-DOC"
@@ -1139,7 +1168,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "%WITH-ARRAY-DATA" "%WITH-ARRAY-DATA-MACRO"
                "*CURRENT-LEVEL-IN-PRINT*"
                "*EMPTY-TYPE*" "*GC-INHIBIT*" "*GC-PENDING*"
-               #!+sb-thread"*STOP-FOR-GC-PENDING*"
+               #!+sb-thread "*STOP-FOR-GC-PENDING*"
                "*CONTROL-STACK-EXHAUSTION-SAP*" "*UNIVERSAL-TYPE*"
                "*UNIVERSAL-FUN-TYPE*" "*UNPARSE-FUN-TYPE-SIMPLIFY*"
                "*WILD-TYPE*" "WORD-LOGICAL-AND" "WORD-LOGICAL-ANDC1"
@@ -1150,7 +1179,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "ALIEN-TYPE-TYPE-ALIEN-TYPE" "ALIEN-TYPE-TYPE-P"
                "ALLOCATE-VECTOR" "ALLOCATE-STATIC-VECTOR"
                "ASSERT-SYMBOL-HOME-PACKAGE-UNLOCKED"
-               "COMPILER-ASSERT-SYMBOL-HOME-PACKAGE-UNLOCKED"
+               "PROGRAM-ASSERT-SYMBOL-HOME-PACKAGE-UNLOCKED"
                "DISABLED-PACKAGE-LOCKS"
                "WITH-SINGLE-PACKAGE-LOCKED-ERROR"
                "PACKAGE-ERROR-FORMAT-ARGUMENTS"
@@ -1229,6 +1258,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "INTEGER-DECODE-DOUBLE-FLOAT"
                #!+long-float "INTEGER-DECODE-LONG-FLOAT"
                "INTEGER-DECODE-SINGLE-FLOAT" "INTERNAL-ERROR"
+               #!+win32 "HANDLE-WIN32-EXCEPTION"
                "INTERNAL-TIME" "INTERSECTION-TYPE" "INTERSECTION-TYPE-P"
                "INTERSECTION-TYPE-TYPES" "INVALID-ARG-COUNT-ERROR"
                "INVALID-ARRAY-INDEX-ERROR" "INVALID-UNWIND-ERROR"
@@ -1372,7 +1402,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "SCALE-SINGLE-FLOAT" "SEQUENCE-COUNT" "SEQUENCE-END"
                "SEQUENCE-OF-CHECKED-LENGTH-GIVEN-TYPE"
                "SET-ARRAY-HEADER" "SET-HEADER-DATA" "SHIFT-TOWARDS-END"
-               "SHIFT-TOWARDS-START" "SHRINK-VECTOR"
+               "SHIFT-TOWARDS-START" "SHRINK-VECTOR" "%SHRINK-VECTOR"
                ;; FIXME: 32/64-bit issues
                "SIGNED-BYTE-32-P" "SIGNED-BYTE-64-P"
                "SIMPLE-ARRAY-COMPLEX-DOUBLE-FLOAT-P"
@@ -1509,6 +1539,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "BUILT-IN-CLASSOID-TRANSLATION" "RANDOM-LAYOUT-CLOS-HASH"
                "CLASSOID-PCL-CLASS" "FUNCALLABLE-STRUCTURE"
                "FUNCALLABLE-INSTANCE-FUN" "%FUNCALLABLE-INSTANCE-LAYOUT"
+               "%SET-FUNCALLABLE-INSTANCE-LAYOUT"
                "BASIC-STRUCTURE-CLASSOID" "CLASSOID-CELL-CLASSOID"
                "FUNCALLABLE-STRUCTURE-CLASSOID-P" "REGISTER-LAYOUT"
                "FUNCALLABLE-INSTANCE" "RANDOM-FIXNUM-MAX"
@@ -1554,6 +1585,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "!VM-TYPE-COLD-INIT" "!BACKQ-COLD-INIT"
                "!SHARPM-COLD-INIT" "!EARLY-PROCLAIM-COLD-INIT"
                "!LATE-PROCLAIM-COLD-INIT" "!CLASS-FINALIZE"
+               "!CONSTANTP-COLD-INIT"
 
                "GC-REINIT"
                "SIGNAL-COLD-INIT-OR-REINIT"
@@ -1586,14 +1618,13 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
 
    #s(sb-cold:package-data
       :name "SB!THREAD"
-      :use ("CL" "SB!ALIEN" "SB!INT")
+      :use ("CL" "SB!ALIEN" "SB!INT" "SB!SYS")
       :doc "public (but low-level): native thread support"
       :export ("*CURRENT-THREAD*" "THREAD" "MAKE-THREAD"
                "THREAD-NAME" "THREAD-ALIVE-P"
                "LIST-ALL-THREADS"
                "INTERRUPT-THREAD-ERROR"
                "INTERRUPT-THREAD-ERROR-THREAD"
-               "INTERRUPT-THREAD-ERROR-ERRNO"
                "INTERRUPT-THREAD" "TERMINATE-THREAD" "DESTROY-THREAD"
                "MUTEX" "MAKE-MUTEX" "MUTEX-NAME" "MUTEX-VALUE"
                "GET-MUTEX" "RELEASE-MUTEX" "WITH-MUTEX"
@@ -1672,8 +1703,7 @@ ISBN 0-262-61074-4, with exceptions as noted in the User Manual."
                "INTERN-EQL-SPECIALIZER"
                "MAKE-METHOD-LAMBDA"
                "MAP-DEPENDENTS"
-               ;; KLUDGE: See the User Manual
-               ;; "METAOBJECT"
+               "METAOBJECT"
                "METHOD-FUNCTION"
                "METHOD-GENERIC-FUNCTION"
                "METHOD-LAMBDA-LIST"
@@ -1880,7 +1910,11 @@ SB-KERNEL) have been undone, but probably more remain."
                "FOREIGN-SYMBOL-DATAREF-SAP"
                "GET-PAGE-SIZE" "GET-SYSTEM-INFO"
                "IGNORE-INTERRUPT"
-               "INT-SAP" "INVALIDATE-DESCRIPTOR" "IO-TIMEOUT"
+               "IN-INTERRUPTION"
+               "INT-SAP"
+               "INVALIDATE-DESCRIPTOR"
+               "INVOKE-INTERRUPTION"
+               "IO-TIMEOUT"
                "LIST-DYNAMIC-FOREIGN-SYMBOLS"
                "MACRO" "MAKE-FD-STREAM" "MAKE-OBJECT-SET" "MEMMOVE"
                "NATURALIZE-BOOLEAN" "NATURALIZE-INTEGER"
@@ -2142,6 +2176,9 @@ structure representations"
                "SIMPLE-FUN-TYPE-SLOT"
                "FUNCALLABLE-INSTANCE-LAYOUT-SLOT"
                "FUNCALLABLE-INSTANCE-LEXENV-SLOT"
+               "GENCGC-PAGE-SIZE"
+               #!+ppc "PSEUDO-ATOMIC-INTERRUPTED-FLAG"
+               #!+ppc "PSEUDO-ATOMIC-FLAG"
                "GENESIS" "HALT-TRAP" "IGNORE-ME-SC-NUMBER"
                "IMMEDIATE-CHARACTER-SC-NUMBER" "IMMEDIATE-SAP-SC-NUMBER"
                "IMMEDIATE-SC-NUMBER" "*INITIAL-DYNAMIC-SPACE-FREE-POINTER*"
@@ -2271,6 +2308,7 @@ structure representations"
                "TRACE-TABLE-FUN-EPILOGUE" "TRACE-TABLE-FUN-PROLOGUE"
                "TRACE-TABLE-NORMAL" "N-WIDETAG-BITS" "WIDETAG-MASK"
                "UNBOUND-MARKER-WIDETAG"
+               "NO-TLS-VALUE-MARKER-WIDETAG"
                "UNSIGNED-IMMEDIATE-SC-NUMBER"
                "UNSIGNED-REG-SC-NUMBER" "UNSIGNED-STACK-SC-NUMBER"
                "UNWIND-BLOCK-CURRENT-CODE-SLOT" "UNWIND-BLOCK-CURRENT-CONT-SLOT"
@@ -2284,6 +2322,7 @@ structure representations"
                "WEAK-POINTER-VALUE-SLOT"
                "WORD" "N-WORD-BITS" "N-WORD-BYTES" "N-MACHINE-WORD-BITS"
                "WORD-REG-SC-NUMBER" "WORD-SHIFT"
+               #!+win32 "CONTEXT-RESTORE-TRAP"
                "ZERO-SC-NUMBER"))
 
    #s(sb-cold:package-data
@@ -2300,4 +2339,18 @@ structure representations"
                ;; These were exported from the original PCL version of this
                ;; package, but aren't used in SBCL.
                ;;"NESTED-WALK-FORM" "MACROEXPAND-ALL"
-               )))
+               ))
+
+   #!+win32
+   #s(sb-cold:package-data
+      :name "SB!WIN32"
+      :doc "private: a wrapper layer for Win32 functions needed by
+SBCL itself"
+      :use ("CL" "SB!ALIEN" "SB!EXT" "SB!INT" "SB!SYS")
+      :export ("BOOL"
+               "DWORD" "FD-CLEAR-INPUT" "FD-LISTEN"
+               "FLUSH-CONSOLE-INPUT-BUFFER" "FORMAT-MESSAGE"
+               "GET-LAST-ERROR" "GET-OSFHANDLE" "HANDLE"
+               "HANDLE-CLEAR-INPUT" "HANDLE-LISTEN" "INT-PTR"
+               "INVALID-HANDLE" "MILLISLEEP" "PEEK-CONSOLE-INPUT"
+               "PEEK-NAMED-PIPE" "READ-FILE" "WRITE-FILE")))