X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=package-data-list.lisp-expr;h=51c54345ca5b36dfc2fa11c9361cf42c464de87e;hb=df679ed627975948b1cee190f4d79c397588c43e;hp=84c86f85d86f7935b9cf76e7f8d73904f26b84f2;hpb=670010e3f3dcd62efaf23f61abdc73950edb88c6;p=sbcl.git

diff --git a/package-data-list.lisp-expr b/package-data-list.lisp-expr
index 84c86f8..51c5434 100644
--- a/package-data-list.lisp-expr
+++ b/package-data-list.lisp-expr
@@ -1128,6 +1128,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
              "MAKE-NULL-LEXENV" "MAKE-NULL-INTERACTIVE-LEXENV"
 	     "MAKE-NUMERIC-TYPE"
              "MAKE-SINGLE-FLOAT" "MAKE-SPECIALIZABLE-ARRAY"
+	     "MAKE-UNPORTABLE-FLOAT"
              "%MAKE-INSTANCE"
 	     "MAKE-VALUE-CELL"
              "MAKE-VALUES-TYPE"
@@ -1394,7 +1395,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
 
  #s(sb-cold:package-data
     :name "SB!THREAD"
-    :use ("CL" "SB!ALIEN")
+    :use ("CL" "SB!ALIEN" "SB!INT")
     :doc "public (but low-level): native thread support"
     :export ("MAKE-THREAD"
 	     "MAKE-LISTENER-THREAD" "DESTROY-THREAD" "WITH-RECURSIVE-LOCK"
@@ -2007,8 +2008,9 @@ structure representations"
              "SYMBOL-HASH-SLOT" "SYMBOL-HEADER-WIDETAG" "SYMBOL-NAME-SLOT"
              "SYMBOL-PACKAGE-SLOT" "SYMBOL-PLIST-SLOT"
              "SYMBOL-SIZE" "SYMBOL-UNUSED-SLOT" "SYMBOL-VALUE-SLOT"
-             "BINDING-STACK-START" "BINDING-STACK-END" 
-             "CONTROL-STACK-START" "CONTROL-STACK-END"
+             "*BINDING-STACK-START*"
+             "*CONTROL-STACK-START*" "*CONTROL-STACK-END*"
+	     "CONTROL-STACK-POINTER-VALID-P"
              "DYNAMIC-SPACE-START" "DYNAMIC-SPACE-END"
 	     #!+c-stack-is-control-stack "ALTERNATE-SIGNAL-STACK-START"
 	     #!-gencgc "DYNAMIC-0-SPACE-START"