"ALLOC-ALIEN-STACK-SPACE" "ALLOC-NUMBER-STACK-SPACE"
"ALLOCATE-CODE-OBJECT" "ALLOCATE-FRAME"
"ALLOCATE-DYNAMIC-CODE-OBJECT" "ALLOCATE-FULL-CALL-FRAME"
+ "ALWAYS-TRANSLATABLE"
"ANY" "ARG-COUNT-ERROR" "ASSEMBLE-FILE"
"ATTRIBUTES" "ATTRIBUTES-INTERSECTION" "ATTRIBUTES-UNION"
"ATTRIBUTES=" "BIND"
"INITIAL-FUN-CORE-ENTRY-TYPE-CODE"
"*!LOAD-TIME-VALUES*"
"LOAD-TYPE-PREDICATE"
+ #!+(and sb-thread sb-lutex) "LUTEX-TABLE-CORE-ENTRY-TYPE-CODE"
"NEW-DIRECTORY-CORE-ENTRY-TYPE-CODE"
"OPEN-FASL-OUTPUT" "PAGE-TABLE-CORE-ENTRY-TYPE-CODE"
"READ-ONLY-CORE-SPACE-ID"
: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*"
+ "*POSIX-ARGV*" "*CORE-PATHNAME*"
"POSIX-GETENV" "POSIX-ENVIRON"
;; People have various good reasons to mess with the GC.
:export (;; lambda list keyword extensions
"&MORE"
+ ;; communication between the runtime and Lisp
+ "*CORE-STRING*"
+
;; INFO stuff doesn't belong in a user-visible package, we
;; should be able to change it without apology.
"*INFO-ENVIRONMENT*"
"*SETF-FDEFINITION-HOOK*"
;; error-reporting facilities
- "ENCAPSULATED-CONDITION" "COMPILED-PROGRAM-ERROR"
+ "COMPILED-PROGRAM-ERROR"
+ "ENCAPSULATED-CONDITION"
+ "INTERPRETED-PROGRAM-ERROR"
"SIMPLE-CONTROL-ERROR" "SIMPLE-FILE-ERROR"
"SIMPLE-PARSE-ERROR" "SIMPLE-PROGRAM-ERROR"
"SIMPLE-STREAM-ERROR" "SIMPLE-STORAGE-CONDITION"
"MAKE-TRIVIAL-DEFAULT-PATHNAME"
"PHYSICALIZE-PATHNAME"
"SANE-DEFAULT-PATHNAME-DEFAULTS"
+ "SBCL-HOMEDIR-PATHNAME"
;; PCOUNTERs
"FASTBIG-INCF-PCOUNTER-OR-FIXNUM"
"NTH-BUT-WITH-SANE-ARG-ORDER"
"DEPRECATION-WARNING"
"BIT-VECTOR-="
+ "READ-EVALUATED-FORM"
;; ..and macros..
"COLLECT"
"WITH-UNIQUE-NAMES" "MAKE-GENSYM-LIST"
"ABOUT-TO-MODIFY-SYMBOL-VALUE"
"SYMBOL-SELF-EVALUATING-P"
+ "SELF-EVALUATING-P"
"PRINT-PRETTY-ON-STREAM-P"
"ARRAY-READABLY-PRINTABLE-P"
"LOOKS-LIKE-NAME-OF-SPECIAL-VAR-P"
"*CURRENT-LEVEL-IN-PRINT*"
"*EMPTY-TYPE*" "*GC-INHIBIT*" "*GC-PENDING*"
#!+sb-thread "*STOP-FOR-GC-PENDING*"
- "*CONTROL-STACK-EXHAUSTION-SAP*" "*UNIVERSAL-TYPE*"
+ "*UNIVERSAL-TYPE*"
"*UNIVERSAL-FUN-TYPE*" "*UNPARSE-FUN-TYPE-SIMPLIFY*"
"*WILD-TYPE*" "WORD-LOGICAL-AND" "WORD-LOGICAL-ANDC1"
"WORD-LOGICAL-ANDC2" "WORD-LOGICAL-EQV"
"ALIEN-TYPE-TYPE-ALIEN-TYPE" "ALIEN-TYPE-TYPE-P"
"ALLOCATE-VECTOR" "ALLOCATE-STATIC-VECTOR"
"ASSERT-SYMBOL-HOME-PACKAGE-UNLOCKED"
- "COMPILER-ASSERT-SYMBOL-HOME-PACKAGE-UNLOCKED"
+ "PROGRAM-ASSERT-SYMBOL-HOME-PACKAGE-UNLOCKED"
"DISABLED-PACKAGE-LOCKS"
"WITH-SINGLE-PACKAGE-LOCKED-ERROR"
"PACKAGE-ERROR-FORMAT-ARGUMENTS"
#!+long-float "LONG-STACK-SC-NUMBER"
"LOWTAG-LIMIT" "LOWTAG-MASK"
"LRA-SAVE-OFFSET"
+ #!+(and sb-thread sb-lutex) "LUTEX-WIDETAG"
"MEMORY-USAGE" "MOST-POSITIVE-COST"
"N-LOWTAG-BITS"
"N-FIXNUM-TAG-BITS"
"GET-LAST-ERROR" "GET-OSFHANDLE" "HANDLE"
"HANDLE-CLEAR-INPUT" "HANDLE-LISTEN" "INT-PTR"
"INVALID-HANDLE" "MILLISLEEP" "PEEK-CONSOLE-INPUT"
- "PEEK-NAMED-PIPE" "READ-FILE" "WRITE-FILE")))
+ "PEEK-NAMED-PIPE" "READ-FILE" "WRITE-FILE"
+
+ "GET-PROCESS-TIMES")))