| 142 | |
| 143 | |
| 144 | LUALIB_API int luaL_newmetatable (lua_State *L, const char *tname) { |
| 145 | lua_getfield(L, LUA_REGISTRYINDEX, tname); /* get registry.name */ |
| 146 | if (!lua_isnil(L, -1)) /* name already in use? */ |
| 147 | return 0; /* leave previous value on top, but return 0 */ |
| 148 | lua_pop(L, 1); |
| 149 | lua_newtable(L); /* create metatable */ |
| 150 | lua_pushvalue(L, -1); |
| 151 | lua_setfield(L, LUA_REGISTRYINDEX, tname); /* registry.name = metatable */ |
| 152 | return 1; |
| 153 | } |
| 154 | |
| 155 | |
| 156 | LUALIB_API void *luaL_checkudata (lua_State *L, int ud, const char *tname) { |
no test coverage detected