aboutsummaryrefslogtreecommitdiff
path: root/src/interp/slam.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/slam.boot')
-rw-r--r--src/interp/slam.boot3
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 :=