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;
1882 int ci_used=cast_int(L->ci-L->base_ci);
1896 CallInfo*ci;
1899 for(ci=l->base_ci;ci<=l->ci;ci++){
1900 if(lim<ci->top)lim=ci->top;
2265 L1->ci=L1->base_ci;
2272 L1->ci->func=L1->top;
2274 L1->base=L1->ci->base=L1->top;
2275 L1->ci->top=L1->top+20;
2307 L->base_ci=L->ci=NULL;
2383 L->ci=L->base_ci;
2384 L->base=L->top=L->ci->base;
2397 static int currentpc(lua_State*L,CallInfo*ci){
2398 if(!isLua(ci))return-1;
2399 if(ci==L->ci)
2400 ci->savedpc=L->savedpc;
2401 return pcRel(ci->savedpc,ci_func(ci)->l.p);
2403 static int currentline(lua_State*L,CallInfo*ci){
2404 int pc=currentpc(L,ci);
2408 return getline_(ci_func(ci)->l.p,pc);
2412 CallInfo*ci;
2413 for(ci=L->ci;level>0&&ci>L->base_ci;ci--){
2415 if(f_isLua(ci))
2416 level-=ci->tailcalls;
2418 if(level==0&&ci>L->base_ci){
2420 ar->i_ci=cast_int(ci-L->base_ci);
2429 static Proto*getluaproto(CallInfo*ci){
2430 return(isLua(ci)?ci_func(ci)->l.p:NULL);
2470 Closure*f,CallInfo*ci){
2483 ar->currentline=(ci)?currentline(L,ci):-1;
2491 ar->namewhat=(ci)?NULL:NULL;
2509 CallInfo*ci=NULL;
2518 ci=L->base_ci+ar->i_ci;
2519 f=clvalue(ci->func);
2521 status=auxgetinfo(L,what,ar,f,ci);
2531 static int isinstack(CallInfo*ci,const TValue*o){
2533 for(p=ci->base;p<ci->top;p++)
2540 const char*kind=(isinstack(L->ci,o))?
2569 CallInfo*ci=L->ci;
2570 if(isLua(ci)){
2572 int line=currentline(L,ci);
2573 luaO_chunkid(buff,getstr(getluaproto(ci)->source),60);
4951 cl=&clvalue(L->ci->func)->l;
5147 if(nresults>=0)L->top=L->ci->top;
5162 CallInfo*ci=L->ci-1;
5164 StkId func=ci->func;
5165 StkId pfunc=(ci+1)->func;
5166 if(L->openupval)luaF_close(L,ci->base);
5167 L->base=ci->base=ci->func+((ci+1)->base-pfunc);
5170 ci->top=L->top=func+aux;
5171 ci->savedpc=L->savedpc;
5172 ci->tailcalls++;
5173 L->ci--;
5194 if(b)L->top=L->ci->top;
5232 L->top=L->ci->top;
5248 L->top=L->ci->top;
5289 CallInfo*ci=L->ci;
5290 int n=cast_int(ci->base-ci->func)-cl->p->numparams-1;
5299 setobj(L,ra+j,ci->base-n+j);
5312 #define api_incr_top(L){luai_apicheck(L,L->top<L->ci->top);L->top++;}
5316 luai_apicheck(L,idx<=L->ci->top-L->base);
5342 if(L->ci==L->base_ci)
5355 if(L->ci->top<L->top+size)
5356 L->ci->top=L->top+size;
5398 if(idx==(-10001)&&L->ci==L->base_ci)
5751 #define adjustresults(L,nres){if(nres==(-1)&&L->top>=L->ci->top)L->ci->top=L->top;}
5752 #define checkresults(L,na,nr)luai_apicheck(L,(nr)==(-1)||(L->ci->top-L->top>=(nr)-(na)))
