diff options
author | dos-reis <gdr@axiomatics.org> | 2008-02-16 04:52:45 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2008-02-16 04:52:45 +0000 |
commit | 406b6c0a38ee0e9ea1ba6657b76391f1c15f0b95 (patch) | |
tree | c05aaf09c7745fdf0d562d8664bc8fddab64befd /src/interp/compiler.boot | |
parent | 5505ab2d0069eb2809753217a93e9a4551c997f9 (diff) | |
download | open-axiom-406b6c0a38ee0e9ea1ba6657b76391f1c15f0b95.tar.gz |
* interp/unlisp.lisp (|CatchAsCan|): Tidy.
* interp/sys-utility.boot (delete): Fix thinko.
* interp/sys-globals.boot ($sourceFiles): Define here.
(INPUTSTREAM): Likewise.
* interp/i-syscmd.boot (UNDERBAR): Move to sys-globals.boot.
* interp/fname.lisp: Import "macros".
* interp/debug.lisp: Import "parsing".
Replace $PRETTYPRINT with $PrettyPrint.
(/FN): Define.
(depthAlist): Likewise.
* interp/br-search.boot (docSearch1): Fix thinko.
* interp/Makefile.pamphlet (debug.$(FASLEXT)): Depend on
parsing.$(FASLEXT).
* interp/i-output.boot (starstarcond): Remove used function.
(transcomparg): Likewise.
(MATBORCH): Define here.
(*TALLPAR): Likewise.
* interp/vmlisp.lisp (|char|): Remove duplicate definition.
Diffstat (limited to 'src/interp/compiler.boot')
-rw-r--r-- | src/interp/compiler.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/compiler.boot b/src/interp/compiler.boot index 0a59bdcf..a215cbf9 100644 --- a/src/interp/compiler.boot +++ b/src/interp/compiler.boot @@ -1129,7 +1129,7 @@ compileNot(x,m,e) == -- do this special case here. [xcode, xmode, xtrueEnv, xfalseEnv] := compBoolean(y, $Boolean, e) or return nil - convert([["NOT", xcode], $Boolean, xfalseEnv], m) + convert([["NOT", xcode], xmode, xfalseEnv], m) --% Case |