aboutsummaryrefslogtreecommitdiff
path: root/src/interp/compiler.boot
diff options
context:
space:
mode:
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 c679cadd..68eac24f 100644
--- a/src/interp/compiler.boot
+++ b/src/interp/compiler.boot
@@ -337,7 +337,7 @@ finishLambdaExpression(expr is ["LAMBDA",vars,.],env) ==
rest v = 1 => slist := [[first v,:val],:slist]
scode := [[first v,val],:scode]
body :=
- slist => SUBLISNQ(slist,CDDR expandedFunction)
+ slist => applySubstNQ(slist,CDDR expandedFunction)
CDDR expandedFunction
if scode ~= nil then
body := [['%bind,reverse! scode,:body]]