double constant used in integer expression
This commit is contained in:
4
llex.c
4
llex.c
@@ -1,5 +1,5 @@
|
|||||||
/*
|
/*
|
||||||
** $Id: llex.c,v 1.21 1998/06/18 16:57:03 roberto Exp roberto $
|
** $Id: llex.c,v 1.22 1998/06/19 18:47:06 roberto Exp roberto $
|
||||||
** Lexical Analizer
|
** Lexical Analizer
|
||||||
** See Copyright Notice in lua.h
|
** See Copyright Notice in lua.h
|
||||||
*/
|
*/
|
||||||
@@ -419,7 +419,7 @@ int luaX_lex (LexState *LS) {
|
|||||||
if (!isdigit(LS->current))
|
if (!isdigit(LS->current))
|
||||||
luaX_error(LS, "invalid numeral format");
|
luaX_error(LS, "invalid numeral format");
|
||||||
do {
|
do {
|
||||||
e = 10.0*e + (LS->current-'0');
|
e = 10*e + (LS->current-'0');
|
||||||
save_and_next(LS);
|
save_and_next(LS);
|
||||||
} while (isdigit(LS->current));
|
} while (isdigit(LS->current));
|
||||||
for (ea=neg?0.1:10.0; e>0; e>>=1)
|
for (ea=neg?0.1:10.0; e>0; e>>=1)
|
||||||
|
|||||||
Reference in New Issue
Block a user