53   CallInfo *ci = L->ci;  in index2addr()  local
55     TValue *o = ci->func + idx;  in index2addr()
56     api_check(L, idx <= ci->top - (ci->func + 1), "unacceptable index");  in index2addr()
61     api_check(L, idx != 0 && -idx <= L->top - (ci->func + 1), "invalid index");  in index2addr()
69     if (ttislcf(ci->func))  /* light C function? */  in index2addr()
72       CClosure *func = clCvalue(ci->func);  in index2addr()
91   CallInfo *ci = L->ci;  in lua_checkstack()  local
102   if (res && ci->top < L->top + size)  in lua_checkstack()
103     ci->top = L->top + size;  /* adjust frame top */  in lua_checkstack()
115   api_check(from, to->ci->top - to->top >= n, "not enough elements to move");  in lua_xmove()
153          : cast_int(L->top - L->ci->func + idx);  in lua_absindex()
158   return cast_int(L->top - (L->ci->func + 1));  in lua_gettop()
163   StkId func = L->ci->func;  in lua_settop()
208     luaC_barrier(L, clCvalue(L->ci->func), fr);  in moveto()
873      api_check(L, (nr) == LUA_MULTRET || (L->ci->top - L->top >= (nr) - (na)), \
878   if (L->ci->callstatus & CIST_YIELDED) {  in lua_getctx()
879     if (ctx) *ctx = L->ci->u.c.ctx;  in lua_getctx()
880     return L->ci->u.c.status;  in lua_getctx()
890   api_check(L, k == NULL || !isLua(L->ci),  in lua_callk()
897     L->ci->u.c.k = k;  /* save continuation */  in lua_callk()
898     L->ci->u.c.ctx = ctx;  /* save context */  in lua_callk()
931   api_check(L, k == NULL || !isLua(L->ci),  in lua_pcallk()
949     CallInfo *ci = L->ci;  in lua_pcallk()  local
950     ci->u.c.k = k;  /* save continuation */  in lua_pcallk()
951     ci->u.c.ctx = ctx;  /* save context */  in lua_pcallk()
953     ci->extra = savestack(L, c.func);  in lua_pcallk()
954     ci->u.c.old_allowhook = L->allowhook;  in lua_pcallk()
955     ci->u.c.old_errfunc = L->errfunc;  in lua_pcallk()
958     ci->callstatus |= CIST_YPCALL;  in lua_pcallk()
960     ci->callstatus &= ~CIST_YPCALL;  in lua_pcallk()
961     L->errfunc = ci->u.c.old_errfunc;  in lua_pcallk()