Question

我正在使用嵌入Lua的C API。我的目标是：将一个整数数组传递给Lua并计算它们的阶乘，然后将结果传回C并打印出来。

为了实现目标，我的C代码是：

#include <lua.h>
#include <lauxlib.h>
#include <stdlib.h>
#include <stdio.h>

int main(void){
  int status, result, i;
  double fac;

  lua_State *L;  // set Lua state
  L = luaL_newstate();

  luaL_openlibs(L); 

  status = luaL_loadfile(L, "factorial.lua");  // load the Lua script for factorial calculation
  if (status) {
    fprintf(stderr, "Couldn't load file: %s\n", lua_tostring(L, -1));
    exit(1);
  }

  lua_newtable(L);  

  for (i = 1; i <= 10; i++) {
    lua_pushnumber(L, i);   /* Push the table index */
    lua_pushnumber(L, i*2); /* Push the cell value */
    lua_rawset(L, -3);      /* Stores the pair in the table */
  }

  lua_setglobal(L, "foo");

  result = lua_pcall(L, 0, LUA_MULTRET, 0);
  if (result) {
    fprintf(stderr, "Failed to run script: %s\n", lua_tostring(L, -1));
    exit(1);
  }

  // the following loop is for factorial print-out
  while (lua_next(L, -1) != 0) {  
    fac = lua_tonumber(L, -1);
    printf("%.0f\n", fac);
    lua_pop(L, 1);
  }

  lua_close(L);    

  return 0;
}

我的Lua脚本就像：

-- this is the function to calculate the factorial
function fact(n)
if n == 0 then
       return 1
else
   return n * fact(n-1)
end
end

io.write("We calculate the factorial of the following numbers: \n")

return_table = {}
for i = 1, #foo do
 n = foo[i]
 factorial_result = fact(n)
 print(n)
 table.insert(return_table, factorial_result)
end

io.write("Here we show the results: \n")
for i=1,10 do 
return(return_table[i])
end

汇编进展顺利但是当我在终端上运行时，我得到了：

We calculate the factorial of the following numbers:
2.0
4.0
6.0
8.0
10.0
12.0
14.0
16.0
18.0
20.0
Here we show the results:
Segmentation fault (core dumped)

我不知道为什么结果是这样的。从C到Lua的传递似乎没有问题，但从Lua到C有问题。任何人都可以帮我这个吗？

Answer 1

您的代码有两个问题：

您的Lua代码中的循环内有return个语句。一旦命中了一个return语句，你的Lua脚本就会完成执行。它会将这一个值返回给C代码，它将是一个数字，而不是C代码所期望的表。
您没有先pushing a starting key onto the stack来致电lua_next。

在你的Lua代码中，改变一下：

for i=1,10 do 
    return(return_table[i])
end

对此：

return(return_table) -- don't need parentheses here, btw

在您的C代码中，在while循环之前添加lua_pushnil(L)。

Answer 2

执行return后，Lua脚本会停止。

而不是脚本末尾的循环，只需尝试

return return_table

如何将值列表从Lua返回到C并逐个打印？

2 个答案: