126 static void init_exp (expdesc *e, expkind k, int i) {  in init_exp()  argument
127   e->f = e->t = NO_JUMP;  in init_exp()
128   e->k = k;  in init_exp()
129   e->u.s.info = i;  in init_exp()
133 static void codestring (LexState *ls, expdesc *e, TString *s) {  in codestring()  argument
134   init_exp(e, VK, luaK_stringK(ls->fs, s));  in codestring()
138 static void checkname(LexState *ls, expdesc *e) {  in checkname()  argument
139   codestring(ls, e, str_checkname(ls));  in checkname()
256 static void adjust_assign (LexState *ls, int nvars, int nexps, expdesc *e) {  in adjust_assign()  argument
259   if (hasmultret(e->k)) {  in adjust_assign()
262     luaK_setreturns(fs, e, extra);  /* last exp. provides the difference */  in adjust_assign()
266     if (e->k != VVOID) luaK_exp2nextreg(fs, e);  /* close last expression */  in adjust_assign()
576 static void body (LexState *ls, expdesc *e, int needself, int line) {  in body()  argument
592   pushclosure(ls, &new_fs, e);  in body()
932   expdesc e;  in assignment()  local
948     nexps = explist1(ls, &e);  in assignment()
950       adjust_assign(ls, nvars, nexps, &e);  in assignment()
955       luaK_setoneret(ls->fs, &e);  /* close last expression */  in assignment()
956       luaK_storevar(ls->fs, &lh->v, &e);  in assignment()
960   init_exp(&e, VNONRELOC, ls->fs->freereg-1);  /* default assignment */  in assignment()
961   luaK_storevar(ls->fs, &lh->v, &e);  in assignment()
1037   expdesc e;  in exp1()  local
1039   expr(ls, &e);  in exp1()
1040   k = e.k;  in exp1()
1041   luaK_exp2nextreg(ls->fs, &e);  in exp1()
1092   expdesc e;  in forlist()  local
1106   adjust_assign(ls, 3, explist1(ls, &e), &e);  in forlist()
1183   expdesc e;  in localstat()  local
1188     nexps = explist1(ls, &e);  in localstat()
1190     e.k = VVOID;  in localstat()
1193   adjust_assign(ls, nvars, nexps, &e);  in localstat()
1241   expdesc e;  in retstat()  local
1247     nret = explist1(ls, &e);  /* optional return values */  in retstat()
1248     if (hasmultret(e.k)) {  in retstat()
1249       luaK_setmultret(fs, &e);  in retstat()
1250       if (e.k == VCALL && nret == 1) {  /* tail call? */  in retstat()
1251         SET_OPCODE(getcode(fs,&e), OP_TAILCALL);  in retstat()
1252         lua_assert(GETARG_A(getcode(fs,&e)) == fs->nactvar);  in retstat()
1259         first = luaK_exp2anyreg(fs, &e);  in retstat()
1261         luaK_exp2nextreg(fs, &e);  /* values must go to the `stack' */  in retstat()