Home
last modified time | relevance | path

Searched refs:s2v (Results 1 – 15 of 15) sorted by relevance

/freebsd-14.2/contrib/lua/src/
H A Dlvm.c211 TValue *pinit = s2v(ra); in forprep()
212 TValue *plimit = s2v(ra + 1); in forprep()
213 TValue *pstep = s2v(ra + 2); in forprep()
648 if (!(ttisstring(s2v(top - 2)) || cvt2str(s2v(top - 2))) || in luaV_concat()
1036 if (ttisinteger(s2v(ra))) \
1065 #define vRB(i) s2v(RB(i))
1068 #define vRC(i) s2v(RC(i))
1196 setivalue(s2v(ra), b); in luaV_execute()
1220 setbfvalue(s2v(ra)); in luaV_execute()
1225 setbfvalue(s2v(ra)); in luaV_execute()
[all …]
H A Dlapi.c66 else return s2v(o); in index2value()
71 return s2v(L->top.p + idx); in index2value()
216 setnilvalue(s2v(level)); in lua_closeslot()
345 luaO_arith(L, op, s2v(L->top.p - 2), s2v(L->top.p - 1), L->top.p - 2); in lua_arith()
499 setnilvalue(s2v(L->top.p)); in lua_pushnil()
515 setivalue(s2v(L->top.p), n); in lua_pushinteger()
608 setbtvalue(s2v(L->top.p)); in lua_pushboolean()
814 t = ttype(s2v(L->top.p)); in lua_getiuservalue()
840 luaV_finishset(L, t, s2v(L->top.p - 1), s2v(L->top.p - 2), slot); in auxsetstr()
865 luaV_finishset(L, t, s2v(L->top.p - 2), s2v(L->top.p - 1), slot); in lua_settable()
[all …]
H A Dltm.c169 if (l_unlikely(!callbinTM(L, s2v(top - 2), s2v(top - 1), top - 2, in luaT_tryconcatTM()
171 luaG_concaterror(L, s2v(top - 2), s2v(top - 1)); in luaT_tryconcatTM()
204 return !l_isfalse(s2v(L->top.p)); in luaT_callorderTM()
211 return l_isfalse(s2v(L->top.p)); in luaT_callorderTM()
250 setnilvalue(s2v(ci->func.p + i)); /* erase original parameter (for GC) */ in luaT_adjustvarargs()
269 setnilvalue(s2v(where + i)); in luaT_getvarargs()
H A Dldo.c102 setnilvalue(s2v(oldtop)); /* no error message */ in luaD_seterrorobj()
188 up->v.p = s2v(restorestack(L, up->v.offset)); in correctstack()
233 setnilvalue(s2v(newstack + i)); /* erase new segment */ in luaD_reallocstack()
418 luaG_callerror(L, s2v(func)); /* nothing to call */ in luaD_tryfuncTM()
442 setnilvalue(s2v(res)); /* adjust with nil */ in moveresults()
474 setnilvalue(s2v(res + i)); in moveresults()
546 switch (ttypetag(s2v(func))) { in luaD_pretailcall()
552 Proto *p = clLvalue(s2v(func))->p; in luaD_pretailcall()
590 switch (ttypetag(s2v(func))) { in luaD_precall()
595 precallC(L, func, nresults, fvalue(s2v(func))); in luaD_precall()
[all …]
H A Dlfunc.c69 uv->v.p = s2v(level); /* current value lives in the stack */ in newupval()
126 const TValue *tm = luaT_gettmbyobj(L, s2v(level), TM_CLOSE); in checkclosemth()
144 TValue *uv = s2v(level); /* value being closed */ in prepcallclosemth()
149 errobj = s2v(level + 1); /* error object goes after 'uv' */ in prepcallclosemth()
170 if (l_isfalse(s2v(level))) in luaF_newtbcupval()
H A Dlobject.h129 #define setobjs2s(L,o1,o2) setobj(L,s2v(o1),s2v(o2))
131 #define setobj2s(L,o1,o2) setobj(L,s2v(o1),o2)
172 #define s2v(o) (&(o)->val) macro
273 #define setthvalue2s(L,o,t) setthvalue(L,s2v(o),t)
377 #define setsvalue2s(L,o,s) setsvalue(L,s2v(o),s)
615 #define setclLvalue2s(L,o,cl) setclLvalue(L,s2v(o),cl)
691 #define sethvalue2s(L,o,h) sethvalue(L,s2v(o),h)
H A Dldebug.c185 if (clLvalue(s2v(ci->func.p))->p->is_vararg) { in findvararg()
224 if (!isLfunction(s2v(L->top.p - 1))) /* not a Lua function? */ in lua_getlocal()
227 name = luaF_getlocalname(clLvalue(s2v(L->top.p - 1))->p, n, 0); in lua_getlocal()
292 setnilvalue(s2v(L->top.p)); in collectvalidlines()
391 func = s2v(L->top.p - 1); in lua_getinfo()
398 func = s2v(ci->func.p); in lua_getinfo()
668 if (o == s2v(base + pos)) in instack()
812 lua_assert(ttisfunction(s2v(errfunc))); in luaG_errormsg()
H A Dlstate.c186 setnilvalue(s2v(L1->stack.p + i)); /* erase new stack */ in stack_init()
196 setnilvalue(s2v(L1->top.p)); /* 'function' entry for this 'ci' */ in stack_init()
325 setnilvalue(s2v(L->stack.p)); /* 'function' entry for basic 'ci' */ in luaE_resetthread()
434 TValue *errobj = s2v(L->top.p - 1); /* error object */ in luaE_warnerror()
H A Dldebug.h18 #define ci_func(ci) (clLvalue(s2v((ci)->func.p)))
H A Dltable.c351 unsigned int i = findindex(L, t, s2v(key), asize); /* find original key */ in luaH_next()
354 setivalue(s2v(key), i + 1); in luaH_next()
362 getnodekey(L, s2v(key), n); in luaH_next()
H A Dlobject.c128 if (!luaO_rawarith(L, op, p1, p2, s2v(res))) { in luaO_arith()
545 return svalue(s2v(L->top.p - 1)); in luaO_pushvfstring()
H A Dllex.c141 TValue *stv = s2v(L->top.p++); /* reserve stack space for string */ in luaX_newstring()
H A Dltests.c47 #define obj_at(L,k) s2v(L->ci->func.p + (k))
432 Proto *p = clLvalue(s2v(f))->p; in lua_checkpc()
457 checkliveness(L1, s2v(o)); /* entire stack must have valid values */ in checkstack()
H A Dluac.c141 #define toproto(L,i) getproto(s2v(L->top.p+(i)))
H A Dlgc.c637 markvalue(g, s2v(o)); in traversethread()
642 setnilvalue(s2v(o)); /* clear dead stack slice */ in traversethread()