* sys-globals.boot ($leaveLevelStack): Move from

	bootfuns.lisp.pamphlet. 
	($letAssoc): Likewise.
	($libFile): Likewise.
	($lisplibForm): Likewise.
	($lisplibKind): Likewise.
	($lisplibModemapAlist): Likewise.
	($lisplibModemap): Likewise.
	($lisplibOperationAlist): Likewise.
	($lisplibSignatureAlist): Likewise.
	($lisplibVariableAlist): Likewise.
	($mapSubNameAlist): Likewise.
	($mathTrace): Lilkewise.
	($mathTraceList): Likewise.

	* sys-constants.boot ($exitMode): Likewise.
	($leaveMode): Likewise.
	($noEnv): Likewise.

	* trace.boot.pamphlet ($lastUntraced): Likewise.

	* spad.lisp.pamphlet (|$leaveMode|): Don't bind here.

	* setq.lisp.pamphlet (|$Lisp|): Remove.
	(|$noEnv|): Don't set here.
	(|$lastUntraced|): Likewise.
	(|$mostRecentOpAlist|): Likewise.
	(|$mathTraceList|): Likewise.
	(|$letAssoc|): Likewise.

	* bootfuns.lisp.pamphlet (|$noEnv|): Move to sys-constants.boot.
	(|$leaveMode|): Likewise.
	(|$lastUntraced|): Move to trace.boot.pamphlet.
	(|$leaveLevelStack|): Move to sys-globals.boot.
	(|$letAssoc|): Likewise.
	(|$libFile|): Likewise.
	(|$lisplibDomainDependents|): Likewise.
	(|$lisplibForm|): Likewise.
	(|$lisplibKind|): Likewise.
	(|$lisplibModemapAlist|): Likewise.
	(|$lisplibModemap|): Likewise.
	(|$lisplibOperationAlist|): Likewise.
	(|$lisplibSignatureAlist|): Likewise.
	(|$lisplibVariableAlist|): Likewise.
	(|$mapSubNameAlist|): Likewise.
	(|$mathTrace|): Likewise.
	(|$mathTraceList|): Likewise.

	(|$Lisp|): Remove.
	(|$lisplibDependentCategories|): Likewise.
	(|$lisp2lispRenameAssoc|): Likewise.
	(|$ModemapFrame|): Likewise.
	(|$mostRecentOpAlist|): Likewise.

1 files changed, 0 insertions, 22 deletions

diff --git a/src/interp/bootfuns.lisp.pamphlet b/src/interp/bootfuns.lisp.pamphlet
index 7d003826..8c4d1afc 100644
--- a/src/interp/bootfuns.lisp.pamphlet
+++ b/src/interp/bootfuns.lisp.pamphlet
@@ -128,34 +128,12 @@ offer it as extensions.
 (def-boot-var $FunName_Tail			    "???")
 (def-boot-val |$gauss01| '(|gauss| 0 1)		    "???")
 (def-boot-val $lastprefix "S-"                      "???")
-(def-boot-val |$lastUntraced| NIL      "Used for )restore option of )trace.")
-(def-boot-var |$leaveLevelStack|		    "???")
-(def-boot-var |$leaveMode|			    "???")
-(def-boot-val |$letAssoc| NIL	    "Used for trace of assignments in SPAD code.")
-(def-boot-var |$libFile|			    "Compiler>LispLib.boot")
 (def-boot-var $LINENUMBER			    "???")
 (def-boot-var $linestack			    "???")
-(def-boot-val |$Lisp| '(|Lisp|)			    "???")
 (def-boot-val $LISPLIB nil		    "whether to produce a lisplib or not")
-(def-boot-var |$lisplibDependentCategories|	    "Compiler>LispLib.boot")
-(def-boot-var |$lisplibDomainDependents|	    "Compiler>LispLib.boot")
-(def-boot-var |$lisplibForm|			    "Compiler>LispLib.boot")
-(def-boot-var |$lisplibKind|			    "Compiler>LispLib.boot")
-(def-boot-var |$lisplibModemapAlist|		    "Compiler>LispLib.boot")
-(def-boot-var |$lisplibModemap|			    "Compiler>LispLib.boot")
-(def-boot-var |$lisplibOperationAlist|		    "Compiler>LispLib.boot")
-(def-boot-var |$lisplibSignatureAlist|		    "Compiler>LispLib.boot")
-(def-boot-var |$lisplibVariableAlist|		    "Compiler>LispLib.boot")
-(def-boot-var |$lisp2lispRenameAssoc|		    "???")
-(def-boot-var |$mapSubNameAlist|		    "Interpreter>Trace.boot")
-(def-boot-var |$mathTrace|			    "Interpreter>Trace.boot")
-(def-boot-var |$mathTraceList|		    "Controls mathprint output for )trace.")
 (def-boot-var $maxlinenumber			    "???")
-(def-boot-var |$ModemapFrame|			    "???")
-(def-boot-var |$mostRecentOpAlist|		    "???")
 (def-boot-var $NBOOT				    "???")
 (def-boot-var $NEWLINSTACK			    "???")
-(def-boot-var |$noEnv|				    "???")
 (def-boot-val $num_of_meta_errors 0		    "Number of errors seen so far")
 (def-boot-var $OLDLINE				    "Used to output command lines.")
 (def-boot-val |$oldTime| 0			    "???")