| 142 | |
| 143 | |
| 144 | static int db_getlocal (lua_State *L) { |
| 145 | int arg; |
| 146 | lua_State *L1 = getthread(L, &arg); |
| 147 | lua_Debug ar; |
| 148 | const char *name; |
| 149 | if (!lua_getstack(L1, luaL_checkint(L, arg+1), &ar)) /* out of range? */ |
| 150 | return luaL_argerror(L, arg+1, "level out of range"); |
| 151 | name = lua_getlocal(L1, &ar, luaL_checkint(L, arg+2)); |
| 152 | if (name) { |
| 153 | lua_xmove(L1, L, 1); |
| 154 | lua_pushstring(L, name); |
| 155 | lua_pushvalue(L, -2); |
| 156 | return 2; |
| 157 | } |
| 158 | else { |
| 159 | lua_pushnil(L); |
| 160 | return 1; |
| 161 | } |
| 162 | } |
| 163 | |
| 164 | |
| 165 | static int db_setlocal (lua_State *L) { |
nothing calls this directly
no test coverage detected