** Push on the stack the contents of table 'arg' from 1 to #arg */
| 225 | ** Push on the stack the contents of table 'arg' from 1 to #arg |
| 226 | */ |
| 227 | static int pushargs (lua_State *L) { |
| 228 | int i, n; |
| 229 | if (lua_getglobal(L, "arg") != LUA_TTABLE) |
| 230 | luaL_error(L, "'arg' is not a table"); |
| 231 | n = (int)luaL_len(L, -1); |
| 232 | luaL_checkstack(L, n + 3, "too many arguments to script"); |
| 233 | for (i = 1; i <= n; i++) |
| 234 | lua_rawgeti(L, -i, i); |
| 235 | lua_remove(L, -i); /* remove table from the stack */ |
| 236 | return n; |
| 237 | } |
| 238 | |
| 239 | |
| 240 | static int handle_script (lua_State *L, char **argv) { |
no test coverage detected