From beb1d42c90bb0489b98c1dc6816915868506e041 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Sun, 2 Sep 2007 14:20:48 +0000
Subject: 	* sys-globals.boot ($VariableCount): Move from 
 bootfuns.lisp.pamphlet. 	($suffix): Likewise. 	($useBFasDefault):
 Likewise. 	($semanticErrorStack): Likewise. 	($tracedModemap):
 Likewise. 	($tracedSpadModemap): Likewise. 	($traceletFunctions):
 Likewise. 	* bootfuns.lisp.pamphlet (|$VariableCount|): Move to 
 sys-globals.boot. 	(|$suffix|): Likewise. 	(|$useBFasDefault|): Likewise.
 	(|$semanticErrorStack|): Likewise. 	(|$tracedModemap|): Likewise. 
 (|$tracedSpadModemap|): Likewise. 	(|$traceletFunctions|): Likewise. 
 (|$TraceFlag|): Move to debug.lisp.pamphlet. 	(|$traceDomains|): Likewise. 
 (|$systemLastChanged|): Remove. 	(|$systemCreation|): Likewise. 
 (|$StreamIndex|): Remove. 	(|$spadSystemDisks|): Likewise. 
 (|$spadOpList|): Likewise. 	(|$traceNoisely|): Remove from here. 
 (|$timerOn|): Move to debug.lisp.pamphlet. 	* setq.lisp.pamphlet
 (|$systemLastChanged|): Remove. 	(|$systemCreation|): Likewise. 	*
 setq.lisp.pamphlet (|$useBFasDefault|): Don't set here. 	*
 setq.lisp.pamphlet (|$reportExitModeStack|): Likewise. 	*
 setq.lisp.pamphlet (|$spadSystemDisks|): Likewise. 	* spad.lisp.pamphlet
 (|$useBFasDefault|): Likewise.

---
 src/interp/bootfuns.lisp.pamphlet | 19 -------------------
 1 file changed, 19 deletions(-)

(limited to 'src/interp/bootfuns.lisp.pamphlet')

diff --git a/src/interp/bootfuns.lisp.pamphlet b/src/interp/bootfuns.lisp.pamphlet
index 8da30d21..9c21ac15 100644
--- a/src/interp/bootfuns.lisp.pamphlet
+++ b/src/interp/bootfuns.lisp.pamphlet
@@ -148,13 +148,11 @@ offer it as extensions.
 (def-boot-var |$reportCoerce|			    "???")
 (def-boot-var |$reportCoerceIfTrue|		    "???")
 (def-boot-var |$reportCompilation|		    "???")
-(def-boot-var |$reportExitModeStack|		    "???")
 (def-boot-var |$reportFlag|			    "Interpreter>SetVars.boot")
 (def-boot-val |$reportSpadTrace| ()    "report list of traced functions")
 (def-boot-var |$resolveFlag|			    "Interpreter>SetVars.boot")
 (def-boot-var |$returnMode|			    "???")
 (def-boot-var |$scanModeFlag|			    "???")
-(def-boot-var |$semanticErrorStack|		    "???")
 (def-boot-val |$SetFunctions| nil  "checked in SetFunctionSlots")
 (def-boot-var |$slamFlag|			    "Interpreter>SetVars.boot")
 (def-boot-val |$sourceFileTypes|
@@ -162,37 +160,20 @@ offer it as extensions.
 	  "Interpreter>System.boot")
 (def-boot-val $SPAD nil				    "Is this Spad code?")
 (def-boot-val |$spadLibFT| 'LISPLIB		    "???")
-(def-boot-var |$spadOpList|			    "???")
-(def-boot-var |$spadSystemDisks|		    "Interpreter>Database.boot")
 (def-boot-var |$streamAlist|			    "???")
 (def-boot-val |$streamCount| 0			    "???")
 (def-boot-var |$streamIndexing|			    "???")
-(def-boot-val |$StreamIndex| 0			    "???")
-(def-boot-var |$suffix|				    "???")
-(def-boot-val |$systemCreation| (currenttime)	    "???")
-(def-boot-val |$systemLastChanged|
-	  |$systemCreation|			"???")
-(def-boot-val |$timerOn| t			    "???")
 (def-boot-var |$topOp|				   "See displayPreCompilationErrors")
 (def-boot-var $TOKSTACK				    "???")
 (def-boot-val $TOP_LEVEL t			    "???")
 (def-boot-var $top_stack			    "???")
-(def-boot-var |$tracedModemap|			    "Interpreter>Trace.boot")
-(def-boot-val |$traceDomains| t			     "enables domain tracing")
-(def-boot-val |$TraceFlag| t			    "???")
-(def-boot-var |$tracedSpadModemap|		    "Interpreter>Trace.boot")
-(def-boot-var |$traceletFunctions|		    "???")
-(def-boot-var |$traceNoisely|			    "Interpreter>Trace.boot")
 (def-boot-var |$TranslateOnly|			    "???")
 (def-boot-var |$tripleCache|			    "Compiler>Compiler.boot")
 
 (def-boot-val |$updateCatTableIfTrue| T	   "update category table on load")
 (def-boot-var |$updateIfTrue|
 	  "Should SPAD databases be updated&squeezed?")
-(def-boot-val |$useBFasDefault| T
-	  "Determines whether to use BF as default floating point type.")
 (def-boot-val |$useDCQnotLET| () "checked in DEF-LET for use of DCQ")
-(def-boot-var |$VariableCount|			    "???")
 @
 \eject
 \begin{thebibliography}{99}
-- 
cgit v1.2.3