diff options
Diffstat (limited to 'src/interp/slam.boot')
-rw-r--r-- | src/interp/slam.boot | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/src/interp/slam.boot b/src/interp/slam.boot index b6ad0acc..7ffac994 100644 --- a/src/interp/slam.boot +++ b/src/interp/slam.boot @@ -44,10 +44,7 @@ reportFunctionCompilation(op,nam,argl,body,isRecursive) == --+ $compiledOpNameList := [nam] minivectorName := makeInternalMapMinivectorName(nam) - $minivectorNames := [[op,:minivectorName],:$minivectorNames] body := substitute(minivectorName,"$$$",body) - if $compilingInputFile then - $minivectorCode := [:$minivectorCode,minivectorName] setDynamicBinding(minivectorName,LIST2REFVEC $minivector) argl := COPY argl -- play it safe for optimization init := |