: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
"SBCL-HOMEDIR-PATHNAME"
"SIMPLIFY-NAMESTRING"
- ;; PCOUNTERs
- "FASTBIG-INCF-PCOUNTER-OR-FIXNUM"
- "INCF-PCOUNTER"
- "INCF-PCOUNTER-OR-FIXNUM"
- "MAKE-PCOUNTER"
- "PCOUNTER"
- "PCOUNTER->INTEGER"
- "PCOUNTER-OR-FIXNUM->INTEGER"
- "PCOUNTER-P"
"*N-BYTES-FREED-OR-PURIFIED*"
;; miscellaneous non-standard but handy user-level functions..
"SIMPLE-FUN"
"SIMPLE-FUN-P"
"%SIMPLE-FUN-ARGLIST"
+ "%SIMPLE-FUN-DOC"
+ "%SIMPLE-FUN-INFO"
"%SIMPLE-FUN-NAME"
"%SIMPLE-FUN-NEXT"
"%SIMPLE-FUN-SELF"
#!+long-float "COMPLEX-LONG-FLOAT-WIDETAG"
#!+long-float "COMPLEX-LONG-REG-SC-NUMBER"
#!+long-float "COMPLEX-LONG-STACK-SC-NUMBER"
+ #!-x86-64 #!-x86-64
"COMPLEX-SINGLE-FLOAT-IMAG-SLOT" "COMPLEX-SINGLE-FLOAT-REAL-SLOT"
+ #!+x86-64
+ "COMPLEX-SINGLE-FLOAT-DATA-SLOT"
"COMPLEX-SINGLE-FLOAT-SIZE" "COMPLEX-SINGLE-FLOAT-WIDETAG"
"COMPLEX-SINGLE-REG-SC-NUMBER" "COMPLEX-SINGLE-STACK-SC-NUMBER"
"COMPLEX-SIZE" "COMPLEX-BASE-STRING-WIDETAG"