aboutsummaryrefslogtreecommitdiff
path: root/src/interp/bc-util.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/bc-util.boot')
-rw-r--r--src/interp/bc-util.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/bc-util.boot b/src/interp/bc-util.boot
index 6c2531dc..6061e577 100644
--- a/src/interp/bc-util.boot
+++ b/src/interp/bc-util.boot
@@ -93,7 +93,7 @@ bcOptional s ==
bcvspace() == bcHt '"\vspace{1}\newline "
-bcString2WordList s == fn(s,0,MAXINDEX s) where
+bcString2WordList s == fn(s,0,maxIndex s) where
fn(s,i,n) ==
i > n => nil
k := or/[j for j in i..n | s.j ~= char '_ ]