mirrors/lua
1
0
Fork 0
mirror of https://github.com/lua/lua synced 2024-11-22 21:01:26 +03:00
Code Issues Packages Projects Releases Wiki Activity

comments

Browse Source
This commit is contained in:
Roberto Ierusalimschy 2009-05-01 10:37:11 -03:00
parent d7bc346d7a
commit 71c2eeff98
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
linit.c
View File

@ -1,5 +1,5 @@
/* /*
** $Id: linit.c,v 1.15 2007/06/22 16:59:11 roberto Exp roberto $ ** $Id: linit.c,v 1.16 2008/01/02 16:16:28 roberto Exp roberto $
** Initialization of libraries for lua.c ** Initialization of libraries for lua.c
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -15,7 +15,7 @@
/* /*
** these libs are preloaded in Lua and are readily available to any program ** these libs are loaded by lua.c and are readily available to any program
*/ */
static const luaL_Reg lualibs[] = { static const luaL_Reg lualibs[] = {
{"_G", luaopen_base}, {"_G", luaopen_base},
@ -30,7 +30,7 @@ static const luaL_Reg lualibs[] = {
/* /*
** these libs must be required before used ** these libs are preloaded and must be required before used
*/ */
static const luaL_Reg luareqlibs[] = { static const luaL_Reg luareqlibs[] = {
{LUA_DBLIBNAME, luaopen_debug}, {LUA_DBLIBNAME, luaopen_debug},
@ -39,12 +39,14 @@ static const luaL_Reg luareqlibs[] = {
LUALIB_API void luaL_openlibs (lua_State *L) { LUALIB_API void luaL_openlibs (lua_State *L) {
/* call open functions from 'lualibs' */
const luaL_Reg *lib = lualibs; const luaL_Reg *lib = lualibs;
for (; lib->func; lib++) { for (; lib->func; lib++) {
lua_pushcfunction(L, lib->func); lua_pushcfunction(L, lib->func);
lua_pushstring(L, lib->name); lua_pushstring(L, lib->name);
lua_call(L, 1, 0); lua_call(L, 1, 0);
} }
/* add open functions from 'luareqlibs' into 'package.preload' table */
lib = luareqlibs; lib = luareqlibs;
luaL_findtable(L, LUA_GLOBALSINDEX, "package.preload", 0); luaL_findtable(L, LUA_GLOBALSINDEX, "package.preload", 0);
for (; lib->func; lib++) { for (; lib->func; lib++) {