X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=package-data-list.lisp-expr;h=abad96173b0ff66fab1e90dc456ec62ed9253ee1;hb=2419deec84b45d81610dc8d3db610c3e2f7b9486;hp=1db6a6fc12fc28dc85584ba6f82d8f629e0f66f7;hpb=42702bd5e2af3e0042c9f27372c6f5d92335df12;p=sbcl.git

diff --git a/package-data-list.lisp-expr b/package-data-list.lisp-expr
index 1db6a6f..abad961 100644
--- a/package-data-list.lisp-expr
+++ b/package-data-list.lisp-expr
@@ -669,6 +669,10 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*."
                "HASH-TABLE-WEAKNESS" "MAKE-WEAK-POINTER"
                "WEAK-POINTER" "WEAK-POINTER-P" "WEAK-POINTER-VALUE"
 
+               ;; Hash table locking
+               "HASH-TABLE-SYNCHRONIZED-P"
+               "WITH-LOCKED-HASH-TABLE"
+
                ;; If the user knows we're doing IEEE, he might reasonably
                ;; want to do this stuff.
                "FLOAT-DENORMALIZED-P"
@@ -831,6 +835,7 @@ possibly temporariliy, because it might be used internally."
                "SIMPLE-STREAM-ERROR"
                "SIMPLE-STORAGE-CONDITION"
                "SIMPLE-STYLE-WARNING"
+               "TRY-RESTART"
 
                "SPECIAL-FORM-FUNCTION"
                "STYLE-WARN" "SIMPLE-COMPILER-NOTE"
@@ -1313,7 +1318,9 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "LAYOUT-N-UNTAGGED-SLOTS" "LAYOUT-FOR-STD-CLASS-P"
                "LAYOUT-SLOT-TABLE"
                #!+(or x86-64 x86) "%LEA"
-               "LEXENV" "LEXENV-DESIGNATOR" "LINE-LENGTH" "ANSI-STREAM"
+               "LEXENV" "LEXENV-DESIGNATOR" "LINE-LENGTH"
+               "LIST-SUBSEQ*"
+               "ANSI-STREAM"
                "ANSI-STREAM-BIN" "ANSI-STREAM-BOUT" "ANSI-STREAM-CLOSE"
                "ANSI-STREAM-ELEMENT-TYPE" "ANSI-STREAM-IN"
                "ANSI-STREAM-IN-BUFFER" "ANSI-STREAM-IN-INDEX"
@@ -1690,13 +1697,22 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "INTERRUPT-THREAD-ERROR"
                "INTERRUPT-THREAD-ERROR-THREAD"
                "INTERRUPT-THREAD" "TERMINATE-THREAD" "DESTROY-THREAD"
+               "THREAD-YIELD"
                "MUTEX" "MAKE-MUTEX" "MUTEX-NAME" "MUTEX-VALUE"
                "GET-MUTEX" "RELEASE-MUTEX" "WITH-MUTEX"
                "WITH-RECURSIVE-LOCK"
                "WAITQUEUE" "MAKE-WAITQUEUE" "WAITQUEUE-NAME"
                "CONDITION-WAIT" "CONDITION-NOTIFY" "CONDITION-BROADCAST"
                "MAKE-LISTENER-THREAD"
-               "RELEASE-FOREGROUND" "WITH-NEW-SESSION"))
+               "RELEASE-FOREGROUND"
+               "WITH-NEW-SESSION"
+               ;; Semaphores
+               "MAKE-SEMAPHORE"
+               "SEMAPHORE"
+               "SEMAPHORE-NAME"
+               "SEMAPHORE-COUNT"
+               "SIGNAL-SEMAPHORE"
+               "WAIT-ON-SEMAPHORE"))
 
    #s(sb-cold:package-data
       :name "SB!LOOP"
@@ -2000,6 +2016,7 @@ SB-KERNEL) have been undone, but probably more remain."
                "DECODE-TIMEOUT"
                "DECODE-INTERNAL-TIME"
                "DEFAULT-INTERRUPT"
+               "DEFER-DEADLINE"
                "DEPORT-BOOLEAN" "DEPORT-INTEGER"
                "DYNAMIC-FOREIGN-SYMBOLS-P"
                "DLOPEN-OR-LOSE"