| 436 | |
| 437 | |
| 438 | static int handle_script (lua_State *L, char **argv) { |
| 439 | int status; |
| 440 | const char *fname = argv[0]; |
| 441 | if (strcmp(fname, "-") == 0 && strcmp(argv[-1], "--") != 0) |
| 442 | fname = NULL; /* stdin */ |
| 443 | status = luaL_loadfile(L, fname); |
| 444 | if (status == LUA_OK) { |
| 445 | int n = pushargs(L); /* push arguments to script */ |
| 446 | status = docall(L, n, LUA_MULTRET); |
| 447 | } |
| 448 | return report(L, status); |
| 449 | } |
| 450 | |
| 451 | |
| 452 |