fix COERCE to unfinalized extended sequence classes

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

diff --git a/package-data-list.lisp-expr b/package-data-list.lisp-expr
index 4cfabd1..a48e6d9 100644 (file)
--- a/package-data-list.lisp-expr
+++ b/package-data-list.lisp-expr
@@ -53,8 +53,12 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
              "INT"
              "LOAD-1-FOREIGN" "LOAD-FOREIGN" "LOAD-SHARED-OBJECT" "LONG" "LONG-LONG"
              "MAKE-ALIEN"
+             "MAKE-ALIEN-STRING"
              "NULL-ALIEN"
-             "SAP-ALIEN" "SHORT" "SIGNED" "SLOT" "STRUCT"
+             "OFF-T"
+             "SAP-ALIEN" "SHORT" "SIGNED"
+             "SIZE-T"
+             "SLOT" "STRUCT"
              "UNDEFINED-ALIEN-ERROR"
              "UNLOAD-SHARED-OBJECT"
              "UNSIGNED"
@@ -263,6 +267,7 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
                "DEFINE-STORAGE-CLASS" "DEFINE-VOP"
                "DEFKNOWN" "DEFOPTIMIZER"
                "DEFTRANSFORM" "DERIVE-TYPE"
+               "EMIT-BLOCK-HEADER"
                "ENTRY-NODE-INFO-NLX-TAG" "ENTRY-NODE-INFO-ST-TOP"
                "PHYSENV-DEBUG-LIVE-TN" "PHYSENV-LIVE-TN"
                "FAST-SYMBOL-VALUE"
@@ -311,7 +316,9 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
                "%%POP-DX"
                "PREDICATE" "PRIMITIVE-TYPE" "PRIMITIVE-TYPE-OF"
                "PRIMITIVE-TYPE-OR-LOSE" "PRIMITIVE-TYPE-VOP"
-               "PRIMITIVE-TYPE-NAME" "PUSH-VALUES"
+               "PRIMITIVE-TYPE-NAME"
+               "PRIMITIVE-TYPE-INDIRECT-CELL-TYPE"
+               "PUSH-VALUES"
                "READ-PACKED-BIT-VECTOR" "READ-VAR-INTEGER" "READ-VAR-STRING"
                #!+inline-constants "REGISTER-INLINE-CONSTANT"
                "RESET-STACK-POINTER" "RESTORE-DYNAMIC-STATE"
@@ -350,7 +357,7 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
                "MAKE-FUNCALLABLE-INSTANCE-TRAMP"
                "RETURN-SINGLE"
                "NOTE-NEXT-INSTRUCTION"
-               "SET-SLOT"
+               "SET-SLOT" "INIT-SLOT"
                "LOCATION-NUMBER"
                "*COMPONENT-BEING-COMPILED*"
                "BLOCK-NUMBER"
@@ -579,11 +586,15 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*."
       :name "SB!EXT"
       :doc "public: miscellaneous supported extensions to the ANSI Lisp spec"
       :use ("CL" "SB!ALIEN" "SB!INT" "SB!SYS" "SB!GRAY")
-      :export ( ;; Information about how the program was invoked is
+      :export (;; Information about how the program was invoked is
                ;; nonstandard but very useful.
                "*POSIX-ARGV*" "*CORE-PATHNAME*" "*RUNTIME-PATHNAME*"
                "POSIX-GETENV" "POSIX-ENVIRON"
 
+               ;; Customizing initfile locations
+               "*USERINIT-PATHNAME-FUNCTION*"
+               "*SYSINIT-PATHNAME-FUNCTION*"
+
                ;; Atomic operations and types related to them
                "COMPARE-AND-SWAP"
                "ATOMIC-INCF"
@@ -608,6 +619,7 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*."
                "GENERATION-MINIMUM-AGE-BEFORE-GC"
                "GENERATION-NUMBER-OF-GCS"
                "GENERATION-NUMBER-OF-GCS-BEFORE-PROMOTION"
+               "GC-LOGFILE"
 
                ;; Stack allocation control
                "*STACK-ALLOCATE-DYNAMIC-EXTENT*"
@@ -676,6 +688,8 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*."
                "NAME-CONFLICT-DATUM" "NAME-CONFLICT-SYMBOLS"
                "RESOLVE-CONFLICT"
 
+               "PRINT-UNREADABLY"
+
                ;; and a mechanism for controlling same at compile time
                "MUFFLE-CONDITIONS" "UNMUFFLE-CONDITIONS"
 
@@ -852,6 +866,9 @@ possibly temporariliy, because it might be used internally."
                ;; Stack allocation without any questions asked
                "TRULY-DYNAMIC-EXTENT"
 
+               ;; Like WITH-LOCKED-HASH-TABLE, but disabled interrupts
+               "WITH-LOCKED-SYSTEM-TABLE"
+
                ;; generic set implementation
                "ADD-TO-XSET"
                "ALLOC-XSET"
@@ -898,6 +915,10 @@ possibly temporariliy, because it might be used internally."
                ;; hash mixing operations
                "MIX" "MIXF"
 
+               ;; Macroexpansion that doesn't touch special forms
+               "%MACROEXPAND"
+               "%MACROEXPAND-1"
+
                ;; I'm not convinced that FDEFINITIONs are the ideal
                ;; solution, so exposing ways to peek into the system
                ;; seems undesirable, since it makes it harder to get
@@ -942,6 +963,8 @@ possibly temporariliy, because it might be used internally."
                "C-STRING-ENCODING-ERROR" "C-STRING-ENCODING-ERROR-EXTERNAL-FORMAT"
                "C-STRING-DECODING-ERROR" "C-STRING-DECODING-ERROR-EXTERNAL-FORMAT"
                "ATTEMPT-RESYNC" "FORCE-END-OF-FILE"
+               "READ-UNREADABLE-REPLACEMENT"
+
 
                ;; bootstrapping magic, to make things happen both in
                ;; the cross-compilation host compiler's environment and
@@ -1073,6 +1096,7 @@ possibly temporariliy, because it might be used internally."
                "DEFINE-HASH-CACHE"
                "DEFUN-CACHED"
                "DEFINE-CACHED-SYNONYM"
+               "DROP-ALL-HASH-CACHES"
 
                ;; time
                "FORMAT-DECODED-TIME"
@@ -2364,6 +2388,8 @@ This package only tries to implement what happens to be
 needed by the current implementation of SBCL, and makes
 no guarantees of interface stability."
       :use ("CL" "SB!ALIEN" "SB!EXT" "SB!INT" "SB!SYS")
+      :reexport ("OFF-T"
+                 "SIZE-T")
       :export ( ;; wrappers around Unix stuff to give just what Lisp needs
                "NANOSLEEP"
                "UID-USERNAME"
@@ -2381,7 +2407,7 @@ no guarantees of interface stability."
                "INO-T" "UNIX-ACCESS" "UNIX-SETITIMER" "UNIX-GETITIMER"
                "KBDCGET" "KBDCRESET"
                "KBDCRST" "KBDCSET" "KBDCSSTD" "KBDGCLICK" "KBDSCLICK" "KBDSGET"
-               "L_INCR" "L_SET" "L_XTND" "OFF-T" "O_APPEND" "O_CREAT" "O_EXCL"
+               "L_INCR" "L_SET" "L_XTND" "O_APPEND" "O_CREAT" "O_EXCL"
                "O_RDONLY" "O_RDWR" "O_TRUNC" "O_WRONLY" "POSIX-GETCWD"
                "POSIX-GETCWD/" "READGRP" "READOTH" "READOWN" "RLIM-CUR"
                "RLIM-MAX" "RU-IDRSS" "RU-INBLOCK" "RU-ISRSS" "RU-IXRSS"
@@ -2392,7 +2418,7 @@ no guarantees of interface stability."
                "S-IFREG" "S-IFSOCK" "S-IREAD" "S-ISGID" "S-ISUID" "S-ISVTX"
                "S-IWRITE" "SAVETEXT" "SB-MKSTEMP" "SC-MASK" "SC-ONSTACK"
                "SETUIDEXEC" "SG-ERASE" "SG-FLAGS" "SG-ISPEED" "SG-KILL"
-               "SG-OSPEED" "SGTTYB" "SIZE-T" "ST-ATIME" "ST-BLKSIZE" "ST-BLOCKS"
+               "SG-OSPEED" "SGTTYB" "ST-ATIME" "ST-BLKSIZE" "ST-BLOCKS"
                "ST-CTIME" "ST-DEV" "ST-GID" "ST-MODE" "ST-MTIME" "ST-NLINK"
                "ST-RDEV" "ST-SIZE" "ST-UID" "STAT" "TERMINAL-SPEEDS" "TIME-T"
                "TIMEVAL" "TIMEZONE" "TIOCFLUSH" "TIOCGETC" "TIOCGETP" "TIOCGLTC"
@@ -2594,7 +2620,9 @@ structure representations"
                "FUN-POINTER-LOWTAG"
                "SIMPLE-FUN-SELF-SLOT"
                "SIMPLE-FUN-TYPE-SLOT"
-               "GENCGC-PAGE-BYTES"
+               "GENCGC-CARD-BYTES"
+               "GENCGC-ALLOC-GRANULARITY"
+               "GENCGC-RELEASE-GRANULARITY"
                #!+ppc "PSEUDO-ATOMIC-INTERRUPTED-FLAG"
                #!+ppc "PSEUDO-ATOMIC-FLAG"
                "GENESIS" "HALT-TRAP" "IGNORE-ME-SC-NUMBER"
@@ -2647,7 +2675,8 @@ structure representations"
                "PRIMITIVE-OBJECT-LOWTAG" "PRIMITIVE-OBJECT-NAME"
                "PRIMITIVE-OBJECT-OPTIONS" "PRIMITIVE-OBJECT-P"
                "PRIMITIVE-OBJECT-SIZE" "PRIMITIVE-OBJECT-SLOTS"
-               "PRIMITIVE-OBJECT-VARIABLE-LENGTH-P" "PRINT-ALLOCATED-OBJECTS"
+               "PRIMITIVE-OBJECT-VARIABLE-LENGTH-P"
+               "PRINT-ALLOCATED-OBJECTS"
                "RANDOM-IMMEDIATE-SC-NUMBER" "RATIO-DENOMINATOR-SLOT"
                "RATIO-NUMERATOR-SLOT" "RATIO-SIZE" "RATIO-WIDETAG"
                "*READ-ONLY-SPACE-FREE-POINTER*"