| 32 | #define lobj_is_ok(lo) ((lo) && (lo)->obj && (lo)->obj->where != OBJ_LUAFREE) |
| 33 | |
| 34 | staticfn struct _lua_obj * |
| 35 | l_obj_check(lua_State *L, int indx) |
| 36 | { |
| 37 | struct _lua_obj *lo; |
| 38 | |
| 39 | luaL_checktype(L, indx, LUA_TUSERDATA); |
| 40 | lo = (struct _lua_obj *) luaL_checkudata(L, indx, "obj"); |
| 41 | if (!lo) |
| 42 | nhl_error(L, "Obj error"); |
| 43 | return lo; |
| 44 | } |
| 45 | |
| 46 | staticfn int |
| 47 | l_obj_gc(lua_State *L) |
no test coverage detected