summaryrefslogtreecommitdiff
path: root/source3/lua-5.1.4/src/linit.c
diff options
context:
space:
mode:
authorVolker Lendecke <vl@samba.org>2008-09-19 08:01:23 +0200
committerVolker Lendecke <vl@samba.org>2008-12-17 12:57:18 +0100
commit390f19b649b85a8f8ab762c6a4e9d1a3d23d3f47 (patch)
tree9f9506e36222640d23b086d62b32de940c526a98 /source3/lua-5.1.4/src/linit.c
parent081f8883bafc11ca7c08f868ec19f1ea32071837 (diff)
downloadsamba-390f19b649b85a8f8ab762c6a4e9d1a3d23d3f47.tar.gz
samba-390f19b649b85a8f8ab762c6a4e9d1a3d23d3f47.tar.bz2
samba-390f19b649b85a8f8ab762c6a4e9d1a3d23d3f47.zip
Add the Lua distibution from http://www.lua.org/ftp/lua-5.1.4.tar.gz
Available under the MIT license. Adding it to see how the build farm likes it. They claim to be 100% pure ANSI C and compile everywhere. Lets see. If it breaks badly, we can remove it again.
Diffstat (limited to 'source3/lua-5.1.4/src/linit.c')
-rw-r--r--source3/lua-5.1.4/src/linit.c37
1 files changed, 37 insertions, 0 deletions
diff --git a/source3/lua-5.1.4/src/linit.c b/source3/lua-5.1.4/src/linit.c
new file mode 100644
index 0000000000..16c72ac552
--- /dev/null
+++ b/source3/lua-5.1.4/src/linit.c
@@ -0,0 +1,37 @@
+/*
+** $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);
+ }
+}