diff options
Diffstat (limited to 'src/interp/i-map.boot')
| -rw-r--r-- | src/interp/i-map.boot | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/src/interp/i-map.boot b/src/interp/i-map.boot index f5ad2a2e..547a8a2b 100644 --- a/src/interp/i-map.boot +++ b/src/interp/i-map.boot @@ -754,10 +754,7 @@ compileCoerceMap(op,argTypes,mm) == parms:= [:parms,'envArg] body := ['SPADCALL,:argCode,['LIST,['function,imp]]] minivectorName := makeInternalMapMinivectorName(name) - $minivectorNames := [[op,:minivectorName],:$minivectorNames] body := substitute(minivectorName,"$$$",body) - if $compilingInputFile then - $minivectorCode := [:$minivectorCode,minivectorName] setDynamicBinding(minivectorName,LIST2REFVEC $minivector) compileInteractive [name,['LAMBDA,parms,body]] CAR sig |