diff options
-rw-r--r-- | lobject.c | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lobject.c,v 2.16 2005/07/11 14:00:14 roberto Exp roberto $ | 2 | ** $Id: lobject.c,v 2.17 2005/07/31 17:11:50 roberto Exp roberto $ |
3 | ** Some generic functions over Lua objects | 3 | ** Some generic functions over Lua objects |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -91,6 +91,7 @@ int luaO_str2d (const char *s, lua_Number *result) { | |||
91 | char *endptr; | 91 | char *endptr; |
92 | *result = lua_str2number(s, &endptr); | 92 | *result = lua_str2number(s, &endptr); |
93 | if (endptr == s) return 0; /* conversion failed */ | 93 | if (endptr == s) return 0; /* conversion failed */ |
94 | if (*endptr == '\0') return 1; /* most common case */ | ||
94 | while (isspace(cast(unsigned char, *endptr))) endptr++; | 95 | while (isspace(cast(unsigned char, *endptr))) endptr++; |
95 | if (*endptr != '\0') return 0; /* invalid trailing characters? */ | 96 | if (*endptr != '\0') return 0; /* invalid trailing characters? */ |
96 | return 1; | 97 | return 1; |