| 163 | |
| 164 | |
| 165 | static int db_setlocal (lua_State *L) { |
| 166 | int arg; |
| 167 | lua_State *L1 = getthread(L, &arg); |
| 168 | lua_Debug ar; |
| 169 | if (!lua_getstack(L1, luaL_checkint(L, arg+1), &ar)) /* out of range? */ |
| 170 | return luaL_argerror(L, arg+1, "level out of range"); |
| 171 | luaL_checkany(L, arg+3); |
| 172 | lua_settop(L, arg+3); |
| 173 | lua_xmove(L, L1, 1); |
| 174 | lua_pushstring(L, lua_setlocal(L1, &ar, luaL_checkint(L, arg+2))); |
| 175 | return 1; |
| 176 | } |
| 177 | |
| 178 | |
| 179 | static int auxupvalue (lua_State *L, int get) { |
nothing calls this directly
no test coverage detected