** Push on the stack the contents of table 'arg' from 1 to #arg */
| 242 | ** Push on the stack the contents of table 'arg' from 1 to #arg |
| 243 | */ |
| 244 | static int pushargs (lua_State *L) { |
| 245 | int i, n; |
| 246 | if (lua_getglobal(L, "arg") != LUA_TTABLE) |
| 247 | luaL_error(L, "'arg' is not a table"); |
| 248 | n = (int)luaL_len(L, -1); |
| 249 | luaL_checkstack(L, n + 3, "too many arguments to script"); |
| 250 | for (i = 1; i <= n; i++) |
| 251 | lua_rawgeti(L, -i, i); |
| 252 | lua_remove(L, -i); /* remove table from the stack */ |
| 253 | return n; |
| 254 | } |
| 255 | |
| 256 | |
| 257 | static int handle_script (lua_State *L, char **argv) { |
no test coverage detected