Last change
on this file since 2506 was
1810,
checked in by rgrieder, 16 years ago
|
merged ceguilua branch back to trunk
|
-
Property svn:eol-style set to
native
|
File size:
765 bytes
|
Line | |
---|
1 | /* |
---|
2 | ** $Id: linit.c,v 1.14.1.1 2007/12/27 13:02:25 roberto Exp $ |
---|
3 | ** Initialization of libraries for lua.c |
---|
4 | ** See Copyright Notice in lua.h |
---|
5 | */ |
---|
6 | |
---|
7 | |
---|
8 | #define linit_c |
---|
9 | #define LUA_LIB |
---|
10 | |
---|
11 | #include "lua.h" |
---|
12 | |
---|
13 | #include "lualib.h" |
---|
14 | #include "lauxlib.h" |
---|
15 | |
---|
16 | |
---|
17 | static const luaL_Reg lualibs[] = { |
---|
18 | {"", luaopen_base}, |
---|
19 | {LUA_LOADLIBNAME, luaopen_package}, |
---|
20 | {LUA_TABLIBNAME, luaopen_table}, |
---|
21 | {LUA_IOLIBNAME, luaopen_io}, |
---|
22 | {LUA_OSLIBNAME, luaopen_os}, |
---|
23 | {LUA_STRLIBNAME, luaopen_string}, |
---|
24 | {LUA_MATHLIBNAME, luaopen_math}, |
---|
25 | {LUA_DBLIBNAME, luaopen_debug}, |
---|
26 | {NULL, NULL} |
---|
27 | }; |
---|
28 | |
---|
29 | |
---|
30 | LUALIB_API void luaL_openlibs (lua_State *L) { |
---|
31 | const luaL_Reg *lib = lualibs; |
---|
32 | for (; lib->func; lib++) { |
---|
33 | lua_pushcfunction(L, lib->func); |
---|
34 | lua_pushstring(L, lib->name); |
---|
35 | lua_call(L, 1, 0); |
---|
36 | } |
---|
37 | } |
---|
38 | |
---|
Note: See
TracBrowser
for help on using the repository browser.