GitHub/lua
1
0
Fork 0
mirror of https://github.com/lua/lua.git synced 2025-02-04 06:13:04 +08:00
Code Issues Projects Releases Wiki Activity

'luaL_findtable' returns boolean about whether it created a new

Browse Source 
table (to easy initializing table)
This commit is contained in:
Roberto Ierusalimschy 2011-01-10 13:51:42 -02:00
parent c2e3cc4c89
commit a10d495b18
2 changed files with 6 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lauxlib.c
View File

@ -1,5 +1,5 @@
/* /*
** $Id: lauxlib.c,v 1.226 2010/11/10 17:38:10 roberto Exp roberto $ ** $Id: lauxlib.c,v 1.227 2010/11/10 18:05:36 roberto Exp roberto $
** Auxiliary functions for building Lua libraries ** Auxiliary functions for building Lua libraries
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -795,15 +795,16 @@ LUALIB_API void luaL_setfuncs (lua_State *L, const luaL_Reg *l, int nup) {
** ensure that stack[idx][fname] has a table and push that table ** ensure that stack[idx][fname] has a table and push that table
** into the stack ** into the stack
*/ */
LUALIB_API void luaL_findtable (lua_State *L, int idx, const char *fname) { LUALIB_API int luaL_findtable (lua_State *L, int idx, const char *fname) {
lua_getfield(L, idx, fname); lua_getfield(L, idx, fname);
if (lua_istable(L, -1)) return; /* table already there */ if (lua_istable(L, -1)) return 1; /* table already there */
else { else {
idx = lua_absindex(L, idx); idx = lua_absindex(L, idx);
lua_pop(L, 1); /* remove previous result */ lua_pop(L, 1); /* remove previous result */
lua_newtable(L); lua_newtable(L);
lua_pushvalue(L, -1); /* copy to be left at top */ lua_pushvalue(L, -1); /* copy to be left at top */
lua_setfield(L, idx, fname); /* assign new table to field */ lua_setfield(L, idx, fname); /* assign new table to field */
return 0; /* false, because did not find table there */
} }
} }

4
lauxlib.h
View File

@ -1,5 +1,5 @@
/* /*
** $Id: lauxlib.h,v 1.112 2010/11/16 17:43:29 roberto Exp roberto $ ** $Id: lauxlib.h,v 1.113 2010/11/16 19:20:01 roberto Exp roberto $
** Auxiliary functions for building Lua libraries ** Auxiliary functions for building Lua libraries
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -83,7 +83,7 @@ LUALIB_API const char *(luaL_gsub) (lua_State *L, const char *s, const char *p,
LUALIB_API void (luaL_setfuncs) (lua_State *L, const luaL_Reg *l, int nup); LUALIB_API void (luaL_setfuncs) (lua_State *L, const luaL_Reg *l, int nup);
LUALIB_API void (luaL_findtable) (lua_State *L, int idx, const char *fname); LUALIB_API int (luaL_findtable) (lua_State *L, int idx, const char *fname);
LUALIB_API void (luaL_traceback) (lua_State *L, lua_State *L1, LUALIB_API void (luaL_traceback) (lua_State *L, lua_State *L1,
const char *msg, int level); const char *msg, int level);