| 699 | |
| 700 | |
| 701 | static void codenot (FuncState *fs, expdesc *e) { |
| 702 | luaK_dischargevars(fs, e); |
| 703 | switch (e->k) { |
| 704 | case VNIL: case VFALSE: { |
| 705 | e->k = VTRUE; |
| 706 | break; |
| 707 | } |
| 708 | case VK: case VKFLT: case VKINT: case VTRUE: { |
| 709 | e->k = VFALSE; |
| 710 | break; |
| 711 | } |
| 712 | case VJMP: { |
| 713 | invertjump(fs, e); |
| 714 | break; |
| 715 | } |
| 716 | case VRELOCABLE: |
| 717 | case VNONRELOC: { |
| 718 | discharge2anyreg(fs, e); |
| 719 | freeexp(fs, e); |
| 720 | e->u.info = luaK_codeABC(fs, OP_NOT, 0, e->u.info, 0); |
| 721 | e->k = VRELOCABLE; |
| 722 | break; |
| 723 | } |
| 724 | default: { |
| 725 | lua_assert(0); /* cannot happen */ |
| 726 | break; |
| 727 | } |
| 728 | } |
| 729 | /* interchange true and false lists */ |
| 730 | { int temp = e->f; e->f = e->t; e->t = temp; } |
| 731 | removevalues(fs, e->f); |
| 732 | removevalues(fs, e->t); |
| 733 | } |
| 734 | |
| 735 | |
| 736 | void luaK_indexed (FuncState *fs, expdesc *t, expdesc *k) { |
no test coverage detected