| 254 | |
| 255 | |
| 256 | static void adjust_assign (LexState *ls, int nvars, int nexps, expdesc *e) { |
| 257 | FuncState *fs = ls->fs; |
| 258 | int extra = nvars - nexps; |
| 259 | if (hasmultret(e->k)) { |
| 260 | extra++; /* includes call itself */ |
| 261 | if (extra < 0) extra = 0; |
| 262 | luaK_setreturns(fs, e, extra); /* last exp. provides the difference */ |
| 263 | if (extra > 1) luaK_reserveregs(fs, extra-1); |
| 264 | } |
| 265 | else { |
| 266 | if (e->k != VVOID) luaK_exp2nextreg(fs, e); /* close last expression */ |
| 267 | if (extra > 0) { |
| 268 | int reg = fs->freereg; |
| 269 | luaK_reserveregs(fs, extra); |
| 270 | luaK_nil(fs, reg, extra); |
| 271 | } |
| 272 | } |
| 273 | } |
| 274 | |
| 275 | |
| 276 | static void enterlevel (LexState *ls) { |
no test coverage detected