This commit is contained in:
Roberto Ierusalimschy 2006-01-23 18:06:19 -02:00
parent 9e6e43984d
commit 3ef5a6797f
1 changed files with 4 additions and 6 deletions

10
llex.c
View File

@ -1,5 +1,5 @@
/* /*
** $Id: llex.c,v 2.16 2005/12/08 15:50:54 roberto Exp roberto $ ** $Id: llex.c,v 2.17 2005/12/22 16:19:56 roberto Exp roberto $
** Lexical Analyzer ** Lexical Analyzer
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -193,12 +193,10 @@ static void read_numeral (LexState *ls, SemInfo *seminfo) {
do { do {
save_and_next(ls); save_and_next(ls);
} while (isdigit(ls->current) || ls->current == '.'); } while (isdigit(ls->current) || ls->current == '.');
if (check_next(ls, "Ee")) { /* `E'? */ if (check_next(ls, "Ee")) /* `E'? */
check_next(ls, "+-"); /* optional exponent sign */ check_next(ls, "+-"); /* optional exponent sign */
while (isdigit(ls->current)) { while (isalnum(ls->current) || ls->current == '_')
save_and_next(ls); save_and_next(ls);
}
}
save(ls, '\0'); save(ls, '\0');
buffreplace(ls, '.', ls->decpoint); /* follow locale for decimal point */ buffreplace(ls, '.', ls->decpoint); /* follow locale for decimal point */
if (!luaO_str2d(luaZ_buffer(ls->buff), &seminfo->r)) /* format error? */ if (!luaO_str2d(luaZ_buffer(ls->buff), &seminfo->r)) /* format error? */