X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=package-data-list.lisp-expr;h=2d839e28b3e8719caeb39aa2d4d269d7e8356869;hb=226f48b0835db224f61d07879307a809981e812d;hp=f078e71fc1c1b5cb03c04789492f80a3dad2c9d3;hpb=621eebe206ae6c6d0d0897d43247ce5e05c2359a;p=sbcl.git

diff --git a/package-data-list.lisp-expr b/package-data-list.lisp-expr
index f078e71..2d839e2 100644
--- a/package-data-list.lisp-expr
+++ b/package-data-list.lisp-expr
@@ -586,8 +586,9 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*."
                "COMPARE-AND-SWAP"
                "ATOMIC-INCF"
 
-               ;; Timing information
+               ;; Time related things
                "CALL-WITH-TIMING"
+               "GET-TIME-OF-DAY"
 
                ;; People have various good reasons to mess with the GC.
                "*AFTER-GC-HOOKS*"
@@ -696,11 +697,15 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*."
                ;; weak pointers and finalization
                "CANCEL-FINALIZATION"
                "FINALIZE"
-               "HASH-TABLE-WEAKNESS" "MAKE-WEAK-POINTER"
-               "WEAK-POINTER" "WEAK-POINTER-P" "WEAK-POINTER-VALUE"
+               "MAKE-WEAK-POINTER"
+               "WEAK-POINTER"
+               "WEAK-POINTER-P"
+               "WEAK-POINTER-VALUE"
 
-               ;; Hash table locking
+               ;; Hash table extensions
+               "DEFINE-HASH-TABLE-TEST"
                "HASH-TABLE-SYNCHRONIZED-P"
+               "HASH-TABLE-WEAKNESS"
                "WITH-LOCKED-HASH-TABLE"
 
                ;; If the user knows we're doing IEEE, he might reasonably
@@ -900,7 +905,6 @@ possibly temporariliy, because it might be used internally."
                "STANDARD-READTABLE-MODIFIED-ERROR"
                "ARRAY-BOUNDING-INDICES-BAD-ERROR"
                "SEQUENCE-BOUNDING-INDICES-BAD-ERROR"
-
                "SPECIAL-FORM-FUNCTION"
                "STYLE-WARN" "SIMPLE-COMPILER-NOTE"
 
@@ -1122,7 +1126,6 @@ possibly temporariliy, because it might be used internally."
                "GET-FLOATING-POINT-MODES"
                "SET-FLOATING-POINT-MODES"
                "WITH-FLOAT-TRAPS-MASKED"
-               "DEFINE-HASH-TABLE-TEST"
 
                ;; compatibility hacks for old-style CMU CL data formats
                "UNIX-ENVIRONMENT-CMUCL-FROM-SBCL"
@@ -1855,20 +1858,44 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
       :name "SB!THREAD"
       :use ("CL" "SB!ALIEN" "SB!INT" "SB!SYS" "SB!KERNEL")
       :doc "public (but low-level): native thread support"
-      :export ("*CURRENT-THREAD*" "THREAD" "MAKE-THREAD"
-               "THREAD-NAME" "THREAD-ALIVE-P"
-               "LIST-ALL-THREADS"
-               "JOIN-THREAD" "JOIN-THREAD-ERROR" "JOIN-THREAD-ERROR-THREAD"
+      :export ("*CURRENT-THREAD*"
+               "DESTROY-THREAD"
+               "INTERRUPT-THREAD"
                "INTERRUPT-THREAD-ERROR"
                "INTERRUPT-THREAD-ERROR-THREAD"
-               "INTERRUPT-THREAD" "TERMINATE-THREAD" "DESTROY-THREAD"
+               "JOIN-THREAD"
+               "JOIN-THREAD-ERROR"
+               "JOIN-THREAD-ERROR-THREAD"
+               "LIST-ALL-THREADS"
+               "MAKE-THREAD"
+               "SYMBOL-VALUE-IN-THREAD"
+               "SYMBOL-VALUE-IN-THREAD-ERROR"
+               "TERMINATE-THREAD"
+               "THREAD"
+               "THREAD-ERROR"
+               "THREAD-ERROR-THREAD"
+               "THREAD-ALIVE-P"
+               "THREAD-NAME"
                "THREAD-YIELD"
-               "MUTEX" "MAKE-MUTEX" "MUTEX-NAME" "MUTEX-OWNER" "MUTEX-VALUE"
+               ;; Mutexes
+               "GET-MUTEX"
                "HOLDING-MUTEX-P"
-               "GET-MUTEX" "RELEASE-MUTEX" "WITH-MUTEX"
+               "MAKE-MUTEX"
+               "MUTEX"
+               "MUTEX-NAME"
+               "MUTEX-OWNER"
+               "MUTEX-VALUE"
+               "RELEASE-MUTEX"
+               "WITH-MUTEX"
                "WITH-RECURSIVE-LOCK"
-               "WAITQUEUE" "MAKE-WAITQUEUE" "WAITQUEUE-NAME"
-               "CONDITION-WAIT" "CONDITION-NOTIFY" "CONDITION-BROADCAST"
+               ;; Condition variables
+               "CONDITION-BROADCAST"
+               "CONDITION-NOTIFY"
+               "CONDITION-WAIT"
+               "MAKE-WAITQUEUE"
+               "WAITQUEUE"
+               "WAITQUEUE-NAME"
+               ;; Sessions
                "MAKE-LISTENER-THREAD"
                "RELEASE-FOREGROUND"
                "WITH-NEW-SESSION"