diff options
Diffstat (limited to 'src/interp/br-con.boot')
| -rw-r--r-- | src/interp/br-con.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/br-con.boot b/src/interp/br-con.boot index f0c4ad18..9c2ff3f7 100644 --- a/src/interp/br-con.boot +++ b/src/interp/br-con.boot @@ -1317,7 +1317,7 @@ digits2Names s == for i in 0..MAXINDEX s repeat c := s.i segment := - n := DIGIT_-CHAR_-P c => + n := digit? c => ('("Zero" "One" "Two" "Three" "Four" "Five" "Six" "Seven" "Eight" "Nine")).n c strconc(str, segment) |