diff options
| author | dos-reis <gdr@axiomatics.org> | 2007-08-26 12:41:20 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2007-08-26 12:41:20 +0000 |
| commit | 45f656f12b8a880be7ed618a5fcb86fb639f1285 (patch) | |
| tree | 22459649d2b164f884e4236deaedace83a6d62b3 /src/interp/setq.lisp.pamphlet | |
| parent | 5aea0ad31f2b0a610d2c5887cf44a5bd47a8582d (diff) | |
| download | open-axiom-45f656f12b8a880be7ed618a5fcb86fb639f1285.tar.gz | |
* bootfuns.lisp.pamphlet (|$constructorsNotInDatabase|): Remove.
(|$DomainFrame|): Remove.
(|$eltIfNil|): Remove.
(|$compileMapFlag|): Remove.
(|$evalDomain|): Don't set here.
(|$false|): Move to sys-constants.boot.
(|$domainTraceNameAssoc|): Move to sys-globals.boot.
(|$evalDomain|): Move to sys-globals.boot.
(|$exitModeStack|): Move to sys-globals.boot
* pspad1.boot.pamphlet (lisp2Boot): Don't declare $eltIfNil anymore.
* setvars.boot.pamphlet (resetWorkspaceVariables): Don't set
anymore.
* setq.lisp.pamphlet (|$domainTraceNameAssoc|): Don't set here.
* spad.lisp.pamphlet (S-PROCESS): Don't bind |$DomainFrame| anymore.
(S-PROCESS): Set $exitModeStack to nil.
(|$false|): Don't set here.
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 aa3ceda3..55279fa9 100644 --- a/src/interp/setq.lisp.pamphlet +++ b/src/interp/setq.lisp.pamphlet @@ -347,8 +347,6 @@ ;" used for )restore option of )trace." (SETQ |$mathTraceList| NIL) ;" controls mathprint output for )trace." -(SETQ |$domainTraceNameAssoc| NIL) - ;"alist of traced domains" (SETQ |$tracedMapSignatures| ()) (SETQ |$highlightAllowed| 'T) ;" used in BRIGHTPRINT and is a )set variable" @@ -358,7 +356,6 @@ (SETQ |$mostRecentOpAlist| NIL) (SETQ |$noEnv| NIL) (SETQ |$opFilter| NIL) ;" used to |/s a function " -(SETQ |$evalDomain| NIL) (SETQ |$AnonymousFunction| '(|AnonymousFunction|)) (SETQ |$Any| '(|Any|)) @@ -379,7 +376,6 @@ (SETQ |$gauss01| '(|gauss| 0 1)) (SETQ |$form| NIL) (SETQ |$Index| 0) -(SETQ |$false| NIL) (SETQ |$suffix| NIL) (SETQ |$coerceIntByMapCounter| 0) (SETQ |$reportCoerce| NIL) |