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