From 05feb70188fb7de6ae26d435e8a77ad9b92c3840 Mon Sep 17 00:00:00 2001
From: pixel <pixel>
Date: Fri, 27 Jul 2007 15:47:33 +0000
Subject: Forgot some files new from the Lua-5.1 release.

---
 lib/lua/src/LuaLib/linit.c | 38 ++++++++++++++++++++++++++++++++++++++
 1 file changed, 38 insertions(+)
 create mode 100644 lib/lua/src/LuaLib/linit.c

(limited to 'lib/lua/src/LuaLib/linit.c')

diff --git a/lib/lua/src/LuaLib/linit.c b/lib/lua/src/LuaLib/linit.c
new file mode 100644
index 0000000..96a3eac
--- /dev/null
+++ b/lib/lua/src/LuaLib/linit.c
@@ -0,0 +1,38 @@
+/*
+** $Id: linit.c,v 1.1 2007-07-27 15:47:33 pixel 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.3