Iterowanie przez tabelę Lua z C ++?
Próbuję załadować tabele zLua do C ++, ale mam problem z uzyskaniem poprawności. Przechodzę przez pierwszą iterację, ale w drugim wywołaniu lua_next ulega awarii. Jakieś pomysły?
Plik Lua:
level = { 1, 2, 3, }
Plik C ++ - najpierw to zrobiłem:
lua_getglobal( L, "level" );
for( lua_pushnil( L ); lua_next( L, 1 ); lua_pop( L, -2 ) )
{
if( lua_isnumber( L, -1 ) ) {
int i = (int)lua_tonumber( L, -1 );
//use number
}
}
lua_pop( L, 1 );
Potem spróbowałem zinstrukcja obsługi:
lua_getglobal( L, "level" );
int t = 1;
lua_pushnil( L );
while( lua_next( L, t ) ) {
printf( "%s - %s",
lua_typename( L, lua_type( L, -2 ) ),
lua_typename( L, lua_type( L, -1 ) ) );
lua_pop( L, 1 );
}
lua_pop( L, 1 );
I wreszcie:
lua_getglobal( L, "level" );
lua_pushnil( L );
lua_next( L, 1 );
if( lua_isnumber( L, -1 ) ) {
int i = (int)lua_tonumber( L, -1 );
//use number fine
}
lua_pop( L, 1 );
lua_next( L, 1 ); //crashes
etc...
Naturalnie L jest lua_State *, a ja go inicjuję i analizuję plik w porządku.
Edytować: W odpowiedzi na odpowiedź Jessego Bedera wypróbowałem ten kod za pomocą rejestratora, ale wciąż nie mogę go uruchomić.
Log::Get().Write( "engine", "stack size: %i", lua_gettop( L ) );
lua_getglobal(L, "level");
if( lua_istable( L, -1 ) )
Log::Get().Write( "engine", "-1 is a table" );
lua_pushnil(L);
if( lua_isnil( L, -1 ) )
Log::Get().Write( "engine", "-1 is now nil" );
if( lua_istable( L, -2 ) )
Log::Get().Write( "engine", "-2 is now table" );
int pred = lua_next( L, -2 );
Log::Get().Write( "engine", "pred: %i", pred );
while( pred ) {
Log::Get().Write( "engine", "loop stuff" );
if( lua_isnumber( L, -1 ) ) {
int i = (int)lua_tonumber( L, -1 );
//use number
Log::Get().Write( "engine", "num: %i", i );
}
Log::Get().Write( "engine", "stack size: %i", lua_gettop( L ) );
if( lua_istable( L, -3 ) )
Log::Get().Write( "engine", "-3 is now table" );
lua_pop( L, 1 );
Log::Get().Write( "engine", "stack size: %i", lua_gettop( L ) );
if( lua_istable( L, -2 ) )
Log::Get().Write( "engine", "-2 is now table" );
pred = lua_next( L, -2 );
Log::Get().Write( "engine", "pred: %i", pred );
}
lua_pop( L, 1 );
Który dał to wyjście:
stack size: 0
-1 is a table
-1 is now nil
-2 is now table
pred: 1
loop stuff
num: 1
stack size: 3
-3 is now table
stack size: 2
-2 is now table
Wszystko, co powiedziałeś, Jesse, wydaje się prawdziwe. Ale nadal nie udaje się przejść do następnej iteracji.
Edit2: Próbowałem skopiować dokładny kod do nowego projektu, pomijając wszystkie otaczające klasy i rzeczy, których nie zawracałem sobie głowy tutaj i tam, to działa. Ale tutaj nie, i przetrwa tylko jedno wywołanie lua_next.
Edit3: Zawęziłem to nieco dalej. używamhge jak mój silnik 2D. W teście funkcji umieściłem cały poprzedni kod:
test(); //works
if( hge->System_Initiate() )
{
test(); //fails
hge->System_Start();
}
O ile rozumiem, Hge nie robi nic z lua.Tutajto kod źródłowy małego testu, który zrobiłem. Źródłem hge 1.81 jesttutaj.
Edit4: Rozmiar pytania wymyka się spod kontroli, ale nie można mu pomóc. To najmniejszy kod, do którego udało mi się go zredukować.
extern "C"
{
#include <lua/lua.h>
#include <lua/lualib.h>
#include <lua/lauxlib.h>
}
#include <hge\hge.h>
bool frame_func()
{
return true;
}
bool render_func()
{
return false;
}
void test()
{
lua_State *L = lua_open();
luaL_openlibs( L );
if( luaL_dofile( L, "levels.lua" ) ) {
lua_pop( L, -1 );
return;
}
lua_getglobal(L, "level");
lua_pushnil(L);
while( lua_next( L, -2 ) ) {
if( lua_isnumber( L, -1 ) ) {
int i = (int)lua_tonumber( L, -1 );
//use number
}
lua_pop( L, 1 );
}
lua_pop( L, 1 );
lua_close( L );
}
int main()
{
HGE *hge = hgeCreate( HGE_VERSION );
hge->System_SetState( HGE_FRAMEFUNC, frame_func );
hge->System_SetState( HGE_RENDERFUNC, render_func );
hge->System_SetState( HGE_WINDOWED, true );
hge->System_SetState( HGE_SCREENWIDTH, 800 );
hge->System_SetState( HGE_SCREENHEIGHT, 600 );
hge->System_SetState( HGE_SCREENBPP, 32 );
//test(); //works
if( hge->System_Initiate() )
{
test(); //fails
hge->System_Start();
}
hge->Release();
return 0;
}