| 442 | |
| 443 | |
| 444 | int luaK_exp2RK (FuncState *fs, expdesc *e) { |
| 445 | luaK_exp2val(fs, e); |
| 446 | switch (e->k) { |
| 447 | case VKNUM: |
| 448 | case VTRUE: |
| 449 | case VFALSE: |
| 450 | case VNIL: { |
| 451 | if (fs->nk <= MAXINDEXRK) { /* constant fit in RK operand? */ |
| 452 | e->u.s.info = (e->k == VNIL) ? nilK(fs) : |
| 453 | (e->k == VKNUM) ? luaK_numberK(fs, e->u.nval) : |
| 454 | boolK(fs, (e->k == VTRUE)); |
| 455 | e->k = VK; |
| 456 | return RKASK(e->u.s.info); |
| 457 | } |
| 458 | else break; |
| 459 | } |
| 460 | case VK: { |
| 461 | if (e->u.s.info <= MAXINDEXRK) /* constant fit in argC? */ |
| 462 | return RKASK(e->u.s.info); |
| 463 | else break; |
| 464 | } |
| 465 | default: break; |
| 466 | } |
| 467 | /* not a constant in the right range: put it in a register */ |
| 468 | return luaK_exp2anyreg(fs, e); |
| 469 | } |
| 470 | |
| 471 | |
| 472 | void luaK_storevar (FuncState *fs, expdesc *var, expdesc *ex) { |
no test coverage detected