Method addLuaLoader

extensions/scripting/lua-bindings/manual/LuaStack.cpp:263–293

}

void LuaStack::addLuaLoader(lua_CFunction func)
{
    if (!func)
        return;

#if LUA_VERSION_NUM >= 504 || (LUA_VERSION_NUM >= 502 && !defined(LUA_COMPAT_LOADERS))
    const char* realname = "searchers";
#else
    const char* realname = "loaders";
#endif

    // stack content after the invoking of the function
    // get loader table
    lua_getglobal(_state, "package");   /* L: package */
    lua_getfield(_state, -1, realname); /* L: package, loaders */

    // insert loader into index 2
    lua_pushcfunction(_state, func); /* L: package, loaders, func */
    for (int i = (int)(lua_objlen(_state, -2) + 1); i > 2; --i)
    {
        lua_rawgeti(_state, -2, i - 1); /* L: package, loaders, func, function */
        // we call lua_rawgeti, so the loader table now is at -3
        lua_rawseti(_state, -3, i); /* L: package, loaders, func */
    }
    lua_rawseti(_state, -2, 2); /* L: package, loaders */

    // set loaders into package
    lua_setfield(_state, -2, realname); /* L: package */

    lua_pop(_state, 1);
}

void LuaStack::removeScriptObjectByObject(Object* pObj)
{