替代 luaL_getMetaTable 的函数

我想在我的 Delphi 应用程序中启用 Lua-Scripting(Lua 5.1)。为此,我使用 Thomas Lavergne 的头文件。

现在,我尝试注册一个 userdata 类型,遵循这个例子:http://www.lua.org/pil/28.2.html

在“new array function”中,它使用 *luaL_getmetatable* 命令。

static int newarray (lua_State *L) {
  int n = luaL_checkint(L, 1);
  size_t nbytes = sizeof(NumArray) + (n - 1)*sizeof(double);
  NumArray *a = (NumArray *)lua_newuserdata(L, nbytes);

  luaL_getmetatable(L, "LuaBook.array");
  lua_setmetatable(L, -2);

  a->size = n;
  return 1;  /* new userdatum is already on the stack */
}

不幸的是,*luaL_getmetatable* 函数在我的头文件中标记为旧的,并被注释掉了。我试图再次激活它,但如预期的那样,我会收到一个错误,因为找不到 dll 入口点。

这是那个例子的 Delphi 翻译(使用另一个非数组数据类型)

Type
  tMyType = tWhatever;
  pMyType = ^tMyType;
{...}

Function newusertype(aState : pLua_State) : LongInt; cdecl;
  Var
    NewData : pMyType;
  Begin
    Result := 0;
    NewData := lua_newuserdata(aState, SizeOf(tMyType ));
    NewData^ := GetInitValue;
    luaL_getMetaTable(aState, 'myexcample.mytype'); // Error/unknown function
    lua_setmetatable(aState, -2);
    Result := 1;
  End;

现在,我正在寻找一个替代 luaL_getMetaTable 的函数。我没有找到任何关于它的信息。事实上,我没有找到任何关于 luaL_getMetaTable 已过时的信息,但似乎是:(。

原文链接 https://stackoverflow.com/questions/8324301

点赞
stackoverflow用户590975
stackoverflow用户590975

使用 lua_newmetatable(aState, 'myexample.mytype') 这个函数。如果你只想在元表已经存在的情况下继续执行,你需要判断它是否返回了一个0!如果返回了0,那么它想要创建元表…这种情况下你可以使用 lua_pop(aState, 1)

记住,lua_newmetatable 是一个返回整数的函数(实际上应该是布尔型)。

否则,你可以等待我发布 Lua4Delphi 2.0 版本,它可以使所有这些变得更加容易(而专业版实际上可以自动化注册 Delphi 类型和 Lua 实例)。

2011-11-30 14:20:29