| 204 | |
| 205 | |
| 206 | LUA_API void lua_closeslot (lua_State *L, int idx) { |
| 207 | StkId level; |
| 208 | lua_lock(L); |
| 209 | level = index2stack(L, idx); |
| 210 | api_check(L, (L->ci->callstatus & CIST_TBC) && (L->tbclist.p == level), |
| 211 | "no variable to close at given level"); |
| 212 | level = luaF_close(L, level, CLOSEKTOP, 0); |
| 213 | setnilvalue(s2v(level)); |
| 214 | lua_unlock(L); |
| 215 | } |
| 216 | |
| 217 | |
| 218 | /* |
no test coverage detected