Lines Matching refs:v
34 #define luaY_checklimit(fs,v,l,m) if ((v)>(l)) errorlimit(fs,l,m) argument
54 static void expr (LexState *ls, expdesc *v);
156 #define new_localvarliteral(ls,v,n) \ argument
157 new_localvar(ls, luaX_newstring(ls, "" v, (sizeof(v)/sizeof(char))-1), n)
183 static int indexupvalue (FuncState *fs, TString *name, expdesc *v) { in indexupvalue() argument
188 if (fs->upvalues[i].k == v->k && fs->upvalues[i].info == v->u.s.info) { in indexupvalue()
200 lua_assert(v->k == VLOCAL || v->k == VUPVAL); in indexupvalue()
201 fs->upvalues[f->nups].k = cast_byte(v->k); in indexupvalue()
202 fs->upvalues[f->nups].info = cast_byte(v->u.s.info); in indexupvalue()
230 int v = searchvar(fs, n); /* look up at current level */ in singlevaraux() local
231 if (v >= 0) { in singlevaraux()
232 init_exp(var, VLOCAL, v); in singlevaraux()
234 markupval(fs, v); /* local will be used as an upval */ in singlevaraux()
310 static void pushclosure (LexState *ls, FuncState *func, expdesc *v) { in pushclosure() argument
320 init_exp(v, VRELOCABLE, luaK_codeABx(fs, OP_CLOSURE, 0, fs->np-1)); in pushclosure()
407 static void field (LexState *ls, expdesc *v) { in field() argument
411 luaK_exp2anyreg(fs, v); in field()
414 luaK_indexed(fs, v, &key); in field()
418 static void yindex (LexState *ls, expdesc *v) { in yindex() argument
421 expr(ls, v); in yindex()
422 luaK_exp2val(ls->fs, v); in yindex()
435 expdesc v; /* last list item read */ member
465 if (cc->v.k == VVOID) return; /* there is no list item */ in closelistfield()
466 luaK_exp2nextreg(fs, &cc->v); in closelistfield()
467 cc->v.k = VVOID; in closelistfield()
477 if (hasmultret(cc->v.k)) { in lastlistfield()
478 luaK_setmultret(fs, &cc->v); in lastlistfield()
483 if (cc->v.k != VVOID) in lastlistfield()
484 luaK_exp2nextreg(fs, &cc->v); in lastlistfield()
491 expr(ls, &cc->v); in listfield()
507 init_exp(&cc.v, VVOID, 0); /* no value (yet) */ in constructor()
511 lua_assert(cc.v.k == VVOID || cc.tostore > 0); in constructor()
596 static int explist1 (LexState *ls, expdesc *v) { in explist1() argument
599 expr(ls, v); in explist1()
601 luaK_exp2nextreg(ls->fs, v); in explist1()
602 expr(ls, v); in explist1()
667 static void prefixexp (LexState *ls, expdesc *v) { in prefixexp() argument
673 expr(ls, v); in prefixexp()
675 luaK_dischargevars(ls->fs, v); in prefixexp()
679 singlevar(ls, v); in prefixexp()
690 static void primaryexp (LexState *ls, expdesc *v) { in primaryexp() argument
694 prefixexp(ls, v); in primaryexp()
698 field(ls, v); in primaryexp()
703 luaK_exp2anyreg(fs, v); in primaryexp()
705 luaK_indexed(fs, v, &key); in primaryexp()
712 luaK_self(fs, v, &key); in primaryexp()
713 funcargs(ls, v); in primaryexp()
717 luaK_exp2nextreg(fs, v); in primaryexp()
718 funcargs(ls, v); in primaryexp()
727 static void simpleexp (LexState *ls, expdesc *v) { in simpleexp() argument
732 init_exp(v, VKNUM, 0); in simpleexp()
733 v->u.nval = ls->t.seminfo.r; in simpleexp()
737 codestring(ls, v, ls->t.seminfo.ts); in simpleexp()
741 init_exp(v, VNIL, 0); in simpleexp()
745 init_exp(v, VTRUE, 0); in simpleexp()
749 init_exp(v, VFALSE, 0); in simpleexp()
757 init_exp(v, VVARARG, luaK_codeABC(fs, OP_VARARG, 0, 1, 0)); in simpleexp()
761 constructor(ls, v); in simpleexp()
766 body(ls, v, 0, ls->linenumber); in simpleexp()
770 primaryexp(ls, v); in simpleexp()
828 static BinOpr subexpr (LexState *ls, expdesc *v, unsigned int limit) { in subexpr() argument
835 subexpr(ls, v, UNARY_PRIORITY); in subexpr()
836 luaK_prefix(ls->fs, uop, v); in subexpr()
838 else simpleexp(ls, v); in subexpr()
845 luaK_infix(ls->fs, op, v); in subexpr()
848 luaK_posfix(ls->fs, op, v, &v2); in subexpr()
856 static void expr (LexState *ls, expdesc *v) { in expr() argument
857 subexpr(ls, v, 0); in expr()
898 expdesc v; /* variable (global, local, upvalue, or indexed) */ member
908 static void check_conflict (LexState *ls, struct LHS_assign *lh, expdesc *v) { in check_conflict() argument
913 if (lh->v.k == VINDEXED) { in check_conflict()
914 if (lh->v.u.s.info == v->u.s.info) { /* conflict? */ in check_conflict()
916 lh->v.u.s.info = extra; /* previous assignment will use safe copy */ in check_conflict()
918 if (lh->v.u.s.aux == v->u.s.info) { /* conflict? */ in check_conflict()
920 lh->v.u.s.aux = extra; /* previous assignment will use safe copy */ in check_conflict()
925 luaK_codeABC(fs, OP_MOVE, fs->freereg, v->u.s.info, 0); /* make copy */ in check_conflict()
933 check_condition(ls, VLOCAL <= lh->v.k && lh->v.k <= VINDEXED, in assignment()
938 primaryexp(ls, &nv.v); in assignment()
939 if (nv.v.k == VLOCAL) in assignment()
940 check_conflict(ls, lh, &nv.v); in assignment()
956 luaK_storevar(ls->fs, &lh->v, &e); in assignment()
961 luaK_storevar(ls->fs, &lh->v, &e); in assignment()
967 expdesc v; in cond() local
968 expr(ls, &v); /* read condition */ in cond()
969 if (v.k == VNIL) v.k = VFALSE; /* `falses' are all equal here */ in cond()
970 luaK_goiftrue(ls->fs, &v); in cond()
971 return v.f; in cond()
1166 expdesc v, b; in localfunc() local
1169 init_exp(&v, VLOCAL, fs->freereg); in localfunc()
1173 luaK_storevar(fs, &v, &b); in localfunc()
1198 static int funcname (LexState *ls, expdesc *v) { in funcname() argument
1201 singlevar(ls, v); in funcname()
1203 field(ls, v); in funcname()
1206 field(ls, v); in funcname()
1215 expdesc v, b; in funcstat() local
1217 needself = funcname(ls, &v); in funcstat()
1219 luaK_storevar(ls->fs, &v, &b); in funcstat()
1227 struct LHS_assign v; in exprstat() local
1228 primaryexp(ls, &v.v); in exprstat()
1229 if (v.v.k == VCALL) /* stat -> func */ in exprstat()
1230 SETARG_C(getcode(fs, &v.v), 1); /* call statement uses no results */ in exprstat()
1232 v.prev = NULL; in exprstat()
1233 assignment(ls, &v, 1); in exprstat()