diff options
Diffstat (limited to 'lundump.c')
-rw-r--r-- | lundump.c | 12 |
1 files changed, 6 insertions, 6 deletions
@@ -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 | */ |
53 | double luaU_str2d (const char* b, const char* where) | 53 | real 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 | ||
61 | static real LoadNumber (ZIO* Z, int native) | 61 | static real LoadNumber (ZIO* Z, int native) |