lib2.c (385B)
1 #include "lua.h" 2 #include "lauxlib.h" 3 4 static int id (lua_State *L) { 5 return lua_gettop(L); 6 } 7 8 9 static const struct luaL_Reg funcs[] = { 10 {"id", id}, 11 {NULL, NULL} 12 }; 13 14 15 LUAMOD_API int luaopen_lib2 (lua_State *L) { 16 lua_settop(L, 2); 17 lua_setglobal(L, "y"); /* y gets 2nd parameter */ 18 lua_setglobal(L, "x"); /* x gets 1st parameter */ 19 luaL_newlib(L, funcs); 20 return 1; 21 } 22 23