lifning
/
SRB2
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Push "valid" only once

This commit is contained in:
James R 2020-12-14 05:53:57 -08:00
parent 0b0f2e1e35
commit 00dff6d283
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/lua_taglib.c
View File

@ -167,7 +167,7 @@ static void push_taglist(lua_State *L, int idx)
static int has_valid_field(lua_State *L)
{
int equal;
lua_pushliteral(L, "valid");
lua_rawgeti(L, LUA_ENVIRONINDEX, 1);
equal = lua_rawequal(L, 2, -1);
lua_pop(L, 1);
return equal;
@ -392,6 +392,9 @@ static void open_taglist(lua_State *L)
lua_setfield(L, -2, "has");
}
#define new_literal(L, s) \
(lua_pushliteral(L, s), luaL_ref(L, -2))
static void set_taglist_metatable(lua_State *L, const char *meta)
{
lua_createtable(L, 0, 4);
@ -399,6 +402,9 @@ static void set_taglist_metatable(lua_State *L, const char *meta)
lua_setfield(L, -2, "taglist");
lua_pushcfunction(L, taglist_get);
lua_createtable(L, 0, 1);
new_literal(L, "valid");
lua_setfenv(L, -2);
lua_setfield(L, -2, "__index");
lua_pushcfunction(L, taglist_len);