| 210 | |
| 211 | |
| 212 | LUA_API void lua_closeslot (lua_State *L, int idx) { |
| 213 | StkId level; |
| 214 | lua_lock(L); |
| 215 | level = index2stack(L, idx); |
| 216 | api_check(L, hastocloseCfunc(L->ci->nresults) && L->tbclist == level, |
| 217 | "no variable to close at given level"); |
| 218 | luaF_close(L, level, CLOSEKTOP, 0); |
| 219 | level = index2stack(L, idx); /* stack may be moved */ |
| 220 | setnilvalue(s2v(level)); |
| 221 | lua_unlock(L); |
| 222 | } |
| 223 | |
| 224 | |
| 225 | /* |
no test coverage detected