diff options
author | dos-reis <gdr@axiomatics.org> | 2007-09-02 18:55:48 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2007-09-02 18:55:48 +0000 |
commit | 869512ac1dd0bc9c80182cbef6e01b39540fef7f (patch) | |
tree | 41e3dc594407411855cb62364327c2cb7f533561 /src/interp/setq.lisp.pamphlet | |
parent | beb1d42c90bb0489b98c1dc6816915868506e041 (diff) | |
download | open-axiom-869512ac1dd0bc9c80182cbef6e01b39540fef7f.tar.gz |
* compiler.boot.pamphlet (tc): Don't set $tripleCache.
* define.boot.pamphlet (compDefine): Likewise.
* wi1.boot.pamphlet (compDefine): Likewise.
* c-util.boot.pamphlet (displayComp): Likewise.
* spad.lisp.pamphlet (/TRANSPAD): Likewise.
* bootfuns.lisp.pamphlet (|$useDCQnotLET|): Move to
sys-globals.boot.
(|$updateCatTableIfTrue|): Likewise.
(|$updateIfTrue|): Remove.
(|$streamCount|): Likewise.
(|$tripleCache|): Remove.
(|$TranslateOnly|): Likewise.
(|$topOp|): Likewise.
(|$streamIndexing|): Remove.
(|$streamAlist|): Likewise.
* setq.lisp.pamphlet (|$useDCQnotLET|): Don't set here.
($streamAlist): Likewise.
(|$updateCatTableIfTrue|): Likewise.
(|$streamIndexing|): Likewise.
(|$streamCount|): Likewise.
Diffstat (limited to 'src/interp/setq.lisp.pamphlet')
-rw-r--r-- | src/interp/setq.lisp.pamphlet | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/src/interp/setq.lisp.pamphlet b/src/interp/setq.lisp.pamphlet index e36c5b8e..745d5db6 100644 --- a/src/interp/setq.lisp.pamphlet +++ b/src/interp/setq.lisp.pamphlet @@ -199,8 +199,6 @@ (SETQ OPASSOC NIL) (SETQ SPADSYSKEY '(EOI EOL)) -(SETQ $streamAlist NIL) - ;; following 2 variables are referenced by PREPARSE1 (defvar |$byConstructors| () "list of constructors to be compiled") @@ -292,7 +290,6 @@ (SETQ |$spadLibFT| 'LISPLIB) (SETQ |$existingFiles| (MAKE-HASHTABLE 'UEQUAL)) -(SETQ |$updateCatTableIfTrue| 'T) (SETQ |$instantRecord| (MAKE-HASHTABLE 'ID)) (SETQ |$immediateDataSymbol| '|--immediateData--|) @@ -327,7 +324,6 @@ (SETQ |$DomainsWithoutLisplibs| '( CAPSULE |Union| |Record| |SubDomain| |Mapping| |Enumeration| |Domain| |Mode|)) -(SETQ |$useDCQnotLET| NIL) ;; use DCQs for destructuring := patterns (SETQ |$QuickCode| T) ;" controls generation of QREFELT etc." (SETQ |$QuickLet| T) @@ -358,8 +354,6 @@ (SETQ |$coerceIntByMapCounter| 0) (SETQ |$reportCoerce| NIL) (SETQ |$reportCompilation| NIL) -(SETQ |$streamCount| 0) -(SETQ |$streamIndexing| NIL) (SETQ |$prefix| NIL) (SETQ |$formalArgList| ()) (SETQ |$TriangleVariableList| |