;; external-format support
"OCTETS-TO-STRING" "STRING-TO-OCTETS"
+ ;; Whether to use the interpreter or the compiler for EVAL
+ "*EVALUATOR-MODE*"
+
;; timer
"TIMER" "MAKE-TIMER" "TIMER-NAME" "TIMER-SCHEDULED-P"
"SCHEDULE-TIMER" "UNSCHEDULE-TIMER" "LIST-ALL-TIMERS"))
"CHARACTER-DECODING-ERROR" "CHARACTER-DECODING-ERROR-OCTETS"
"CHARACTER-ENCODING-ERROR" "CHARACTER-ENCODING-ERROR-CODE"
"STREAM-DECODING-ERROR" "STREAM-ENCODING-ERROR"
+ "C-STRING-ENCODING-ERROR" "C-STRING-ENCODING-ERROR-EXTERNAL-FORMAT"
+ "C-STRING-DECODING-ERROR" "C-STRING-DECODING-ERROR-EXTERNAL-FORMAT"
"ATTEMPT-RESYNC" "FORCE-END-OF-FILE"
;; bootstrapping magic, to make things happen both in
"LOOKS-LIKE-NAME-OF-SPECIAL-VAR-P"
"POSITIVE-PRIMEP"
"EVAL-IN-LEXENV"
+ "SIMPLE-EVAL-IN-LEXENV"
"DEBUG-NAMIFY"
"FORCE" "DELAY" "PROMISE-READY-P"
"FIND-RESTART-OR-CONTROL-ERROR"
"PACKAGE-INTERNAL-SYMBOLS" "PACKAGE-EXTERNAL-SYMBOLS"
"PARSE-DEFMACRO" "PARSE-UNKNOWN-TYPE"
"PARSE-UNKNOWN-TYPE-SPECIFIER" "PATHNAME-DESIGNATOR"
- #!+(or x86 x86-64) "*PSEUDO-ATOMIC-ATOMIC*"
- #!+(or x86 x86-64) "*PSEUDO-ATOMIC-INTERRUPTED*"
+ #!+(or x86 x86-64) "*PSEUDO-ATOMIC-BITS*"
"PUNT-PRINT-IF-TOO-LONG" "READER-IMPOSSIBLE-NUMBER-ERROR"
"READER-PACKAGE-ERROR" "READER-EOF-ERROR"
"RESTART-DESIGNATOR"
"STANDARD-CLASSOID" "CLASSOID-OF"
"MAKE-STANDARD-CLASSOID" "CLASSOID-CELL-TYPEP"
"FIND-CLASSOID-CELL" "EXTRACT-FUN-TYPE"
- "FUNCALLABLE-STRUCTURE-CLASSOID" "%RANDOM-DOUBLE-FLOAT"
+ "%RANDOM-DOUBLE-FLOAT"
#!+long-float "%RANDOM-LONG-FLOAT"
- "%RANDOM-SINGLE-FLOAT" "RANDOM-PCL-CLASSOID"
+ "%RANDOM-SINGLE-FLOAT" "STATIC-CLASSOID"
"%FUNCALLABLE-INSTANCE-INFO" "RANDOM-CHUNK" "BIG-RANDOM-CHUNK"
- "MAKE-FUNCALLABLE-STRUCTURE-CLASSOID"
"LAYOUT-CLOS-HASH-MAX" "CLASSOID-CELL-NAME"
"BUILT-IN-CLASSOID-DIRECT-SUPERCLASSES"
"BUILT-IN-CLASSOID-TRANSLATION" "RANDOM-LAYOUT-CLOS-HASH"
"FUNCALLABLE-INSTANCE-FUN" "%FUNCALLABLE-INSTANCE-LAYOUT"
"%SET-FUNCALLABLE-INSTANCE-LAYOUT"
"BASIC-STRUCTURE-CLASSOID" "CLASSOID-CELL-CLASSOID"
- "FUNCALLABLE-STRUCTURE-CLASSOID-P" "REGISTER-LAYOUT"
+ "REGISTER-LAYOUT"
"FUNCALLABLE-INSTANCE" "RANDOM-FIXNUM-MAX"
- "MAKE-RANDOM-PCL-CLASSOID" "INSTANCE-LAMBDA"
+ "MAKE-STATIC-CLASSOID" "INSTANCE-LAMBDA"
"%FUNCALLABLE-INSTANCE-LEXENV" "%MAKE-SYMBOL"
"%FUNCALLABLE-INSTANCE-FUN" "SYMBOL-HASH"
:export ("*ASSEMBLY-UNIT-LENGTH*"
"*PRIMITIVE-OBJECTS*"
"AFTER-BREAKPOINT-TRAP"
+ "*ALLOC-SIGNAL*"
"ANY-REG-SC-NUMBER" "ARRAY-DATA-SLOT" "ARRAY-DIMENSIONS-OFFSET"
"ARRAY-DISPLACED-P-SLOT" "ARRAY-DISPLACEMENT-SLOT"
"ARRAY-ELEMENTS-SLOT" "ARRAY-FILL-POINTER-P-SLOT"
;;"NESTED-WALK-FORM" "MACROEXPAND-ALL"
))
+ #!+sb-eval
+ #s(sb-cold:package-data
+ :name "SB!EVAL"
+ :doc "internal: the evaluator implementation used to execute code without compiling it."
+ :use ("CL" "SB!KERNEL" "SB!EXT")
+ :export ("INTERPRETED-FUNCTION"
+ "INTERPRETED-FUNCTION-P"
+ "INTERPRETED-FUNCTION-NAME"
+ "INTERPRETED-FUNCTION-LAMBDA-LIST"
+ "INTERPRETED-FUNCTION-DOCUMENTATION"
+ "INTERPRETED-FUNCTION-BODY"
+ "INTERPRETED-FUNCTION-SOURCE-LOCATION"
+ "EVAL-IN-ENVIRONMENT"
+ "MAKE-NULL-ENVIRONMENT"
+ "EVAL-IN-NATIVE-ENVIRONMENT"
+ "PREPARE-FOR-COMPILE"
+ "COUNT-EVAL-CALLS"
+ "*EVAL-LEVEL*"
+ "*EVAL-CALLS*"))
+
#!+win32
#s(sb-cold:package-data
:name "SB!WIN32"