aboutsummaryrefslogtreecommitdiff
path: root/src/interp/nrunopt.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/nrunopt.boot')
-rw-r--r--src/interp/nrunopt.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/nrunopt.boot b/src/interp/nrunopt.boot
index bd03608a..12a0d9df 100644
--- a/src/interp/nrunopt.boot
+++ b/src/interp/nrunopt.boot
@@ -185,7 +185,7 @@ makeSpadConstant [fn,dollar,slot] ==
stuffSlot(dollar,i,item) ==
dollar.i :=
- atom item => [SYMBOL_-FUNCTION item,:dollar]
+ atom item => [symbolFunction item,:dollar]
item is [n,:op] and integer? n => ['newGoGet,dollar,:item]
item is ['CONS,.,['FUNCALL,a,b]] =>
b = '$ => ['makeSpadConstant,eval a,dollar,i]