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 241ba8e0..2199f298 100644
--- a/src/interp/i-map.boot
+++ b/src/interp/i-map.boot
@@ -759,7 +759,7 @@ compileCoerceMap(op,argTypes,mm) ==
body := ['SPADCALL,:argCode,['LIST,['function,imp]]]
minivectorName := makeInternalMapMinivectorName(name)
body := substitute(minivectorName,"$$$",body)
- setDynamicBinding(minivectorName,LIST2REFVEC $minivector)
+ setDynamicBinding(minivectorName,LIST2VEC $minivector)
compileInteractive
[name,['LAMBDA,parms,declareGlobalVariables [minivectorName],body]]
CAR sig