aboutsummaryrefslogtreecommitdiff
path: root/src/interp/i-map.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/i-map.boot')
-rw-r--r--src/interp/i-map.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-map.boot b/src/interp/i-map.boot
index f11478e4..ceab55c3 100644
--- a/src/interp/i-map.boot
+++ b/src/interp/i-map.boot
@@ -755,7 +755,7 @@ compileCoerceMap(op,argTypes,mm) ==
body := ['SPADCALL,:argCode,['LIST,['function,imp]]]
minivectorName := makeInternalMapMinivectorName(name)
$minivectorNames := [[op,:minivectorName],:$minivectorNames]
- body := SUBST(minivectorName,"$$$",body)
+ body := substitute(minivectorName,"$$$",body)
if $compilingInputFile then
$minivectorCode := [:$minivectorCode,minivectorName]
setDynamicBinding(minivectorName,LIST2REFVEC $minivector)