diff options
Diffstat (limited to 'src/interp/lexing.boot')
| -rw-r--r-- | src/interp/lexing.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/lexing.boot b/src/interp/lexing.boot index 9cee8ad5..a5356225 100644 --- a/src/interp/lexing.boot +++ b/src/interp/lexing.boot @@ -128,7 +128,7 @@ getIntegerInRadix(rd,buf,r) == d = nil => leave nil d >= r => SPAD__SYNTAX__ERROR rd advanceChar! rd - PARSE_-INTEGER(buf,KEYWORD::START,mark,KEYWORD::RADIX,r) + PARSE_-INTEGER(buf,start <- mark,radix <- r) radixSuffix? c == c = char "r" or c = char "R" |