aboutsummaryrefslogtreecommitdiff
path: root/src/interp/ht-util.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/ht-util.boot')
-rw-r--r--src/interp/ht-util.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/ht-util.boot b/src/interp/ht-util.boot
index d04cd526..f7b3b6b9 100644
--- a/src/interp/ht-util.boot
+++ b/src/interp/ht-util.boot
@@ -561,8 +561,8 @@ bracketString string == strconc('"[",string,'"]")
quoteString string == strconc('"_"", string, '"_"")
-$funnyQuote := char 127
-$funnyBacks := char 128
+$funnyQuote := abstractChar 127
+$funnyBacks := abstractChar 128
htEscapeString str ==
str := SUBSTITUTE($funnyQuote, char '_", str)