From b8147afcc5bfbeb5fad62e4f68f1b88fc6c60d96 Mon Sep 17 00:00:00 2001 From: sanine Date: Thu, 18 Aug 2022 20:52:26 -0500 Subject: add lua-5.1.5 files --- libs/lua-5.1.5/src/linit.c | 38 ++++++++++++++++++++++++++++++++++++++ 1 file changed, 38 insertions(+) create mode 100644 libs/lua-5.1.5/src/linit.c (limited to 'libs/lua-5.1.5/src/linit.c') diff --git a/libs/lua-5.1.5/src/linit.c b/libs/lua-5.1.5/src/linit.c new file mode 100644 index 0000000..c1f90df --- /dev/null +++ b/libs/lua-5.1.5/src/linit.c @@ -0,0 +1,38 @@ +/* +** $Id: linit.c,v 1.14.1.1 2007/12/27 13:02:25 roberto Exp $ +** Initialization of libraries for lua.c +** See Copyright Notice in lua.h +*/ + + +#define linit_c +#define LUA_LIB + +#include "lua.h" + +#include "lualib.h" +#include "lauxlib.h" + + +static const luaL_Reg lualibs[] = { + {"", luaopen_base}, + {LUA_LOADLIBNAME, luaopen_package}, + {LUA_TABLIBNAME, luaopen_table}, + {LUA_IOLIBNAME, luaopen_io}, + {LUA_OSLIBNAME, luaopen_os}, + {LUA_STRLIBNAME, luaopen_string}, + {LUA_MATHLIBNAME, luaopen_math}, + {LUA_DBLIBNAME, luaopen_debug}, + {NULL, NULL} +}; + + +LUALIB_API void luaL_openlibs (lua_State *L) { + const luaL_Reg *lib = lualibs; + for (; lib->func; lib++) { + lua_pushcfunction(L, lib->func); + lua_pushstring(L, lib->name); + lua_call(L, 1, 0); + } +} + -- cgit v1.2.1