:use ("CL" "SB!ALIEN" "SB!INT" "SB!SYS" "SB!GRAY")
:export ( ;; Information about how the program was invoked is
;; nonstandard but very useful.
- "*POSIX-ARGV*" "*CORE-PATHNAME*"
+ "*POSIX-ARGV*" "*CORE-PATHNAME*" "*RUNTIME-PATHNAME*"
"POSIX-GETENV" "POSIX-ENVIRON"
;; Atomic operations
"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*"
;; 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
"STANDARD-READTABLE-MODIFIED-ERROR"
"ARRAY-BOUNDING-INDICES-BAD-ERROR"
"SEQUENCE-BOUNDING-INDICES-BAD-ERROR"
-
"SPECIAL-FORM-FUNCTION"
"STYLE-WARN" "SIMPLE-COMPILER-NOTE"
"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"
"%CHECK-BOUND"
"%CHECK-GENERIC-SEQUENCE-BOUNDS"
"%CHECK-VECTOR-SEQUENCE-BOUNDS"
- "%CLOSURE-FUN" "%CLOSURE-INDEX-REF"
"%COMPARE-AND-SWAP-CAR"
"%COMPARE-AND-SWAP-CDR"
"%COMPARE-AND-SWAP-INSTANCE-REF"
"%FIND-POSITION-VECTOR-MACRO" "%FIND-POSITION-IF"
"%FIND-POSITION-IF-VECTOR-MACRO" "%FIND-POSITION-IF-NOT"
"%FIND-POSITION-IF-NOT-VECTOR-MACRO"
- "%FUN-DOC"
- "%FUN-FUN"
- "%FUN-NAME"
"%HYPOT" "%LDB" "%LOG" "%LOGB" "%LOG10"
"%LAST0"
"%LAST1"
"POINTER-HASH"
#!+(or x86 x86-64) "*PSEUDO-ATOMIC-BITS*"
"PUNT-PRINT-IF-TOO-LONG"
+ "RANDOM-DOCUMENTATION"
"RAW-INSTANCE-SLOTS-EQUALP"
"READER-IMPOSSIBLE-NUMBER-ERROR"
"READER-EOF-ERROR"
"UB64-BASH-COPY" "SYSTEM-AREA-UB64-COPY"
"COPY-UB64-TO-SYSTEM-AREA" "COPY-UB64-FROM-SYSTEM-AREA"
+ ;; SIMPLE-FUN type and accessors
+ "SIMPLE-FUN"
+ "SIMPLE-FUN-P"
+ "%SIMPLE-FUN-ARGLIST"
+ "%SIMPLE-FUN-DOC"
+ "%SIMPLE-FUN-INFO"
+ "%SIMPLE-FUN-NAME"
+ "%SIMPLE-FUN-NEXT"
+ "%SIMPLE-FUN-SELF"
+ "%SIMPLE-FUN-TYPE"
+ "%SIMPLE-FUN-XREFS"
+
+ ;; CLOSURE type and accessors
+ "CLOSURE"
+ "CLOSUREP"
+ "DO-CLOSURE-VALUES"
+ "%CLOSURE-FUN"
+ "%CLOSURE-INDEX-REF"
+ "%CLOSURE-VALUES"
+
+ ;; Abstract function accessors
+ "%FUN-DOC"
+ "%FUN-FUN"
+ "%FUN-LAMBDA-LIST"
+ "%FUN-NAME"
+
"FDEFN" "MAKE-FDEFN" "FDEFN-P" "FDEFN-NAME" "FDEFN-FUN"
"FDEFN-MAKUNBOUND" "OUTER-FDEFN"
"%COERCE-CALLABLE-TO-FUN" "FUN-SUBTYPE"
"DD-RAW-LENGTH" "NOTE-NAME-DEFINED" "%CODE-CODE-SIZE"
"DD-SLOTS" "DD-INCLUDE" "SLOT-SETTER-LAMBDA-FORM"
"%IMAGPART" "DSD-ACCESSOR-NAME" "%CODE-DEBUG-INFO"
- "LAYOUT-CLASSOID" "LAYOUT-INVALID" "%SIMPLE-FUN-NAME"
+ "LAYOUT-CLASSOID" "LAYOUT-INVALID"
"DSD-TYPE" "%INSTANCEP" "DEFSTRUCT-SLOT-DESCRIPTION"
- "%SIMPLE-FUN-ARGLIST" "%SIMPLE-FUN-NEXT"
"DD-PREDICATE-NAME"
"CLASSOID-PROPER-NAME" "%NOTE-TYPE-DEFINED" "LAYOUT-INFO"
"%SET-INSTANCE-LAYOUT" "DD-DEFAULT-CONSTRUCTOR"
- "LAYOUT-OF" "%SIMPLE-FUN-SELF" "%REALPART"
+ "LAYOUT-OF" "%REALPART"
"STRUCTURE-CLASSOID-P" "DSD-INDEX" "STRUCTURE-CLASSOID"
- "%INSTANCE-LAYOUT" "LAYOUT-CLOS-HASH" "%SIMPLE-FUN-TYPE"
+ "%INSTANCE-LAYOUT" "LAYOUT-CLOS-HASH"
"PROCLAIM-AS-FUN-NAME" "BECOME-DEFINED-FUN-NAME"
"%NUMERATOR" "CLASSOID-TYPEP" "DSD-READ-ONLY"
"DSD-DEFAULT" "LAYOUT-INHERITS" "DD-LENGTH"
- "%CODE-ENTRY-POINTS" "%DENOMINATOR" "%SIMPLE-FUN-XREFS"
+ "%CODE-ENTRY-POINTS" "%DENOMINATOR"
"%OTHER-POINTER-P"
"STANDARD-CLASSOID" "CLASSOID-OF"
: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"
:export ("INTERPRETED-FUNCTION"
"INTERPRETED-FUNCTION-P"
"INTERPRETED-FUNCTION-NAME"
+ "INTERPRETED-FUNCTION-DEBUG-NAME"
"INTERPRETED-FUNCTION-LAMBDA-LIST"
+ "INTERPRETED-FUNCTION-DEBUG-LAMBDA-LIST"
"INTERPRETED-FUNCTION-DOCUMENTATION"
"INTERPRETED-FUNCTION-BODY"
"INTERPRETED-FUNCTION-SOURCE-LOCATION"
projects / sbcl.git / blobdiff