aboutsummaryrefslogtreecommitdiff
path: root/src/boot/utility.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/boot/utility.boot')
-rw-r--r--src/boot/utility.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/boot/utility.boot b/src/boot/utility.boot
index 44c20d2c..d60c7d5c 100644
--- a/src/boot/utility.boot
+++ b/src/boot/utility.boot
@@ -225,7 +225,7 @@ applySubst!(sl,t) ==
++ Like applySubst, but skip quoted materials.
applySubstNQ(sl,t) ==
t is [hd,:tl] =>
- hd is "QUOTE" => t
+ hd is 'QUOTE => t
hd := applySubstNQ(sl,hd)
tl := applySubstNQ(sl,tl)
sameObject?(hd,first t) and sameObject?(tl,rest t) => t