Function open

ogsr_engine/Luabind/src/open.cpp:30–65

namespace luabind {

    void open(lua_State* L)
    {
        // get the global class registry, or create one if it doesn't exist
        // (it's global within a lua state)
        detail::class_registry* r = 0;

        // If you hit this assert it's because you have called luabind::open()
        // twice on the same lua_State.
        assert((detail::class_registry::get_registry(L) == 0) 
            && "you cannot call luabind::open() twice");

        lua_pushstring(L, "__luabind_classes");
        r = static_cast<detail::class_registry*>(
            lua_newuserdata(L, sizeof(detail::class_registry)));

        // set gc metatable
        lua_newtable(L);
        lua_pushstring(L, "__gc");
        lua_pushcclosure(
            L
          , detail::garbage_collector_s<
                detail::class_registry
            >::apply
          , 0);

        lua_settable(L, -3);
        lua_setmetatable(L, -2);

        new(r) detail::class_registry(L);
        lua_settable(L, LUA_REGISTRYINDEX);

        // add functions (class, cast etc...)
        lua_pushstring(L, "class");
        lua_pushcclosure(L, detail::create_class::stage1, 0);
        lua_settable(L, LUA_GLOBALSINDEX);
    }

} // namespace luabind