diff options
Diffstat (limited to 'ldblib.c')
| -rw-r--r-- | ldblib.c | 4 |
1 files changed, 2 insertions, 2 deletions
| @@ -202,8 +202,6 @@ static int db_getinfo (lua_State *L) { | |||
| 202 | static int db_getlocal (lua_State *L) { | 202 | static int db_getlocal (lua_State *L) { |
| 203 | int arg; | 203 | int arg; |
| 204 | lua_State *L1 = getthread(L, &arg); | 204 | lua_State *L1 = getthread(L, &arg); |
| 205 | lua_Debug ar; | ||
| 206 | const char *name; | ||
| 207 | int nvar = (int)luaL_checkinteger(L, arg + 2); /* local-variable index */ | 205 | int nvar = (int)luaL_checkinteger(L, arg + 2); /* local-variable index */ |
| 208 | if (lua_isfunction(L, arg + 1)) { /* function argument? */ | 206 | if (lua_isfunction(L, arg + 1)) { /* function argument? */ |
| 209 | lua_pushvalue(L, arg + 1); /* push function */ | 207 | lua_pushvalue(L, arg + 1); /* push function */ |
| @@ -211,6 +209,8 @@ static int db_getlocal (lua_State *L) { | |||
| 211 | return 1; /* return only name (there is no value) */ | 209 | return 1; /* return only name (there is no value) */ |
| 212 | } | 210 | } |
| 213 | else { /* stack-level argument */ | 211 | else { /* stack-level argument */ |
| 212 | lua_Debug ar; | ||
| 213 | const char *name; | ||
| 214 | int level = (int)luaL_checkinteger(L, arg + 1); | 214 | int level = (int)luaL_checkinteger(L, arg + 1); |
| 215 | if (!lua_getstack(L1, level, &ar)) /* out of range? */ | 215 | if (!lua_getstack(L1, level, &ar)) /* out of range? */ |
| 216 | return luaL_argerror(L, arg+1, "level out of range"); | 216 | return luaL_argerror(L, arg+1, "level out of range"); |
