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.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/nruncomp.boot b/src/interp/nruncomp.boot
index 0215f047..93bcebb4 100644
--- a/src/interp/nruncomp.boot
+++ b/src/interp/nruncomp.boot
@@ -130,7 +130,7 @@ NRTencode(x,y) == encode(x,y,true) where encode(x,compForm,firstTime) ==
v
x is "$" => x
x is "$$" => x
- ['QUOTE,x]
+ quote x
--------------FUNCTIONS CALLED DURING CAPSULE FUNCTION COMPILATION-------------
listOfBoundVars form ==
@@ -745,7 +745,7 @@ NRTputInHead bod ==
bod is ['%when,:clauses] =>
for cc in clauses repeat NRTputInTail cc
bod
- bod is ["QUOTE",:.] => bod
+ bod is ['QUOTE,:.] => bod
bod is ["CLOSEDFN",:.] => bod
NRTputInHead first bod
NRTputInTail rest bod