これは、テーブルをネストする方法を示す完全で最小限のプログラムです。基本的にあなたが欠けているのはlua_setfield
機能です。
#include <stdio.h>
#include "lua.h"
#include "lauxlib.h"
#include "lualib.h"
int main()
{
int res;
lua_State *L = lua_open();
luaL_openlibs(L);
lua_newtable(L); /* bottom table */
lua_newtable(L); /* upper table */
lua_pushinteger(L, 4);
lua_setfield(L, -2, "four"); /* T[four] = 4 */
lua_setfield(L, -2, "T"); /* name upper table field T of bottom table */
lua_setglobal(L, "t"); /* set bottom table as global variable t */
res = luaL_dostring(L, "print(t.T.four == 4)");
if(res)
{
printf("Error: %s\n", lua_tostring(L, -1));
}
return 0;
}
プログラムは単純にtrue
.
数値インデックスが必要な場合は、引き続き使用しlua_settable
ます。
#include <stdio.h>
#include "lua.h"
#include "lauxlib.h"
#include "lualib.h"
int main()
{
int res;
lua_State *L = lua_open();
luaL_openlibs(L);
lua_newtable(L); /* bottom table */
lua_newtable(L); /* upper table */
lua_pushinteger(L, 0);
lua_pushinteger(L, 4);
lua_settable(L, -3); /* uppertable[0] = 4; pops 0 and 4 */
lua_pushinteger(L, 0);
lua_insert(L, -2); /* swap uppertable and 0 */
lua_settable(L, -3); /* bottomtable[0] = uppertable */
lua_setglobal(L, "t"); /* set bottom table as global variable t */
res = luaL_dostring(L, "print(t[0][0] == 4)");
if(res)
{
printf("Error: %s\n", lua_tostring(L, -1));
}
return 0;
}
lua_objlen
私が行ったように 0 の絶対インデックスを使用するのではなく、インデックスを生成するために使用したい場合があります。