X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=inline;f=package-data-list.lisp-expr;h=91a5c88eb9ca5a7fe3348c8375a17e7968ddc1f6;hb=a37b7e2a4c93398af954c3f03c5412ead1c1c828;hp=971ab42d076c26962a194fbed9c5c4ef9874531f;hpb=6129b1ebc5125c57d6446c061155f5f653f41725;p=sbcl.git

diff --git a/package-data-list.lisp-expr b/package-data-list.lisp-expr
index 971ab42..91a5c88 100644
--- a/package-data-list.lisp-expr
+++ b/package-data-list.lisp-expr
@@ -76,7 +76,8 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
                "%DEREF-ADDR" "%HEAP-ALIEN" "%HEAP-ALIEN-ADDR"
                "%LOCAL-ALIEN-ADDR" "%LOCAL-ALIEN-FORCED-TO-MEMORY-P" "%SAP-ALIEN"
                "%SET-DEREF" "%SET-HEAP-ALIEN" "%SET-LOCAL-ALIEN" "%SET-SLOT"
-               "%SLOT-ADDR" "*VALUES-TYPE-OKAY*" "ALIEN-ARRAY-TYPE"
+               "%SLOT-ADDR" "*SAVED-FP-AND-PCS*" "*VALUES-TYPE-OKAY*"
+               "ALIEN-ARRAY-TYPE"
                "ALIEN-ARRAY-TYPE-DIMENSIONS" "ALIEN-ARRAY-TYPE-ELEMENT-TYPE"
                "ALIEN-ARRAY-TYPE-P" "ALIEN-BOOLEAN-TYPE" "ALIEN-BOOLEAN-TYPE-P"
                "ALIEN-CALLBACK"
@@ -112,8 +113,10 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
                "DEPORT" "DEPORT-ALLOC"
                "DISPOSE-LOCAL-ALIEN"
                "*ENTER-ALIEN-CALLBACK*" "ENTER-ALIEN-CALLBACK"
+               "FIND-SAVED-FP-AND-PC"
                "HEAP-ALIEN-INFO" "HEAP-ALIEN-INFO-P" "HEAP-ALIEN-INFO-SAP-FORM"
-               "HEAP-ALIEN-INFO-TYPE" "INVOKE-ALIEN-TYPE-METHOD" "LOCAL-ALIEN"
+               "HEAP-ALIEN-INFO-TYPE" "INVOKE-ALIEN-TYPE-METHOD"
+               "INVOKE-WITH-SAVED-FP-AND-PC" "LOCAL-ALIEN"
                "LOCAL-ALIEN-INFO" "LOCAL-ALIEN-INFO-FORCE-TO-MEMORY-P"
                "LOCAL-ALIEN-INFO-P" "LOCAL-ALIEN-INFO-TYPE"
                "MAKE-ALIEN-FUN-TYPE" "MAKE-ALIEN-POINTER-TYPE"
@@ -239,6 +242,7 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
                "CHECK-SYMBOL"
                ;; FIXME: 32/64-bit issues
                "CHECK-UNSIGNED-BYTE-32" "CHECK-UNSIGNED-BYTE-64"
+               "CHECK-MOD-FIXNUM"
                "CLOSURE-INIT" "CLOSURE-REF" "CLOSURE-INIT-FROM-FP"
                "CODE-CONSTANT-REF" "CODE-CONSTANT-SET"
                "*CODE-COVERAGE-INFO*"
@@ -275,7 +279,6 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
                "PHYSENV-DEBUG-LIVE-TN" "PHYSENV-LIVE-TN"
                "FAST-SYMBOL-VALUE"
                "FAST-SYMBOL-GLOBAL-VALUE"
-               "FIND-SAVED-FP-AND-PC"
                "FIXUP-NOTE-KIND"
                "FIXUP-NOTE-FIXUP"
                "FIXUP-NOTE-POSITION"
@@ -371,30 +374,33 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
                "*ASSEMBLY-OPTIMIZE*"
                "LARGE-ALLOC"
                "%SET-SIMPLE-FUN-SELF"
-               "VM-SUPPORT-ROUTINES-IMMEDIATE-CONSTANT-SC"
-               "VM-SUPPORT-ROUTINES-BOXED-IMMEDIATE-SC-P"
-               "VM-SUPPORT-ROUTINES-LOCATION-PRINT-NAME"
-               "VM-SUPPORT-ROUTINES-PRIMITIVE-TYPE-OF"
-               "VM-SUPPORT-ROUTINES-PRIMITIVE-TYPE"
-               "VM-SUPPORT-ROUTINES-MAKE-CALL-OUT-TNS"
-               "VM-SUPPORT-ROUTINES-STANDARD-ARG-LOCATION"
-               "VM-SUPPORT-ROUTINES-MAKE-RETURN-PC-PASSING-LOCATION"
-               "VM-SUPPORT-ROUTINES-MAKE-OLD-FP-PASSING-LOCATION"
-               "VM-SUPPORT-ROUTINES-MAKE-OLD-FP-SAVE-LOCATION"
-               "VM-SUPPORT-ROUTINES-MAKE-RETURN-PC-SAVE-LOCATION"
-               "VM-SUPPORT-ROUTINES-MAKE-ARG-COUNT-LOCATION"
-               "VM-SUPPORT-ROUTINES-MAKE-NFP-TN"
-               "VM-SUPPORT-ROUTINES-MAKE-STACK-POINTER-TN"
-               "VM-SUPPORT-ROUTINES-MAKE-NUMBER-STACK-POINTER-TN"
-               "VM-SUPPORT-ROUTINES-MAKE-UNKNOWN-VALUES-LOCATIONS"
-               "VM-SUPPORT-ROUTINES-SELECT-COMPONENT-FORMAT"
-               "VM-SUPPORT-ROUTINES-MAKE-NLX-SP-TN"
-               "VM-SUPPORT-ROUTINES-MAKE-DYNAMIC-STATE-TNS"
-               "VM-SUPPORT-ROUTINES-MAKE-NLX-ENTRY-ARG-START-LOCATION"
-               "VM-SUPPORT-ROUTINES-GENERATE-CALL-SEQUENCE"
-               "VM-SUPPORT-ROUTINES-GENERATE-RETURN-SEQUENCE"
-               "VM-SUPPORT-ROUTINES-EMIT-NOP"
-               "VM-SUPPORT-ROUTINES-LOCATION-NUMBER"
+
+               "IMMEDIATE-CONSTANT-SC"
+               "BOXED-IMMEDIATE-SC-P"
+               "COMBINATION-IMPLEMENTATION-STYLE"
+               "CONVERT-CONDITIONAL-MOVE-P"
+               "LOCATION-PRINT-NAME"
+               "PRIMITIVE-TYPE-OF"
+               "PRIMITIVE-TYPE"
+               "MAKE-CALL-OUT-TNS"
+               "STANDARD-ARG-LOCATION"
+               "MAKE-RETURN-PC-PASSING-LOCATION"
+               "MAKE-OLD-FP-PASSING-LOCATION"
+               "MAKE-OLD-FP-SAVE-LOCATION"
+               "MAKE-RETURN-PC-SAVE-LOCATION"
+               "MAKE-ARG-COUNT-LOCATION"
+               "MAKE-NFP-TN"
+               "MAKE-STACK-POINTER-TN"
+               "MAKE-NUMBER-STACK-POINTER-TN"
+               "MAKE-UNKNOWN-VALUES-LOCATIONS"
+               "SELECT-COMPONENT-FORMAT"
+               "MAKE-NLX-SP-TN"
+               "MAKE-DYNAMIC-STATE-TNS"
+               "MAKE-NLX-ENTRY-ARG-START-LOCATION"
+               "GENERATE-CALL-SEQUENCE"
+               "GENERATE-RETURN-SEQUENCE"
+               "EMIT-NOP"
+               "LOCATION-NUMBER"
 
                "WITH-SOURCE-LOCATION"
                "*SOURCE-LOCATION-THUNKS*"
@@ -410,20 +416,26 @@ is still mixed indiscriminately with low-level internal implementation stuff
 like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*."
       :use ("CL" "SB!EXT" "SB!INT" "SB!SYS" "SB!KERNEL")
       :reexport ("*DEBUG-PRINT-VARIABLE-ALIST*")
-      :export ("*DEBUG-BEGINNER-HELP-P*"
+      :export ("*BACKTRACE-FRAME-COUNT*"
+               "*DEBUG-BEGINNER-HELP-P*"
                "*DEBUG-CONDITION*"
                "*DEBUG-READTABLE*" "*DEBUG-HELP-STRING*"
                "*FLUSH-DEBUG-ERRORS*" "*IN-THE-DEBUGGER*"
-               "*SHOW-ENTRY-POINT-DETAILS*"
+               "*METHOD-FRAME-STYLE*"
                "*TRACE-INDENTATION-STEP*" "*MAX-TRACE-INDENTATION*"
                "*TRACE-FRAME*" "*TRACED-FUN-LIST*"
-               "ARG" "BACKTRACE" "BACKTRACE-AS-LIST" "INTERNAL-DEBUG" "VAR"
+               "ARG"
+               "INTERNAL-DEBUG" "VAR"
                "*PRINT-LOCATION-KIND*"
                "*ONLY-BLOCK-START-LOCATIONS*" "*STACK-TOP-HINT*"
                "*TRACE-VALUES*" "DO-DEBUG-COMMAND"
                "*TRACE-ENCAPSULATE-DEFAULT*"
                "FRAME-HAS-DEBUG-TAG-P"
-               "UNWIND-TO-FRAME-AND-CALL"))
+               "UNWIND-TO-FRAME-AND-CALL"
+               ;; Deprecated
+               "BACKTRACE" "BACKTRACE-AS-LIST" "*SHOW-ENTRY-POINT-DETAILS*"
+               ;; Replaced by
+               "PRINT-BACKTRACE" "LIST-BACKTRACE"))
 
    #s(sb-cold:package-data
       :name "SB!DI"
@@ -708,7 +720,7 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*."
                "ADD-PACKAGE-LOCAL-NICKNAME"
                "REMOVE-PACKAGE-LOCAL-NICKNAME"
                "PACKAGE-LOCAL-NICKNAMES"
-               "PACKAGE-LOCALLY-NICKNAMED-BY"
+               "PACKAGE-LOCALLY-NICKNAMED-BY-LIST"
                ;; behaviour on DEFPACKAGE variance
                "*ON-PACKAGE-VARIANCE*"
 
@@ -817,6 +829,7 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*."
                "QUIT" "EXIT"
                "*ED-FUNCTIONS*"
                "*MODULE-PROVIDER-FUNCTIONS*"
+               "MAP-DIRECTORY"
                "WITH-TIMEOUT" "TIMEOUT"
                "SEED-RANDOM-STATE"
                "TYPEXPAND-1" "TYPEXPAND" "TYPEXPAND-ALL"
@@ -859,7 +872,19 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*."
 
                ;; timer
                "TIMER" "MAKE-TIMER" "TIMER-NAME" "TIMER-SCHEDULED-P"
-               "SCHEDULE-TIMER" "UNSCHEDULE-TIMER" "LIST-ALL-TIMERS"))
+               "SCHEDULE-TIMER" "UNSCHEDULE-TIMER" "LIST-ALL-TIMERS"
+
+               ;; SIMD pack
+               #!+sb-simd-pack "SIMD-PACK"
+               #!+sb-simd-pack "SIMD-PACK-P"
+               #!+sb-simd-pack "%MAKE-SIMD-PACK-UB32"
+               #!+sb-simd-pack "%MAKE-SIMD-PACK-UB64"
+               #!+sb-simd-pack "%MAKE-SIMD-PACK-DOUBLE"
+               #!+sb-simd-pack "%MAKE-SIMD-PACK-SINGLE"
+               #!+sb-simd-pack "%SIMD-PACK-UB32S"
+               #!+sb-simd-pack "%SIMD-PACK-UB64S"
+               #!+sb-simd-pack "%SIMD-PACK-DOUBLES"
+               #!+sb-simd-pack "%SIMD-PACK-SINGLES"))
 
    #s(sb-cold:package-data
       :name "SB!FORMAT"
@@ -1033,6 +1058,9 @@ possibly temporariliy, because it might be used internally."
 
                ;; Deprecating stuff
                "DEFINE-DEPRECATED-FUNCTION"
+               "DEFINE-DEPRECATED-VARIABLE"
+               "DEPRECATED-VARIABLE"
+               "CHECK-DEPRECATED-VARIABLE"
                "EARLY-DEPRECATION-WARNING"
                "LATE-DEPRECATION-WARNING"
                "FINAL-DEPRECATION-WARNING"
@@ -1063,7 +1091,7 @@ possibly temporariliy, because it might be used internally."
 
                ;; ..and macros..
                "COLLECT"
-               "DO-ANONYMOUS" "DOHASH" "DOVECTOR"
+               "DO-ANONYMOUS" "DOVECTOR" "DOHASH" "DOPLIST"
                "NAMED-LET"
                "ONCE-ONLY"
                "DEFENUM"
@@ -1192,7 +1220,7 @@ possibly temporariliy, because it might be used internally."
                "LISTEN-SKIP-WHITESPACE"
                "PACKAGE-INTERNAL-SYMBOL-COUNT" "PACKAGE-EXTERNAL-SYMBOL-COUNT"
                "PARSE-BODY" "PARSE-LAMBDA-LIST" "PARSE-LAMBDA-LIST-LIKE-THING"
-               "PROPER-LIST-OF-LENGTH-P"
+               "PROPER-LIST-OF-LENGTH-P" "PROPER-LIST-P"
                "LIST-OF-LENGTH-AT-LEAST-P"
                "LIST-WITH-LENGTH-P"
                "SINGLETON-P"
@@ -1291,7 +1319,18 @@ integration' (said CMU CL architecture.tex) and that probably was and
 is a good idea, but see SB-SYS re. blurring of boundaries."
       :use ("CL" "SB!ALIEN" "SB!ALIEN-INTERNALS" "SB!BIGNUM"
                  "SB!EXT" "SB!FASL" "SB!INT" "SB!SYS" "SB!GRAY")
-      :reexport ("DEF!STRUCT" "DEF!MACRO")
+      :reexport ("DEF!STRUCT"
+                 "DEF!MACRO"
+                 #!+sb-simd-pack "SIMD-PACK"
+                 #!+sb-simd-pack "SIMD-PACK-P"
+                 #!+sb-simd-pack "%MAKE-SIMD-PACK-UB32"
+                 #!+sb-simd-pack "%MAKE-SIMD-PACK-UB64"
+                 #!+sb-simd-pack "%MAKE-SIMD-PACK-DOUBLE"
+                 #!+sb-simd-pack "%MAKE-SIMD-PACK-SINGLE"
+                 #!+sb-simd-pack "%SIMD-PACK-UB32S"
+                 #!+sb-simd-pack "%SIMD-PACK-UB64S"
+                 #!+sb-simd-pack "%SIMD-PACK-DOUBLES"
+                 #!+sb-simd-pack "%SIMD-PACK-SINGLES")
       :export ("%ACOS"
                "%ACOSH"
                "%ADJOIN"
@@ -1309,6 +1348,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "%ARRAY-FILL-POINTER-P" "%ARRAY-RANK"
                #!+(or x86 x86-64 ppc)
                "%ARRAY-ATOMIC-INCF/WORD"
+               #!+ash-right-vops "%ASH/RIGHT"
                "%ASSOC"
                "%ASSOC-EQ"
                "%ASSOC-IF"
@@ -1358,6 +1398,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "%MAKE-FUNCALLABLE-STRUCTURE-INSTANCE-ALLOCATOR"
                "%MAKE-RATIO" "%MAKE-LISP-OBJ"
                "%MAKE-INSTANCE"
+               #!+sb-simd-pack "%MAKE-SIMD-PACK"
                "%MAKE-STRUCTURE-INSTANCE"
                "%MAKE-STRUCTURE-INSTANCE-ALLOCATOR"
                "%MAP" "%MAP-TO-SIMPLE-VECTOR-ARITY-1"
@@ -1421,6 +1462,9 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "%SET-SYMBOL-HASH"
                "%SIN" "%SIN-QUICK" "%SINGLE-FLOAT"
                "%SINH" "%SQRT" "%SXHASH-SIMPLE-STRING"
+               #!+sb-simd-pack "%SIMD-PACK-TAG"
+               #!+sb-simd-pack "%SIMD-PACK-LOW"
+               #!+sb-simd-pack "%SIMD-PACK-HIGH"
                "%SXHASH-SIMPLE-SUBSTRING" "%TAN" "%TAN-QUICK" "%TANH"
                "%UNARY-ROUND"
                "%UNARY-TRUNCATE"
@@ -1610,7 +1654,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "OBJECT-NOT-DOUBLE-FLOAT-ERROR" "OBJECT-NOT-FIXNUM-ERROR"
                "OBJECT-NOT-FLOAT-ERROR" "OBJECT-NOT-FUN-ERROR"
                "OBJECT-NOT-INSTANCE-ERROR" "OBJECT-NOT-INTEGER-ERROR"
-               "OBJECT-NOT-LIST-ERROR"
+               "OBJECT-NOT-LIST-ERROR" "OBJECT-NOT-MOD-ERROR"
                #!+long-float "OBJECT-NOT-LONG-FLOAT-ERROR"
                "OBJECT-NOT-NUMBER-ERROR" "OBJECT-NOT-RATIO-ERROR"
                "OBJECT-NOT-RATIONAL-ERROR" "OBJECT-NOT-REAL-ERROR"
@@ -1620,6 +1664,8 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "OBJECT-NOT-SIMPLE-ARRAY-COMPLEX-DOUBLE-FLOAT-ERROR"
                #!+long-float
                "OBJECT-NOT-SIMPLE-ARRAY-COMPLEX-LONG-FLOAT-ERROR"
+               #!+sb-simd-pack
+               "OBJECT-NOT-SIMD-PACK-ERROR"
                "OBJECT-NOT-SIMPLE-ARRAY-COMPLEX-SINGLE-FLOAT-ERROR"
                "OBJECT-NOT-SIMPLE-ARRAY-DOUBLE-FLOAT-ERROR"
                "OBJECT-NOT-SIMPLE-ARRAY-ERROR"
@@ -1724,6 +1770,12 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "SINGLE-FLOAT-INT-EXPONENT" "SINGLE-FLOAT-SIGNIFICAND"
                "SINGLE-VALUE-TYPE" "SINGLE-VALUE-SPECIFIER-TYPE"
                "SPECIALIZABLE" "SPECIALIZABLE-VECTOR" "SPECIFIER-TYPE"
+               #!+sb-simd-pack "SIMD-PACK-SINGLE"
+               #!+sb-simd-pack "SIMD-PACK-DOUBLE"
+               #!+sb-simd-pack "SIMD-PACK-INT"
+               #!+sb-simd-pack "SIMD-PACK-TYPE"
+               #!+sb-simd-pack "SIMD-PACK-TYPE-ELEMENT-TYPE"
+               #!+sb-simd-pack "*SIMD-PACK-ELEMENT-TYPES*"
                "STACK-REF" "STREAM-DESIGNATOR" "STRING-DESIGNATOR"
                "STRING-FILL*"
                "STRUCTURE-RAW-SLOT-TYPE-AND-SIZE" "SUB-GC"
@@ -1915,6 +1967,8 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "NAMESTRING-PARSE-ERROR" "NAMESTRING-PARSE-ERROR-OFFSET"
                "DESCRIBE-CONDITION" "MAKE-RESTART" "COERCE-TO-CONDITION"
 
+               "ALLOCATE-CONDITION"
+
                "CONDITION-READER-FUNCTION"
                "CONDITION-WRITER-FUNCTION"
 
@@ -2320,7 +2374,7 @@ be submitted as a CDR"
 
                "CANONIZE-TEST" "CANONIZE-KEY"
 
-               "LENGTH" "ELT"
+               "EMPTYP" "LENGTH" "ELT"
                "MAKE-SEQUENCE-LIKE" "ADJUST-SEQUENCE"
 
                "COUNT" "COUNT-IF" "COUNT-IF-NOT"
@@ -2636,6 +2690,11 @@ structure representations"
                #!+long-float "COMPLEX-LONG-FLOAT-WIDETAG"
                #!+long-float "COMPLEX-LONG-REG-SC-NUMBER"
                #!+long-float "COMPLEX-LONG-STACK-SC-NUMBER"
+               #!+sb-simd-pack "SIMD-PACK-TAG-SLOT"
+               #!+sb-simd-pack "SIMD-PACK-HI-VALUE-SLOT"
+               #!+sb-simd-pack "SIMD-PACK-LO-VALUE-SLOT"
+               #!+sb-simd-pack "SIMD-PACK-SIZE"
+               #!+sb-simd-pack "SIMD-PACK-WIDETAG"
                #!-x86-64 #!-x86-64
                "COMPLEX-SINGLE-FLOAT-IMAG-SLOT" "COMPLEX-SINGLE-FLOAT-REAL-SLOT"
                #!+x86-64
@@ -2903,6 +2962,7 @@ SBCL itself"
                "CLOSE-HANDLE"
                "CREATE-FILE"
                "CREATE-FILE-MAPPING"
+               "CRYPT-GEN-RANDOM"
                "DWORD"
                "FD-CLEAR-INPUT"
                "FD-LISTEN"