diff options
Diffstat (limited to 'llex.c')
-rw-r--r-- | llex.c | 7 |
1 files changed, 4 insertions, 3 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: llex.c,v 1.35 1999/05/14 12:24:04 roberto Exp roberto $ | 2 | ** $Id: llex.c,v 1.36 1999/06/17 17:04:03 roberto Exp roberto $ |
3 | ** Lexical Analyzer | 3 | ** Lexical Analyzer |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -27,7 +27,8 @@ | |||
27 | #define save_and_next(LS) (save(LS->current), next(LS)) | 27 | #define save_and_next(LS) (save(LS->current), next(LS)) |
28 | 28 | ||
29 | 29 | ||
30 | char *reserved [] = {"and", "do", "else", "elseif", "end", "function", | 30 | /* ORDER RESERVED */ |
31 | static char *reserved [] = {"and", "do", "else", "elseif", "end", "function", | ||
31 | "if", "local", "nil", "not", "or", "repeat", "return", "then", | 32 | "if", "local", "nil", "not", "or", "repeat", "return", "then", |
32 | "until", "while"}; | 33 | "until", "while"}; |
33 | 34 | ||
@@ -391,7 +392,7 @@ int luaX_lex (LexState *LS) { | |||
391 | "ambiguous syntax (decimal point x string concatenation)"); | 392 | "ambiguous syntax (decimal point x string concatenation)"); |
392 | } | 393 | } |
393 | } | 394 | } |
394 | fraction: | 395 | fraction: /* LUA_NUMBER */ |
395 | while (isdigit(LS->current)) | 396 | while (isdigit(LS->current)) |
396 | save_and_next(LS); | 397 | save_and_next(LS); |
397 | if (toupper(LS->current) == 'E') { | 398 | if (toupper(LS->current) == 'E') { |