aboutsummaryrefslogtreecommitdiff
path: root/src/interp/nruncomp.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/nruncomp.boot')
-rw-r--r--src/interp/nruncomp.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/nruncomp.boot b/src/interp/nruncomp.boot
index 0fc885c5..d98c966f 100644
--- a/src/interp/nruncomp.boot
+++ b/src/interp/nruncomp.boot
@@ -688,7 +688,7 @@ NRTputInHead bod ==
bod is ['SPADCALL,:args,fn] =>
NRTputInTail rest bod --NOTE: args = COPY of rest bod
-- The following test allows function-returning expressions
- fn is [elt,dom,ind] and dom ~='$ and elt in '(getShellEntry ELT CONST) =>
+ fn is [elt,dom,ind] and dom ~='$ and elt in '(ELT CONST) =>
k := NRTassocIndex dom => lastNode(bod).first := ['%vref,'_$,k]
nil
NRTputInHead fn