aboutsummaryrefslogtreecommitdiff
path: root/src/interp/spad-parser.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/spad-parser.boot')
-rw-r--r--src/interp/spad-parser.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/spad-parser.boot b/src/interp/spad-parser.boot
index 1e33482b..4fc465d3 100644
--- a/src/interp/spad-parser.boot
+++ b/src/interp/spad-parser.boot
@@ -382,7 +382,7 @@ floatExponent x ==
s := symbolName x
charUpcase stringChar(s,0) = char "E" and #s > 1
and (and/[DIGITP stringChar(s,i) for i in 1..maxIndex s]) =>
- READ_-FROM_-STRING(s,true,nil,KEYWORD::START,1)
+ READ_-FROM_-STRING(s,true,nil,start <- 1)
nil
nil