- :name "SB!EVAL"
- :doc "private: originally the implementation of the IR1 interpreter,
-and now that the IR1 interpreter is gone, home to some stuff which is still
-used by the bytecode interpreter"
- :use ("CL" "SB!KERNEL" "SB!INT")
- :export #!-sb-interpreter
- ("INTERNAL-EVAL")
- #!+sb-interpreter
- ("INTERNAL-EVAL"
- #!+sb-show "*EVAL-STACK-TRACE*"
- #!+sb-show "*INTERNAL-APPLY-NODE-TRACE*"
- "FLUSH-INTERPRETED-FUNCTION-CACHE"
- "INTERPRETED-FUNCTION"
- "INTERPRETED-FUNCTION-ARGLIST"
- "INTERPRETED-FUNCTION-CLOSURE"
- "INTERPRETED-FUNCTION-LAMBDA-EXPRESSION"
- "INTERPRETED-FUNCTION-NAME"
- "INTERPRETED-FUNCTION-P"
- "INTERPRETED-FUNCTION-TYPE"
- "MAKE-INTERPRETED-FUNCTION"
- "PRINT-INTERPRETED-FUNCTION-OBJECT"))
-
- #s(sb-cold:package-data