aboutsummaryrefslogtreecommitdiff
path: root/lobject.c
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>2014-10-27 17:21:56 -0200
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>2014-10-27 17:21:56 -0200
commit4870194380c4fcf40ffa20ef06956a462b3fd10c (patch)
tree4a7e258c09af6785e6d30e10a724e94632cf6b35 /lobject.c
parent41d0e661846275994262f7e94c879d02254ef0ef (diff)
downloadlua-4870194380c4fcf40ffa20ef06956a462b3fd10c.tar.gz
lua-4870194380c4fcf40ffa20ef06956a462b3fd10c.tar.bz2
lua-4870194380c4fcf40ffa20ef06956a462b3fd10c.zip
small reorganization of tests around LUA_USE_C99
Diffstat (limited to 'lobject.c')
-rw-r--r--lobject.c22
1 files changed, 2 insertions, 20 deletions
diff --git a/lobject.c b/lobject.c
index b329be69..e805ce66 100644
--- a/lobject.c
+++ b/lobject.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lobject.c,v 2.94 2014/10/24 11:42:29 roberto Exp roberto $ 2** $Id: lobject.c,v 2.95 2014/10/25 11:50:46 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*/
@@ -162,24 +162,8 @@ static int isneg (const char **s) {
162} 162}
163 163
164 164
165/*
166** {======================================================
167** lua_strx2number converts an hexadecimal numeric string to a number.
168** In C99, 'strtod' does both conversions. C89, however, has no function
169** to convert floating hexadecimal strings to numbers. For these
170** systems, you can leave 'lua_strx2number' undefined and Lua will
171** provide its own implementation.
172** =======================================================
173*/
174#if !defined(lua_strx2number) /* { */
175
176#if defined(LUA_USE_C99) /* { */
177
178#define lua_strx2number(s,p) lua_str2number(s,p)
179
180#else /* }{ */
181
182/* Lua's implementation for 'lua_strx2number' */ 165/* Lua's implementation for 'lua_strx2number' */
166#if !defined(lua_strx2number) /* { */
183 167
184#include <math.h> 168#include <math.h>
185 169
@@ -247,8 +231,6 @@ static lua_Number lua_strx2number (const char *s, char **endptr) {
247 231
248#endif /* } */ 232#endif /* } */
249 233
250#endif /* } */
251
252/* }====================================================== */ 234/* }====================================================== */
253 235
254 236