diff options
author | dos-reis <gdr@axiomatics.org> | 2007-08-30 05:33:17 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2007-08-30 05:33:17 +0000 |
commit | c866e56d51d4b19c8e9526137e8ffae5db233ea9 (patch) | |
tree | afcc6f000842a4151936ba6db47bf7532927db16 /src/interp/setq.lisp.pamphlet | |
parent | 425fcbfda67e0e702cf61dcaa5a83f0809b7ebd8 (diff) | |
download | open-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/setq.lisp.pamphlet')
-rw-r--r-- | src/interp/setq.lisp.pamphlet | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/src/interp/setq.lisp.pamphlet b/src/interp/setq.lisp.pamphlet index 32ab00e0..89e872a4 100644 --- a/src/interp/setq.lisp.pamphlet +++ b/src/interp/setq.lisp.pamphlet @@ -342,9 +342,7 @@ (SETQ |$highlightAllowed| 'T) ;" used in BRIGHTPRINT and is a )set variable" -(SETQ |$PrintCompilerMessagesIfTrue| NIL) (SETQ |$printStorageIfTrue| NIL) ;; storage info disabled in common lisp -(SETQ |$opFilter| NIL) ;" used to |/s a function " (SETQ |$AnonymousFunction| '(|AnonymousFunction|)) (SETQ |$Any| '(|Any|)) @@ -370,8 +368,6 @@ (SETQ |$streamIndexing| NIL) (SETQ |$reportExitModeStack| NIL) (SETQ |$prefix| NIL) -(SETQ |$Polvar| '(WRAPPED . ((1 . 1)))) -(SETQ |$OneCoef| '(1 1 . 1)) (SETQ |$formalArgList| ()) (SETQ |$TriangleVariableList| '(|t#1| |t#2| |t#3| |t#4| |t#5| |t#6| |t#7| |t#8| |t#9| |t#10| |