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