Changeset 74 for trunk/src/lua/lua_state.cc

Timestamp:

06/01/13 17:07:09 (12 years ago)

Author:

epyon

Message:

• lua::state - removed notion of global state
• lua_glm - fixed stack pollution at registration
• lualib_test - made use of lua::state

File:

• trunk/src/lua/lua_state.cc (modified) (4 diffs)

trunk/src/lua/lua_state.cc

@@ -24 +24 @@
 }
 
-lua::state::state( bool is_main /*= false*/ )
-{
+lua::state::state( bool load_libs /*= false*/ )
+{
+        load_lua_library();
         m_owner = true;
         L = luaL_newstate( );
@@ -33 +34 @@
         lua_call(L, 1, 0);
 
-        if (is_main)
-        {
-                NV_ASSERT( this == get(), "lua_state : another main state created!" );
+        if ( load_libs )
+        {
                 stack_guard guard( this );
-                luaopen_base( L );
-                luaopen_string( L );
-                luaopen_table( L );
-                luaopen_math( L );
-        }
-
-        NV_LOG( nv::LOG_TRACE, is_main ? "Main Lua state created" : "Secondary Lua state created");
+                static const luaL_Reg lualibs[] =
+                {
+                        { "string", luaopen_string },
+                        { "table",  luaopen_table },
+                        { "math",   luaopen_math },
+                        { NULL, NULL}
+                };
+                const luaL_Reg *lib = lualibs;
+                for(; lib->func != NULL; lib++)
+                {
+                        lib->func( L );
+                }
+        }
+
+        NV_LOG( nv::LOG_TRACE, "Lua state created" );
 }
 
@@ -121 +129 @@
 }
 
-lua::state* lua::state::get()
-{
-        static lua::state main_state(true);
-        return &main_state;
-}
-
 bool lua::state::push( const std::string& path, bool global )
 {
@@ -275 +277 @@
         for ( int i = 0; i < top; ++i )
         {
-                NV_LOG( LOG_DEBUG, "#" << i+1 << " - " << lua_typename(L, i+1) << " = " << nlua_typecontent(L, i+1) );
+                NV_LOG( LOG_DEBUG, "#" << i+1 << " - " << lua_typename(L, lua_type(L, i+1) ) << " = " << nlua_typecontent(L, i+1) );
         }
 }