如何 return 从 Lua 到 C 的值列表并一一打印?
How to return a list of values from Lua to C and print them one by one?
我正在使用嵌入了 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 却有问题。有人可以帮我解决这个问题吗?
执行 return
后,Lua 脚本停止。
不要在脚本末尾循环,而是简单地尝试
return return_table
您的代码有两个问题:
- 您的 Lua 代码中的循环内有一个
return
语句。一旦 return 语句被命中,你的 Lua 脚本就完成了执行。它会 return C 代码的一个值,它将是一个数字,而不是 table 你的 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)
。
我正在使用嵌入了 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 却有问题。有人可以帮我解决这个问题吗?
执行 return
后,Lua 脚本停止。
不要在脚本末尾循环,而是简单地尝试
return return_table
您的代码有两个问题:
- 您的 Lua 代码中的循环内有一个
return
语句。一旦 return 语句被命中,你的 Lua 脚本就完成了执行。它会 return C 代码的一个值,它将是一个数字,而不是 table 你的 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)
。