Lines Matching defs:arg
89 static lua_State *getthread (lua_State *L, int *arg) {
91 *arg = 1;
95 *arg = 0;
114 int arg;
115 lua_State *L1 = getthread(L, &arg);
116 const char *options = luaL_optstring(L, arg+2, "flnStu");
117 if (lua_isnumber(L, arg+1)) {
118 if (!lua_getstack(L1, (int)lua_tointeger(L, arg+1), &ar)) {
123 else if (lua_isfunction(L, arg+1)) {
126 lua_pushvalue(L, arg+1);
130 return luaL_argerror(L, arg+1, "function or level expected");
132 return luaL_argerror(L, arg+2, "invalid option");
163 int arg;
164 lua_State *L1 = getthread(L, &arg);
167 int nvar = luaL_checkint(L, arg+2); /* local-variable index */
168 if (lua_isfunction(L, arg + 1)) { /* function argument? */
169 lua_pushvalue(L, arg + 1); /* push function */
174 if (!lua_getstack(L1, luaL_checkint(L, arg+1), &ar)) /* out of range? */
175 return luaL_argerror(L, arg+1, "level out of range");
192 int arg;
193 lua_State *L1 = getthread(L, &arg);
195 if (!lua_getstack(L1, luaL_checkint(L, arg+1), &ar)) /* out of range? */
196 return luaL_argerror(L, arg+1, "level out of range");
197 luaL_checkany(L, arg+3);
198 lua_settop(L, arg+3);
200 lua_pushstring(L, lua_setlocal(L1, &ar, luaL_checkint(L, arg+2)));
297 int arg, mask, count;
299 lua_State *L1 = getthread(L, &arg);
300 if (lua_isnoneornil(L, arg+1)) {
301 lua_settop(L, arg+1);
305 const char *smask = luaL_checkstring(L, arg+2);
306 luaL_checktype(L, arg+1, LUA_TFUNCTION);
307 count = luaL_optint(L, arg+3, 0);
317 lua_pushvalue(L, arg+1);
325 int arg;
326 lua_State *L1 = getthread(L, &arg);
360 int arg;
361 lua_State *L1 = getthread(L, &arg);
362 const char *msg = lua_tostring(L, arg + 1);
363 if (msg == NULL && !lua_isnoneornil(L, arg + 1)) /* non-string 'msg'? */
364 lua_pushvalue(L, arg + 1); /* return it untouched */
366 int level = luaL_optint(L, arg + 2, (L == L1) ? 1 : 0);