| 81 | |
| 82 | |
| 83 | static StkId index2stack (lua_State *L, int idx) { |
| 84 | CallInfo *ci = L->ci; |
| 85 | if (idx > 0) { |
| 86 | StkId o = ci->func + idx; |
| 87 | api_check(L, o < L->top, "unacceptable index"); |
| 88 | return o; |
| 89 | } |
| 90 | else { /* non-positive index */ |
| 91 | api_check(L, idx != 0 && -idx <= L->top - (ci->func + 1), "invalid index"); |
| 92 | api_check(L, !ispseudo(idx), "invalid index"); |
| 93 | return L->top + idx; |
| 94 | } |
| 95 | } |
| 96 | |
| 97 | |
| 98 | LUA_API int lua_checkstack (lua_State *L, int n) { |
no outgoing calls
no test coverage detected