aboutsummaryrefslogtreecommitdiff
path: root/src/interp/bootfuns.lisp.pamphlet
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2007-08-30 05:33:17 +0000
committerdos-reis <gdr@axiomatics.org>2007-08-30 05:33:17 +0000
commitc866e56d51d4b19c8e9526137e8ffae5db233ea9 (patch)
treeafcc6f000842a4151936ba6db47bf7532927db16 /src/interp/bootfuns.lisp.pamphlet
parent425fcbfda67e0e702cf61dcaa5a83f0809b7ebd8 (diff)
downloadopen-axiom-c866e56d51d4b19c8e9526137e8ffae5db233ea9.tar.gz
* sys-globals.boot ($prefix): Move from bootfuns.lisp.pamphlet.
($PrettyPrint): Likewise. ($previousTime): Likewise. * bootfuns.lisp.pamphlet (|$prefix|): Move to sys-globals.boot. (|$PrettyPrint|): Likewise. (|$previousTime|): Likewise. (|$postStack|): Move to postpar.boot.pamphlet. (|$OneCoef|): Remove. (|$operationNameList|): Likewise. (|$opFilter|): Likewise. (|$optionAlist|): Likewise. (|$OutsideStringIfTrue|): Likewise. (|$PolyMode|): Likewise. (|$Polvar|): Likewise. (|$optimizableDomainNames|): Likewise. (|$PrintBox|): Likewise. (|$PrintCompilerMessagesIfTrue|): Likewise. (|$printConStats|): Likewise. * setq.lisp.pamphlet (|$opFilter|): Remove. (|$OneCoef|): Likewise. (|$Polvar|): Likewise. (|$PrintCompilerMessagesIfTrue|): Likewise. * spad.lisp.pamphlet (S-PROCESS): Don't bind |$postStack|. Set it to nil. * debug.lisp.pamphlet (|$oldTime|): Move from bootfuns.lisp.pamphlet. * bootfuns.lisp.pamphlet (|$oldTime|): Move to debug.lisp.pamphlet. * setvars.boot.pamphlet (resetWorkspaceVariables): Don't set $operationNameList anymore. * spad.lisp.pamphlet (S-PROCESS): Don't bind $PolyMode anymore.
Diffstat (limited to 'src/interp/bootfuns.lisp.pamphlet')
-rw-r--r--src/interp/bootfuns.lisp.pamphlet20
1 files changed, 0 insertions, 20 deletions
diff --git a/src/interp/bootfuns.lisp.pamphlet b/src/interp/bootfuns.lisp.pamphlet
index 8c4d1afc..8da30d21 100644
--- a/src/interp/bootfuns.lisp.pamphlet
+++ b/src/interp/bootfuns.lisp.pamphlet
@@ -136,27 +136,7 @@ offer it as extensions.
(def-boot-var $NEWLINSTACK "???")
(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 "???")
-(def-boot-val |$OneCoef| '(1 1 . 1) "???")
-(def-boot-val |$operationNameList| NIL "op names for apropos")
-(def-boot-var |$opFilter| "Used to /s a function")
(def-boot-var |OptionList| "???")
-(def-boot-val |$optionAlist| nil "info for trace boot")
-(def-boot-var |$OutsideStringIfTrue| "???")
-(def-boot-var |$PolyMode| "???")
-(def-boot-val |$Polvar| '(WRAPPED . ((1 . 1))) "???")
-(def-boot-var |$postStack| "???")
-(def-boot-var |$prefix| "???")
-(def-boot-val |$PrettyPrint| nil "if t generated code is prettyprinted")
-(def-boot-var |$previousTime| "???")
-(def-boot-val |$optimizableDomainNames|
- '(|FactoredForm| |List| |Vector|
- |Integer| |NonNegativeInteger| |PositiveInteger|
- |SmallInteger| |String| |Boolean| |Symbol| |BooleanFunctions|)
- "used in optCall to decide which domains can be optimized")
-(def-boot-val |$PrintBox| '(|PrintBox|) "???")
-(def-boot-var |$PrintCompilerMessagesIfTrue| "???")
-(def-boot-val |$printConStats| nil "display constructor cache totals")
(def-boot-val |$printLoadMsgs| 't "Interpreter>SetVarT.boot")
(def-boot-var |$PrintOnly| "Compiler>LispLib.boot")
(def-boot-val |$SystemSynonyms| () "list of system defined synonyms")