Lines Matching refs:ci
430 #define curr_func(L)(clvalue(L->ci->func))
431 #define ci_func(ci)(clvalue((ci)->func)) argument
432 #define f_isLua(ci)(!ci_func(ci)->c.isC) argument
433 #define isLua(ci)(ttisfunction((ci)->func)&&f_isLua(ci)) argument
467 CallInfo*ci; member
1009 int inuse=cast_int(L->ci-L->base_ci);
1015 L->ci=L->base_ci;
1016 L->base=L->ci->base;
1051 CallInfo*ci;
1056 for(ci=L->base_ci;ci<=L->ci;ci++){
1057 ci->top=(ci->top-oldstack)+L->stack;
1058 ci->base=(ci->base-oldstack)+L->stack;
1059 ci->func=(ci->func-oldstack)+L->stack;
1075 L->ci=(L->ci-oldci)+L->base_ci;
1092 return++L->ci;
1124 #define inc_ci(L)((L->ci==L->end_ci)?growCI(L):(condhardstacktests(luaD_reallocCI(L,L->size_ci)),++…
1132 L->ci->savedpc=L->savedpc;
1134 CallInfo*ci;
1149 ci=inc_ci(L);
1150 ci->func=func;
1151 L->base=ci->base=base;
1152 ci->top=L->base+p->maxstacksize;
1154 ci->tailcalls=0;
1155 ci->nresults=nresults;
1156 for(st=L->top;st<ci->top;st++)
1158 L->top=ci->top;
1162 CallInfo*ci;
1165 ci=inc_ci(L);
1166 ci->func=restorestack(L,funcr);
1167 L->base=ci->base=ci->func+1;
1168 ci->top=L->top+20;
1169 ci->nresults=nresults;
1182 CallInfo*ci;
1183 ci=L->ci--;
1184 res=ci->func;
1185 wanted=ci->nresults;
1186 L->base=(ci-1)->base;
1187 L->savedpc=(ci-1)->savedpc;
1211 ptrdiff_t old_ci=saveci(L,L->ci);
1221 L->ci=restoreci(L,old_ci);
1222 L->base=L->ci->base;
1223 L->savedpc=L->ci->savedpc;
1883 int ci_used=cast_int(L->ci-L->base_ci);
1897 CallInfo*ci;
1900 for(ci=l->base_ci;ci<=l->ci;ci++){
1901 if(lim<ci->top)lim=ci->top;
2266 L1->ci=L1->base_ci;
2273 L1->ci->func=L1->top;
2275 L1->base=L1->ci->base=L1->top;
2276 L1->ci->top=L1->top+20;
2308 L->base_ci=L->ci=NULL;
2384 L->ci=L->base_ci;
2385 L->base=L->top=L->ci->base;
2398 static int currentpc(lua_State*L,CallInfo*ci){
2399 if(!isLua(ci))return-1;
2400 if(ci==L->ci)
2401 ci->savedpc=L->savedpc;
2402 return pcRel(ci->savedpc,ci_func(ci)->l.p);
2404 static int currentline(lua_State*L,CallInfo*ci){
2405 int pc=currentpc(L,ci);
2409 return getline_(ci_func(ci)->l.p,pc);
2413 CallInfo*ci;
2414 for(ci=L->ci;level>0&&ci>L->base_ci;ci--){
2416 if(f_isLua(ci))
2417 level-=ci->tailcalls;
2419 if(level==0&&ci>L->base_ci){
2421 ar->i_ci=cast_int(ci-L->base_ci);
2430 static Proto*getluaproto(CallInfo*ci){
2431 return(isLua(ci)?ci_func(ci)->l.p:NULL);
2471 Closure*f,CallInfo*ci){
2484 ar->currentline=(ci)?currentline(L,ci):-1;
2492 ar->namewhat=(ci)?NULL:NULL;
2510 CallInfo*ci=NULL;
2519 ci=L->base_ci+ar->i_ci;
2520 f=clvalue(ci->func);
2522 status=auxgetinfo(L,what,ar,f,ci);
2532 static int isinstack(CallInfo*ci,const TValue*o){
2534 for(p=ci->base;p<ci->top;p++)
2541 const char*kind=(isinstack(L->ci,o))?
2570 CallInfo*ci=L->ci;
2571 if(isLua(ci)){
2573 int line=currentline(L,ci);
2574 luaO_chunkid(buff,getstr(getluaproto(ci)->source),60);
4952 cl=&clvalue(L->ci->func)->l;
5148 if(nresults>=0)L->top=L->ci->top;
5163 CallInfo*ci=L->ci-1;
5165 StkId func=ci->func;
5166 StkId pfunc=(ci+1)->func;
5167 if(L->openupval)luaF_close(L,ci->base);
5168 L->base=ci->base=ci->func+((ci+1)->base-pfunc);
5171 ci->top=L->top=func+aux;
5172 ci->savedpc=L->savedpc;
5173 ci->tailcalls++;
5174 L->ci--;
5195 if(b)L->top=L->ci->top;
5233 L->top=L->ci->top;
5249 L->top=L->ci->top;
5290 CallInfo*ci=L->ci;
5291 int n=cast_int(ci->base-ci->func)-cl->p->numparams-1;
5300 setobj(L,ra+j,ci->base-n+j);
5313 #define api_incr_top(L){luai_apicheck(L,L->top<L->ci->top);L->top++;}
5317 luai_apicheck(L,idx<=L->ci->top-L->base);
5343 if(L->ci==L->base_ci)
5356 if(L->ci->top<L->top+size)
5357 L->ci->top=L->top+size;
5399 if(idx==(-10001)&&L->ci==L->base_ci)
5752 #define adjustresults(L,nres){if(nres==(-1)&&L->top>=L->ci->top)L->ci->top=L->top;}
5753 #define checkresults(L,na,nr)luai_apicheck(L,(nr)==(-1)||(L->ci->top-L->top>=(nr)-(na)))
