| 163 | |
| 164 | |
| 165 | LUA_API void lua_settop (lua_State *L, int idx) { |
| 166 | lua_lock(L); |
| 167 | if (idx >= 0) { |
| 168 | api_check(L, idx <= L->stack_last - L->base); |
| 169 | while (L->top < L->base + idx) |
| 170 | setnilvalue(L->top++); |
| 171 | L->top = L->base + idx; |
| 172 | } |
| 173 | else { |
| 174 | api_check(L, -(idx+1) <= (L->top - L->base)); |
| 175 | L->top += idx+1; /* `subtract' index (index is negative) */ |
| 176 | } |
| 177 | lua_unlock(L); |
| 178 | } |
| 179 | |
| 180 | |
| 181 | LUA_API void lua_remove (lua_State *L, int idx) { |
no outgoing calls
no test coverage detected