diff options
| author | dos-reis <gdr@axiomatics.org> | 2008-07-06 18:58:35 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2008-07-06 18:58:35 +0000 |
| commit | 2cb102a281332ac6410c1ae3b14ceeb56d778aae (patch) | |
| tree | c1a95ce8cc7d01c6a08fb4b127b6157c47996723 /src/interp/bootlex.lisp | |
| parent | b0f950ab3726cf4facbe2b94f97ffbb598963165 (diff) | |
| download | open-axiom-2cb102a281332ac6410c1ae3b14ceeb56d778aae.tar.gz | |
* interp/parse.boot ($normalizeTree): New.
(parseNotEqual): Likewise.
* interp/compiler.boot (compCompilerPredicate): New.
(compileNot): Use it.
* interp/define.boot (compSubDomain1): Likewise.
(doItIf): Likewise.
* interp/bootlex.lisp (boot): Set $nornamizeTree.
* algebra/Makefile.pamphlet (axiom_algebra_layer_9): Move from
layer 4 to here.
Diffstat (limited to 'src/interp/bootlex.lisp')
| -rw-r--r-- | src/interp/bootlex.lisp | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/interp/bootlex.lisp b/src/interp/bootlex.lisp index fc446aa1..b944c653 100644 --- a/src/interp/bootlex.lisp +++ b/src/interp/bootlex.lisp @@ -114,6 +114,7 @@ (*fileactq-apply* (function print-defun)) (*comp370-apply* (function print-defun))) (declare (special echo-meta *comp370-apply* *EOF* File-Closed XCape)) + (setq |$normalizeTree| t) (setq |$InteractiveMode| NIL) (init-boot/spad-reader) (with-open-stream |