summaryrefslogtreecommitdiff
path: root/lbitlib.c
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>2010-07-02 14:35:06 -0300
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>2010-07-02 14:35:06 -0300
commita9dc7c88283a8046ad40c592f9e626d93e8e14a1 (patch)
tree693fa40d1ca9beceb5af5d4d4325401abe3f96a2 /lbitlib.c
parent7192afafeeb1a96b3de60af90a72cd8762b09d94 (diff)
downloadlua-a9dc7c88283a8046ad40c592f9e626d93e8e14a1.tar.gz
lua-a9dc7c88283a8046ad40c592f9e626d93e8e14a1.tar.bz2
lua-a9dc7c88283a8046ad40c592f9e626d93e8e14a1.zip
functions lua_tonumber/lua_tointeger replaced by lua_tonumberx/lua_tointegerx
that have an extra out parameter with conversion status
Diffstat (limited to 'lbitlib.c')
-rw-r--r--lbitlib.c7
1 files changed, 4 insertions, 3 deletions
diff --git a/lbitlib.c b/lbitlib.c
index cae1b1f5..21cf95b6 100644
--- a/lbitlib.c
+++ b/lbitlib.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lbitlib.c,v 1.4 2010/02/11 15:55:29 roberto Exp roberto $ 2** $Id: lbitlib.c,v 1.5 2010/07/02 11:38:13 roberto Exp roberto $
3** Standard library for bitwise operations 3** Standard library for bitwise operations
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -23,8 +23,9 @@ typedef unsigned LUA_INT32 b_uint;
23 23
24static b_uint getuintarg (lua_State *L, int arg) { 24static b_uint getuintarg (lua_State *L, int arg) {
25 b_uint r; 25 b_uint r;
26 lua_Number x = lua_tonumber(L, arg); 26 int isnum;
27 if (x == 0) luaL_checktype(L, arg, LUA_TNUMBER); 27 lua_Number x = lua_tonumberx(L, arg, &isnum);
28 if (!isnum) luaL_typeerror(L, arg, "number");
28 lua_number2uint(r, x); 29 lua_number2uint(r, x);
29 return r; 30 return r;
30} 31}