aboutsummaryrefslogtreecommitdiff
path: root/lapi.c
diff options
context:
space:
mode:
Diffstat (limited to 'lapi.c')
-rw-r--r--lapi.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/lapi.c b/lapi.c
index 46af4ce0..ca37dbee 100644
--- a/lapi.c
+++ b/lapi.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lapi.c,v 2.189 2013/09/11 20:15:31 roberto Exp roberto $ 2** $Id: lapi.c,v 2.190 2013/09/13 16:21:52 roberto Exp roberto $
3** Lua API 3** Lua API
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -286,7 +286,7 @@ LUA_API int lua_isstring (lua_State *L, int idx) {
286 286
287LUA_API int lua_isuserdata (lua_State *L, int idx) { 287LUA_API int lua_isuserdata (lua_State *L, int idx) {
288 const TValue *o = index2addr(L, idx); 288 const TValue *o = index2addr(L, idx);
289 return (ttisuserdata(o) || ttislightuserdata(o)); 289 return (ttisfulluserdata(o) || ttislightuserdata(o));
290} 290}
291 291
292 292
@@ -740,7 +740,7 @@ LUA_API void lua_getuservalue (lua_State *L, int idx) {
740 StkId o; 740 StkId o;
741 lua_lock(L); 741 lua_lock(L);
742 o = index2addr(L, idx); 742 o = index2addr(L, idx);
743 api_check(L, ttisuserdata(o), "userdata expected"); 743 api_check(L, ttisfulluserdata(o), "full userdata expected");
744 if (uvalue(o)->env) { 744 if (uvalue(o)->env) {
745 sethvalue(L, L->top, uvalue(o)->env); 745 sethvalue(L, L->top, uvalue(o)->env);
746 } else 746 } else
@@ -879,7 +879,7 @@ LUA_API void lua_setuservalue (lua_State *L, int idx) {
879 lua_lock(L); 879 lua_lock(L);
880 api_checknelems(L, 1); 880 api_checknelems(L, 1);
881 o = index2addr(L, idx); 881 o = index2addr(L, idx);
882 api_check(L, ttisuserdata(o), "userdata expected"); 882 api_check(L, ttisfulluserdata(o), "full userdata expected");
883 if (ttisnil(L->top - 1)) 883 if (ttisnil(L->top - 1))
884 uvalue(o)->env = NULL; 884 uvalue(o)->env = NULL;
885 else { 885 else {