diff options
Diffstat (limited to 'tests')
-rw-r--r-- | tests/C/Makefile | 3 | ||||
-rw-r--r-- | tests/C/lua_call-jsclosure.c | 30 |
2 files changed, 32 insertions, 1 deletions
diff --git a/tests/C/Makefile b/tests/C/Makefile index 816be44..6d21b19 100644 --- a/tests/C/Makefile +++ b/tests/C/Makefile @@ -11,4 +11,5 @@ all: $(CC) $(CFLAGS) $(LIBS) lua_pushboolean.c -o lua_pushboolean.out $(CC) $(CFLAGS) $(LIBS) lua_pushvalue.c -o lua_pushvalue.out $(CC) $(CFLAGS) $(LIBS) lua_pushcclosure-light.c -o lua_pushcclosure-light.out - $(CC) $(CFLAGS) $(LIBS) lua_call.c -o lua_call.out
\ No newline at end of file + $(CC) $(CFLAGS) $(LIBS) lua_call.c -o lua_call.out + $(CC) $(CFLAGS) $(LIBS) lua_call-jsclosure.c -o lua_call-jsclosure.out
\ No newline at end of file diff --git a/tests/C/lua_call-jsclosure.c b/tests/C/lua_call-jsclosure.c new file mode 100644 index 0000000..98fa739 --- /dev/null +++ b/tests/C/lua_call-jsclosure.c @@ -0,0 +1,30 @@ +#include <lua.h> +#include <lualib.h> +#include <lauxlib.h> +#include <stdlib.h> +#include <stdio.h> + +int func(lua_State *L) { + const char *s = lua_tostring(L, lua_upvalueindex(1)); + lua_pushstring(L, s); + return 1; +} + +int main(void) { + + lua_State *L = luaL_newstate(); + + luaL_openlibs(L); + + lua_pushstring(L, "upvalue hello !"); + lua_pushcclosure(L, func, 1); + + lua_call(L, 0, 1); + + printf("Lua returned: %s\n", lua_tostring(L, -1)); + + lua_close(L); + + return 0; + +}
\ No newline at end of file |