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 014e757f..b21ecb6e 100644
--- a/src/interp/nruncomp.boot
+++ b/src/interp/nruncomp.boot
@@ -363,7 +363,7 @@ consDomainForm(x,dc) ==
NRTdescendCodeTran(u,condList) ==
null u => nil
u is ['LIST] => nil
- u is [op,.,i,a] and op in '(setShellEntry SETELT QSETREFV) =>
+ u is [op,.,i,a] and op in '(setShellEntry QSETREFV) =>
null condList and a is ['CONS,fn,:.] =>
u.first := 'LIST
u.rest := nil