| 307 | |
| 308 | |
| 309 | static void adjust_assign (LexState *ls, int nvars, int nexps, expdesc *e) { |
| 310 | FuncState *fs = ls->fs; |
| 311 | int extra = nvars - nexps; |
| 312 | if (hasmultret(e->k)) { |
| 313 | extra++; /* includes call itself */ |
| 314 | if (extra < 0) extra = 0; |
| 315 | luaK_setreturns(fs, e, extra); /* last exp. provides the difference */ |
| 316 | if (extra > 1) luaK_reserveregs(fs, extra-1); |
| 317 | } |
| 318 | else { |
| 319 | if (e->k != VVOID) luaK_exp2nextreg(fs, e); /* close last expression */ |
| 320 | if (extra > 0) { |
| 321 | int reg = fs->freereg; |
| 322 | luaK_reserveregs(fs, extra); |
| 323 | luaK_nil(fs, reg, extra); |
| 324 | } |
| 325 | } |
| 326 | if (nexps > nvars) |
| 327 | ls->fs->freereg -= nexps - nvars; /* remove extra values */ |
| 328 | } |
| 329 | |
| 330 | |
| 331 | static void enterlevel (LexState *ls) { |
no test coverage detected