aboutsummaryrefslogtreecommitdiff
path: root/src/interp/i-funsel.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2010-05-28 03:23:16 +0000
committerdos-reis <gdr@axiomatics.org>2010-05-28 03:23:16 +0000
commit6058b44d19c4c9a101cfbb94923d7abd565010ee (patch)
tree51c89bf8b49d5339f4f65139c62f298f9ed0a107 /src/interp/i-funsel.boot
parente8df6a1fe9e9f218b8d9147a3de55f6d60fcc080 (diff)
downloadopen-axiom-6058b44d19c4c9a101cfbb94923d7abd565010ee.tar.gz
* interp/sys-utility.boot (eval): Define here.
* interp/br-con.boot: Use it. * interp/br-op1.boot: Likewise. * interp/br-saturn.boot: Likewise. * interp/cattable.boot: Likewise. * interp/ht-util.boot: Likewise. * interp/htsetvar.boot: Likewise. * interp/i-funsel.boot: Likewise. * interp/i-syscmd.boot: Likewise. * interp/interop.boot: Likewise. * interp/server.boot: Likewise. * interp/showimp.boot: Likewise. * interp/trace.boot: Likewise. * interp/sys-macros.lisp (eval): Move to sys-utility.boot.
Diffstat (limited to 'src/interp/i-funsel.boot')
-rw-r--r--src/interp/i-funsel.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-funsel.boot b/src/interp/i-funsel.boot
index 1828ee27..7cde4ce2 100644
--- a/src/interp/i-funsel.boot
+++ b/src/interp/i-funsel.boot
@@ -1240,7 +1240,7 @@ replaceSharpCalls t ==
doReplaceSharpCalls t ==
atom t => t
t is ['_#, l] => #l
- t is ['construct,: l] => EVAL ['LIST,:l]
+ t is ['construct,: l] => eval ['LIST,:l]
[first t,:[ doReplaceSharpCalls u for u in rest t]]
noSharpCallsHere t ==