aboutsummaryrefslogtreecommitdiff
path: root/src/interp/compiler.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-02-16 04:52:45 +0000
committerdos-reis <gdr@axiomatics.org>2008-02-16 04:52:45 +0000
commit406b6c0a38ee0e9ea1ba6657b76391f1c15f0b95 (patch)
treec05aaf09c7745fdf0d562d8664bc8fddab64befd /src/interp/compiler.boot
parent5505ab2d0069eb2809753217a93e9a4551c997f9 (diff)
downloadopen-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.boot2
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