elua lib: test elua_util_file_run

diff --git a/src/tests/elua/elua_lib.c b/src/tests/elua/elua_lib.c
index ffa99f5..6c8952c 100644 (file)
--- a/src/tests/elua/elua_lib.c
+++ b/src/tests/elua/elua_lib.c
@@ -13,6 +13,9 @@ START_TEST(elua_api)
 {
     Elua_State *st;
     lua_State *lst;
+    char buf[] = "tmpXXXXXX";
+    FILE *f;
+    int fd;
 
     fail_if(!elua_init());
 
@@ -75,6 +78,17 @@ START_TEST(elua_api)
     fail_if(lua_type(lst, -1) != LUA_TSTRING);
     lua_pop(lst, 1);
 
+    fd = mkstemp(buf);
+    fail_if(fd < 0);
+    f = fdopen(fd, "w");
+    fail_if(!f);
+    fprintf(f, "return 5\n");
+    fclose(f);
+    fail_if(elua_util_file_run(st, buf));
+    fail_if(lua_tointeger(lst, -1) != 5);
+    lua_pop(lst, 1);
+    fail_if(remove(buf));
+
     /* halfassed testing here, but not possible otherwise */
     fail_if(elua_util_error_report(st, "foo", 0));
     lua_pushliteral(lst, "msg");