Lua. Проблема с возвратом результатов [SOLVED]

[MageSlayer]

Хай

Использую pLua.
Пытаюсь заставить работать элементарный пример на Lua

Код: Выделить всё

local R = ObjC(1, 2)
N = R.Name
return R

Объект R нормально создается функцией Obj из FreePascal. То есть биндинг ObjC для Lua сделан правильно. Нормально отрабатывает вызов функции Name.
А вот когда дело доходит до возрата самого объекта - вываливается AV.

Код запуска скрипта:

Код: Выделить всё

  ErrorTest(lua_pcall(L, 0, LUA_MULTRET, 0));

  //когда вместо объекта возвращаю обычное число, то все ок
  result:=lua_tointeger(l, -1);

  //а так выпадает исключение
  Result:=plua_getObject(l, -1);

Может кто чего подскажет?

[Mr.Smart]

Для работы с LUA использую только LuaAPI. PLua никогда не использовал.
попробуйте посмотреть тип значения после возврата из функции

Код: Выделить всё

lua_type(L,-1)

а вообще задайте свой вопрос ещё и на форуме lua.ru

[MageSlayer]

Для работы с LUA использую только LuaAPI. PLua никогда не использовал.
попробуйте посмотреть тип значения после возврата из функции

Код: Выделить всё

lua_type(L,-1)

На выходе тип 5. Судя по документации - это таблица.
Как-то надо разобраться что же там все-таки лежит, в этой таблице.

а вообще задайте свой вопрос ещё и на форуме lua.ru

Так и сделал

[Mr.Smart]

MageSlayer
Я смотрю люди не очень стремятся разобраться с вашим вопросом (и на lua.ru тоже тишина).
Выкладывайте код где возникает ошибка. Будем разбираться

[MageSlayer]

MageSlayer
Я смотрю люди не очень стремятся разобраться с вашим вопросом (и на lua.ru тоже тишина).
Выкладывайте код где возникает ошибка. Будем разбираться

Спасибо за предложение.
Я уже разобрался. Когда вы подсказали посмотреть lua_type(L,-1) и там оказалась таблица это навело на мысль о том, работает все правильно, просто я пытаюсь неправильно снять результат со стека Lua.

Проблема в итоге решилась очень просто.
Этот код выглядит правильно пока не заглянешь внутрь plua_getObject.

Код: Выделить всё

Result:=plua_getObject(l, -1);

В общем, в plua_getObject при отрицательных значениях индекса стека происходит обращение не к тому элементу. Если код заменить на:

Код: Выделить всё

  tix:=lua_gettop(l);
  if lua_type(L,-1) = LUA_TTABLE then
    Result:=plua_getObject(l, tix);

... то объект успешно снимается со стека.
Похоже что, это баг в pLua.

Еще раз спасибо за содействие.