aboutsummaryrefslogtreecommitdiff
path: root/src/interp
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-10-23 02:58:03 +0000
committerdos-reis <gdr@axiomatics.org>2008-10-23 02:58:03 +0000
commitecfc24269ea4455ec9c17a8fe5e45023e61fc7c0 (patch)
tree8920f021b0c43f10269bd5d35a757180d51729b5 /src/interp
parent5f734659e00cc7120e5be52a426dc748c85fb812 (diff)
downloadopen-axiom-ecfc24269ea4455ec9c17a8fe5e45023e61fc7c0.tar.gz
Don't write modemap info in main module anymore
Diffstat (limited to 'src/interp')
-rw-r--r--src/interp/define.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/define.boot b/src/interp/define.boot
index f44af849..a0ab70db 100644
--- a/src/interp/define.boot
+++ b/src/interp/define.boot
@@ -643,7 +643,7 @@ compDefineFunctor1(df is ['DEF,form,signature,$functorSpecialCases,body],
$lisplibSlot1 := $NRTslot1Info --NIL or set by $NRTmakeSlot1
$lisplibOperationAlist:= operationAlist
$lisplibMissingFunctions:= $CheckVectorList
- evalAndRwriteLispForm('"compilerInfo",
+ rwriteLispForm('"compilerInfo",
removeZeroOne ['SETQ,'$CategoryFrame,
['put,['QUOTE,op'],'
(QUOTE isFunctor),