better type propagation for MULTIPLE-VALUE-BIND

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

diff --git a/package-data-list.lisp-expr b/package-data-list.lisp-expr
index 51ba784..8b80bf2 100644 (file)
--- a/package-data-list.lisp-expr
+++ b/package-data-list.lisp-expr
@@ -163,7 +163,7 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
                "%BIGNUM-SET-LENGTH" "%DIGIT-0-OR-PLUSP"
                "%DIGIT-LOGICAL-SHIFT-RIGHT"
                "%FIXNUM-DIGIT-WITH-CORRECT-SIGN" "%FIXNUM-TO-DIGIT"
-               "%FLOOR" "%LOGAND" "%LOGIOR" "%LOGNOT" "%LOGXOR"
+               "%BIGFLOOR" "%LOGAND" "%LOGIOR" "%LOGNOT" "%LOGXOR"
                "%MULTIPLY" "%MULTIPLY-AND-ADD"
                "%SUBTRACT-WITH-BORROW" "ADD-BIGNUMS"
                "BIGNUM-ASHIFT-LEFT" "BIGNUM-ASHIFT-RIGHT"
@@ -219,6 +219,7 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
                #!+x86 "SET-FPU-WORD-FOR-C"
                #!+x86 "SET-FPU-WORD-FOR-LISP"
                "ALIGN-STACK-POINTER"
+               "ALIEN-FUNCALL-SAVES-FP-AND-PC"
                "ALLOC-ALIEN-STACK-SPACE" "ALLOC-NUMBER-STACK-SPACE"
                "ALLOCATE-CODE-OBJECT" "ALLOCATE-FRAME"
                "ALLOCATE-DYNAMIC-CODE-OBJECT" "ALLOCATE-FULL-CALL-FRAME"
@@ -357,7 +358,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"
@@ -600,6 +601,7 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*."
                "ATOMIC-INCF"
                "ATOMIC-DECF"
                "WORD"
+               "MOST-POSITIVE-WORD"
 
                ;; Time related things
                "CALL-WITH-TIMING"
@@ -688,6 +690,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"
 
@@ -961,6 +965,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
@@ -1276,6 +1282,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "%ATAN" "%ATAN2" "%ATANH"
                "%CALLER-FRAME"
                "%CALLER-PC"
+               "%CEILING"
                "%CHECK-BOUND"
                "%CHECK-GENERIC-SEQUENCE-BOUNDS"
                "%CHECK-VECTOR-SEQUENCE-BOUNDS"
@@ -1289,7 +1296,9 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "%CONCATENATE-TO-STRING"
                "%COS" "%COS-QUICK"
                "%COSH" "%DATA-VECTOR-AND-INDEX" "%DEPOSIT-FIELD"
-               "%DOUBLE-FLOAT" "%DPB" "%EQL" "%EXP" "%EXPM1" "%FIND-POSITION"
+               "%DOUBLE-FLOAT" "%DPB" "%EQL" "%EXP" "%EXPM1"
+               "%FLOOR"
+               "%FIND-POSITION"
                "%FIND-POSITION-VECTOR-MACRO" "%FIND-POSITION-IF"
                "%FIND-POSITION-IF-VECTOR-MACRO" "%FIND-POSITION-IF-NOT"
                "%FIND-POSITION-IF-NOT-VECTOR-MACRO"
@@ -2616,7 +2625,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"