aboutsummaryrefslogtreecommitdiff
path: root/src/interp/scan.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/scan.boot')
-rw-r--r--src/interp/scan.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/scan.boot b/src/interp/scan.boot
index 331cac7a..3f55284f 100644
--- a/src/interp/scan.boot
+++ b/src/interp/scan.boot
@@ -193,10 +193,10 @@ scanDict:=scanDictCons()
scanPunCons()==
a := makeBitVector 256
for i in 0..255 repeat
- bitmask(a,i) := 0
+ bitref(a,i) := 0
for [k,:.] in entries scanKeyTable repeat
if not startsId? stringChar(k,0) then
- bitmask(a,codePoint stringChar(k,0)) := 1
+ bitref(a,codePoint stringChar(k,0)) := 1
a
scanPun:=scanPunCons()