0

我正在尝试使用 Lua 注册一个向量类型，但是当我从 Lua 调用添加元函数时，我遇到了一个奇怪的“尝试索引新值”错误。

这是涉及的代码部分。我没有包含任何其他元函数（它们有同样的问题，唯一的区别是最后一行中使用的数学运算符）。错误似乎来自static int LuaVector_lua___add(lua_State *L)函数。

static void LuaVector_pushVector(lua_State *L, double x, double y)
{ 
    lua_newtable(L);

    lua_pushstring(L, "x");
    lua_pushnumber(L, x);
    lua_settable(L, -3);

    lua_pushstring(L, "y");
    lua_pushnumber(L, y);
    lua_settable(L, -3);

    lua_newtable(L);

    lua_pushstring(L, "__add");
    lua_pushcfunction(L, LuaVector_lua___add);
    lua_settable(L, -3);

    lua_setmetatable(L, -2);
}

static int LuaVector_lua___add(lua_State *L)
{
    if (!lua_istable(L, 1))
        luaL_error(L, "Table excepted for argument #1 LuaVector_lua___add");
    if (!lua_istable(L, 2))
        luaL_error(L, "Table excepted for argument #2 LuaVector_lua___add");


    double x1=0, y1=0, x2=0, y2=0;

    /* The error occurs somewhere between here */

    lua_pushstring(L, "x");
    lua_gettable(L, 1);
    x1 = lua_tonumber(L, -1);
    lua_pop(L, -1);

    lua_pushstring(L, "y");
    lua_gettable(L, 1);
    y1 = lua_tonumber(L, -1);
    lua_pop(L, -1);

    lua_pushstring(L, "x");
    lua_gettable(L, 2);
    x2 = lua_tonumber(L, -1);
    lua_pop(L, -1);

    lua_pushstring(L, "y");
    lua_gettable(L, 2);
    y2 = lua_tonumber(L, -1);
    lua_pop(L, -1);

    /* And here */

    LuaVector_pushVector(L, x1 + x2, y1 + y2);

    return 1;
}


int LuaVector_lua_new(lua_State *L)
{
    double x = 0;
    if (!lua_isnil(L, 1))
        x = lua_tonumber(L, 1);

    double y = 0;
    if (!lua_isnil(L, 2))
        y = lua_tonumber(L, 2);


    LuaVector_pushVector(L, x, y);

    return 1;
}

void LuaVector_luaregister(lua_State *L)
{
    lua_newtable(L);

    lua_pushstring(L, "new");
    lua_pushcfunction(L, LuaVector_lua_new);
    lua_settable(L, -3);

    lua_setglobal(L, "Vector");
}

它与代码崩溃：

local vec1 = Vector.new(2, 2)
local vec2 = Vector.new(4, 4)
local vec3 = vec1 + vec2

我试图找出导致它的原因，但我无法确定有故障的实际线路（不过，我相信它lua_gettable本身会触发错误）。所以它可能是任何东西，但我似乎无法弄清楚。

4

1 回答 1

2

lua_pop 从栈中弹出n 个元素

但是你已经写lua_pop(L, -1)了（这会清除整个堆栈）。将这些更改lua_pop(L, 1)为仅弹出堆栈顶部。

于 2015-08-03T16:58:30.553 回答