little bug: `1ea' got a wrong token at the error message

This commit is contained in:
Roberto Ierusalimschy 1999-12-22 14:58:36 -02:00
parent 6c79a0a80d
commit 2eaf9a00ae
1 changed files with 3 additions and 2 deletions

5
llex.c
View File

@ -1,5 +1,5 @@
/* /*
** $Id: llex.c,v 1.45 1999/12/02 16:41:29 roberto Exp roberto $ ** $Id: llex.c,v 1.46 1999/12/14 18:31:20 roberto Exp roberto $
** Lexical Analyzer ** Lexical Analyzer
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -401,7 +401,8 @@ int luaX_lex (LexState *LS) {
save_and_next(L, LS); save_and_next(L, LS);
if (toupper(LS->current) == 'E') { if (toupper(LS->current) == 'E') {
save_and_next(L, LS); /* read 'E' */ save_and_next(L, LS); /* read 'E' */
save_and_next(L, LS); /* read '+', '-' or first digit */ if (LS->current == '+' || LS->current == '-')
save_and_next(L, LS); /* optional exponent signal */
while (isdigit(LS->current)) while (isdigit(LS->current))
save_and_next(L, LS); save_and_next(L, LS);
} }