diff options
Diffstat (limited to 'tests/C')
-rw-r--r-- | tests/C/Makefile | 3 | ||||
-rw-r--r-- | tests/C/lua_setgettable.c | 31 |
2 files changed, 33 insertions, 1 deletions
diff --git a/tests/C/Makefile b/tests/C/Makefile index 52475ec..2b753be 100644 --- a/tests/C/Makefile +++ b/tests/C/Makefile @@ -13,4 +13,5 @@ all: $(CC) $(CFLAGS) $(LIBS) lua_pushcclosure-light.c -o lua_pushcclosure-light.out $(CC) $(CFLAGS) $(LIBS) lua_call.c -o lua_call.out $(CC) $(CFLAGS) $(LIBS) lua_call-jsclosure.c -o lua_call-jsclosure.out - $(CC) $(CFLAGS) $(LIBS) lua_pop.c -o lua_pop.out
\ No newline at end of file + $(CC) $(CFLAGS) $(LIBS) lua_pop.c -o lua_pop.out + $(CC) $(CFLAGS) $(LIBS) lua_setgettable.c -o lua_setgettable.out
\ No newline at end of file diff --git a/tests/C/lua_setgettable.c b/tests/C/lua_setgettable.c new file mode 100644 index 0000000..af3d9f8 --- /dev/null +++ b/tests/C/lua_setgettable.c @@ -0,0 +1,31 @@ +#include <lua.h> +#include <lualib.h> +#include <lauxlib.h> +#include <stdlib.h> +#include <stdio.h> + +int main(void) { + + lua_State *L = luaL_newstate(); + + luaL_openlibs(L); + + lua_newtable(L); + + lua_pushstring(L, "key"); + lua_pushstring(L, "value"); + + lua_settable(L, -3); + + lua_pushstring(L, "key"); + lua_gettable(L, -2); + + + printf("L->top(%d): %s\n", lua_gettop(L), luaL_typename(L, -1)); + printf("Table has value: %s\n", lua_tostring(L, -1)); + + lua_close(L); + + return 0; + +}
\ No newline at end of file |