aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>1998-07-06 19:04:58 -0300
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>1998-07-06 19:04:58 -0300
commit1788501eed16a5fe5a6f5ebd3cafbe06402a0fe3 (patch)
tree842f394c1e6673930d72fc108ca23270c150490a
parentbee1a5aeb233ba555205310db7a55dd7decfa74d (diff)
downloadlua-1788501eed16a5fe5a6f5ebd3cafbe06402a0fe3.tar.gz
lua-1788501eed16a5fe5a6f5ebd3cafbe06402a0fe3.tar.bz2
lua-1788501eed16a5fe5a6f5ebd3cafbe06402a0fe3.zip
double constant used in integer expression
-rw-r--r--llex.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/llex.c b/llex.c
index 8ae01d08..41ca76e8 100644
--- a/llex.c
+++ b/llex.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: llex.c,v 1.21 1998/06/18 16:57:03 roberto Exp roberto $ 2** $Id: llex.c,v 1.22 1998/06/19 18:47:06 roberto Exp roberto $
3** Lexical Analizer 3** Lexical Analizer
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -419,7 +419,7 @@ int luaX_lex (LexState *LS) {
419 if (!isdigit(LS->current)) 419 if (!isdigit(LS->current))
420 luaX_error(LS, "invalid numeral format"); 420 luaX_error(LS, "invalid numeral format");
421 do { 421 do {
422 e = 10.0*e + (LS->current-'0'); 422 e = 10*e + (LS->current-'0');
423 save_and_next(LS); 423 save_and_next(LS);
424 } while (isdigit(LS->current)); 424 } while (isdigit(LS->current));
425 for (ea=neg?0.1:10.0; e>0; e>>=1) 425 for (ea=neg?0.1:10.0; e>0; e>>=1)