49 static TValue *index2adr (lua_State *L, int idx) {  in index2adr()  argument
50   if (idx > 0) {  in index2adr()
51     TValue *o = L->base + (idx - 1);  in index2adr()
52     api_check(L, idx <= L->ci->top - L->base);  in index2adr()
56   else if (idx > LUA_REGISTRYINDEX) {  in index2adr()
57     api_check(L, idx != 0 && -idx <= L->top - L->base);  in index2adr()
58     return L->top + idx;  in index2adr()
60   else switch (idx) {  /* pseudo-indices */  in index2adr()
70       idx = LUA_GLOBALSINDEX - idx;  in index2adr()
71       return (idx <= func->c.nupvalues)  in index2adr()
72                 ? &func->c.upvalue[idx-1]  in index2adr()
164 LUA_API void lua_settop (lua_State *L, int idx) {  in lua_settop()  argument
166   if (idx >= 0) {  in lua_settop()
167     api_check(L, idx <= L->stack_last - L->base);  in lua_settop()
168     while (L->top < L->base + idx)  in lua_settop()
170     L->top = L->base + idx;  in lua_settop()
173     api_check(L, -(idx+1) <= (L->top - L->base));  in lua_settop()
174     L->top += idx+1;  /* `subtract' index (index is negative) */  in lua_settop()
180 LUA_API void lua_remove (lua_State *L, int idx) {  in lua_remove()  argument
183   p = index2adr(L, idx);  in lua_remove()
191 LUA_API void lua_insert (lua_State *L, int idx) {  in lua_insert()  argument
195   p = index2adr(L, idx);  in lua_insert()
203 LUA_API void lua_replace (lua_State *L, int idx) {  in lua_replace()  argument
207   if (idx == LUA_ENVIRONINDEX && L->ci == L->base_ci)  in lua_replace()
210   o = index2adr(L, idx);  in lua_replace()
212   if (idx == LUA_ENVIRONINDEX) {  in lua_replace()
220     if (idx < LUA_GLOBALSINDEX)  /* function upvalue? */  in lua_replace()
228 LUA_API void lua_pushvalue (lua_State *L, int idx) {  in lua_pushvalue()  argument
230   setobj2s(L, L->top, index2adr(L, idx));  in lua_pushvalue()
242 LUA_API int lua_type (lua_State *L, int idx) {  in lua_type()  argument
243   StkId o = index2adr(L, idx);  in lua_type()
254 LUA_API int lua_iscfunction (lua_State *L, int idx) {  in lua_iscfunction()  argument
255   StkId o = index2adr(L, idx);  in lua_iscfunction()
260 LUA_API int lua_isnumber (lua_State *L, int idx) {  in lua_isnumber()  argument
262   const TValue *o = index2adr(L, idx);  in lua_isnumber()
267 LUA_API int lua_isstring (lua_State *L, int idx) {  in lua_isstring()  argument
268   int t = lua_type(L, idx);  in lua_isstring()
273 LUA_API int lua_isuserdata (lua_State *L, int idx) {  in lua_isuserdata()  argument
274   const TValue *o = index2adr(L, idx);  in lua_isuserdata()
313 LUA_API lua_Number lua_tonumber (lua_State *L, int idx) {  in lua_tonumber()  argument
315   const TValue *o = index2adr(L, idx);  in lua_tonumber()
323 LUA_API lua_Integer lua_tointeger (lua_State *L, int idx) {  in lua_tointeger()  argument
325   const TValue *o = index2adr(L, idx);  in lua_tointeger()
337 LUA_API int lua_toboolean (lua_State *L, int idx) {  in lua_toboolean()  argument
338   const TValue *o = index2adr(L, idx);  in lua_toboolean()
343 LUA_API const char *lua_tolstring (lua_State *L, int idx, size_t *len) {  in lua_tolstring()  argument
344   StkId o = index2adr(L, idx);  in lua_tolstring()
353     o = index2adr(L, idx);  /* previous call may reallocate the stack */  in lua_tolstring()
361 LUA_API size_t lua_objlen (lua_State *L, int idx) {  in lua_objlen()  argument
362   StkId o = index2adr(L, idx);  in lua_objlen()
379 LUA_API lua_CFunction lua_tocfunction (lua_State *L, int idx) {  in lua_tocfunction()  argument
380   StkId o = index2adr(L, idx);  in lua_tocfunction()
385 LUA_API void *lua_touserdata (lua_State *L, int idx) {  in lua_touserdata()  argument
386   StkId o = index2adr(L, idx);  in lua_touserdata()
395 LUA_API lua_State *lua_tothread (lua_State *L, int idx) {  in lua_tothread()  argument
396   StkId o = index2adr(L, idx);  in lua_tothread()
401 LUA_API const void *lua_topointer (lua_State *L, int idx) {  in lua_topointer()  argument
402   StkId o = index2adr(L, idx);  in lua_topointer()
409       return lua_touserdata(L, idx);  in lua_topointer()
534 LUA_API void lua_gettable (lua_State *L, int idx) {  in lua_gettable()  argument
537   t = index2adr(L, idx);  in lua_gettable()
544 LUA_API void lua_getfield (lua_State *L, int idx, const char *k) {  in lua_getfield()  argument
548   t = index2adr(L, idx);  in lua_getfield()
557 LUA_API void lua_rawget (lua_State *L, int idx) {  in lua_rawget()  argument
560   t = index2adr(L, idx);  in lua_rawget()
567 LUA_API void lua_rawgeti (lua_State *L, int idx, int n) {  in lua_rawgeti()  argument
570   o = index2adr(L, idx);  in lua_rawgeti()
616 LUA_API void lua_getfenv (lua_State *L, int idx) {  in lua_getfenv()  argument
619   o = index2adr(L, idx);  in lua_getfenv()
645 LUA_API void lua_settable (lua_State *L, int idx) {  in lua_settable()  argument
649   t = index2adr(L, idx);  in lua_settable()
657 LUA_API void lua_setfield (lua_State *L, int idx, const char *k) {  in lua_setfield()  argument
662   t = index2adr(L, idx);  in lua_setfield()
671 LUA_API void lua_rawset (lua_State *L, int idx) {  in lua_rawset()  argument
675   t = index2adr(L, idx);  in lua_rawset()
684 LUA_API void lua_rawseti (lua_State *L, int idx, int n) {  in lua_rawseti()  argument
688   o = index2adr(L, idx);  in lua_rawseti()
734 LUA_API int lua_setfenv (lua_State *L, int idx) {  in lua_setfenv()  argument
739   o = index2adr(L, idx);  in lua_setfenv()
973 LUA_API int lua_next (lua_State *L, int idx) {  in lua_next()  argument
977   t = index2adr(L, idx);  in lua_next()