aboutsummaryrefslogtreecommitdiff
path: root/src/interp/newfort.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2010-12-11 01:27:32 +0000
committerdos-reis <gdr@axiomatics.org>2010-12-11 01:27:32 +0000
commitc95606b43200927a9b54c5bba9670020aee6712d (patch)
tree9162dcb1a1cf9b40554a2be87233558b92d852cb /src/interp/newfort.boot
parent5e866b934c19a52da052a4cb97f972c7968968cc (diff)
downloadopen-axiom-c95606b43200927a9b54c5bba9670020aee6712d.tar.gz
* boot/ast.boot (bfMmeber): Tidy.
* interp/alql.boot: Clean up. * interp/br-con.boot: Likewise. * interp/br-op1.boot: Likewise. * interp/br-op2.boot: Likewise. * interp/br-saturn.boot: Likewise. * interp/br-search.boot: Likewise. * interp/br-util.boot: Likewise. * interp/c-doc.boot: Likewise. * interp/format.boot: Likewise. * interp/g-error.boot: Likewise. * interp/i-funsel.boot: Likewise. * interp/i-syscmd.boot: Likewise. * interp/mark.boot: Likewise. * interp/msgdb.boot: Likewise. * interp/newfort.boot: Likewise. * interp/pspad1.boot: Likewise. * interp/trace.boot: Likewise.
Diffstat (limited to 'src/interp/newfort.boot')
-rw-r--r--src/interp/newfort.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/newfort.boot b/src/interp/newfort.boot
index a5c73202..e83ce7c7 100644
--- a/src/interp/newfort.boot
+++ b/src/interp/newfort.boot
@@ -240,7 +240,7 @@ exp2FortOptimizeCS1 e ==
f := NIL
f := g
- MEMQ(object2Identifier first e,'(ROW AGGLST)) => e
+ object2Identifier first e in '(ROW AGGLST) => e
-- see if we have already seen this expression
n := HGET($fortCsHash,e)