lua

commit d88860131a018c407c5afbb775758599e6c588df
parent 44752fc9ce2588a9b402d335c87660a9ee28a157
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date:   Tue,  9 Jul 2002 11:58:06 -0300

new macro `lua_isudataval' (for completude)

Diffstat:
M
ltests.c
 | 
5
++++-
M
lua.h
 | 
3
++-

2 files changed, 6 insertions(+), 2 deletions(-)
diff --git a/ltests.c b/ltests.c
@@ -1,5 +1,5 @@
 /*
-** $Id: ltests.c,v 1.127 2002/06/20 20:40:38 roberto Exp roberto $
+** $Id: ltests.c,v 1.128 2002/06/25 19:16:44 roberto Exp roberto $
 ** Internal Module for Debugging of the Lua Implementation
 ** See Copyright Notice in lua.h
 */
@@ -578,6 +578,9 @@ static int testC (lua_State *L) {
     else if EQ("isuserdata") {
       lua_pushnumber(L, lua_isuserdata(L, getnum));
     }
+    else if EQ("isudataval") {
+      lua_pushnumber(L, lua_isudataval(L, getnum));
+    }
     else if EQ("isnil") {
       lua_pushnumber(L, lua_isnil(L, getnum));
     }
diff --git a/lua.h b/lua.h
@@ -1,5 +1,5 @@
 /*
-** $Id: lua.h,v 1.144 2002/06/26 19:28:44 roberto Exp roberto $
+** $Id: lua.h,v 1.145 2002/07/01 19:31:10 roberto Exp roberto $
 ** Lua - An Extensible Extension Language
 ** Tecgraf: Computer Graphics Technology Group, PUC-Rio, Brazil
 ** http://www.lua.org	mailto:info@lua.org
@@ -242,6 +242,7 @@ LUA_API void *lua_newuserdata (lua_State *L, size_t size);
 #define lua_isfunction(L,n)	(lua_type(L,n) == LUA_TFUNCTION)
 #define lua_istable(L,n)	(lua_type(L,n) == LUA_TTABLE)
 #define lua_isuserdata(L,n)	(lua_type(L,n) == LUA_TUSERDATA)
+#define lua_isudataval(L,n)	(lua_type(L,n) == LUA_TUDATAVAL)
 #define lua_isnil(L,n)		(lua_type(L,n) == LUA_TNIL)
 #define lua_isboolean(L,n)	(lua_type(L,n) == LUA_TBOOLEAN)
 #define lua_isnone(L,n)		(lua_type(L,n) == LUA_TNONE)