summaryrefslogtreecommitdiffstats
path: root/debian/grub-extras/lua/linit.c
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--debian/grub-extras/lua/linit.c38
1 files changed, 38 insertions, 0 deletions
diff --git a/debian/grub-extras/lua/linit.c b/debian/grub-extras/lua/linit.c
new file mode 100644
index 0000000..f920a0b
--- /dev/null
+++ b/debian/grub-extras/lua/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);
+ }
+}
+