aboutsummaryrefslogtreecommitdiff
path: root/lundump.c
diff options
context:
space:
mode:
Diffstat (limited to 'lundump.c')
-rw-r--r--lundump.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/lundump.c b/lundump.c
index 225eda28..9f6e3dc3 100644
--- a/lundump.c
+++ b/lundump.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lundump.c,v 1.12 1999/07/08 12:43:23 roberto Exp roberto $ 2** $Id: lundump.c,v 1.13 1999/08/16 20:52:00 roberto Exp roberto $
3** load bytecodes from files 3** load bytecodes from files
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -50,12 +50,12 @@ static unsigned long LoadLong (ZIO* Z)
50/* 50/*
51* convert number from text 51* convert number from text
52*/ 52*/
53double luaU_str2d (const char* b, const char* where) 53real luaU_str2d (const char* b, const char* where)
54{ 54{
55 int negative=(b[0]=='-'); 55 real x;
56 double x=luaO_str2d(b+negative); 56 if (!luaO_str2d(b, &x))
57 if (x<0) luaL_verror("cannot convert number '%s' in %s",b,where); 57 luaL_verror("cannot convert number '%s' in %s",b,where);
58 return negative ? -x : x; 58 return x;
59} 59}
60 60
61static real LoadNumber (ZIO* Z, int native) 61static real LoadNumber (ZIO* Z, int native)