#!+sb-simd-pack "%SIMD-PACK-UB32S"
#!+sb-simd-pack "%SIMD-PACK-UB64S"
#!+sb-simd-pack "%SIMD-PACK-DOUBLES"
- #!+sb-simd-pack "%SIMD-PACK-SINGLES"))
+ #!+sb-simd-pack "%SIMD-PACK-SINGLES"
+
+ ;; versioning utility
+ "ASSERT-VERSION->="))
#s(sb-cold:package-data
:name "SB!FORMAT"
:doc
"private: miscellaneous unsupported extensions to the ANSI spec. Much of
the stuff in here originated in CMU CL's EXTENSIONS package and is retained,
-possibly temporariliy, because it might be used internally."
+possibly temporarily, because it might be used internally."
:use ("CL" "SB!ALIEN" "SB!GRAY" "SB!FASL" "SB!SYS")
:export (;; lambda list keyword extensions
"&MORE"
;; symbols from former SB!CONDITIONS
"*HANDLER-CLUSTERS*" "*RESTART-CLUSTERS*"
- "*CONDITION-RESTARTS*" "CASE-FAILURE"
- "NAMESTRING-PARSE-ERROR" "NAMESTRING-PARSE-ERROR-OFFSET"
- "MAKE-RESTART" "COERCE-TO-CONDITION"
+
+ "CASE-FAILURE" "NAMESTRING-PARSE-ERROR"
+ "NAMESTRING-PARSE-ERROR-OFFSET"
+ "MAKE-RESTART" "RESTART-ASSOCIATED-CONDITIONS"
+ "COERCE-TO-CONDITION"
"ALLOCATE-CONDITION"
"CONDITION-SLOT-INITARGS"
"CONDITION-SLOT-INITFORM"
"CONDITION-SLOT-INITFORM-P"
+ "CONDITION-SLOT-INITFUNCTION"
"CONDITION-SLOT-NAME" "CONDITION-SLOT-READERS"
"CONDITION-SLOT-WRITERS"
"STRING<*" "STRING/=*" "%SVSET"
"%SP-STRING-COMPARE" "%SETNTH" "%SETELT"
"%SET-ROW-MAJOR-AREF" "%SET-FILL-POINTER"
- "%SET-FDEFINITION" "%SCHARSET" "%SBITSET"
- "%RPLACD" "%RPLACA" "%PUT" "%CHARSET" "%BITSET"
- "%ASET"))
+ "%SET-FDEFINITION" "%SCHARSET"
+ "%RPLACD" "%RPLACA" "%PUT" "%CHARSET"))
#s(sb-cold:package-data
:name "SB!THREAD"
"THREAD-ERROR"
"THREAD-ERROR-THREAD"
"THREAD-ALIVE-P"
- "THREAD-EMPHEMERAL-P"
+ "THREAD-EPHEMERAL-P"
"THREAD-NAME"
"THREAD-YIELD"
"FOREIGN-THREAD"
"*PERIODIC-POLLING-PERIOD*"
"*RUNTIME-DLHANDLE*"
"*SHARED-OBJECTS*"
+ #!-sb-dynamic-core
"*STATIC-FOREIGN-SYMBOLS*"
"*STDERR*" "*STDIN*"
"*STDOUT*"
"FILE-TRUNCATE-EXISTING"
"FLUSH-CONSOLE-INPUT-BUFFER"
"FLUSH-VIEW-OF-FILE"
- "FORMAT-MESSAGE"
+ "FORMAT-SYSTEM-MESSAGE"
"GET-FILE-ATTRIBUTES"
"GET-FILE-SIZE-EX"
"GET-FILE-TYPE"