diff options
Diffstat (limited to 'ldebug.c')
| -rw-r--r-- | ldebug.c | 51 |
1 files changed, 1 insertions, 50 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ldebug.c,v 1.84 2001/06/26 13:20:45 roberto Exp roberto $ | 2 | ** $Id: ldebug.c,v 1.85 2001/06/28 14:57:17 roberto Exp roberto $ |
| 3 | ** Debug Interface | 3 | ** Debug Interface |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -563,52 +563,3 @@ void luaG_ordererror (lua_State *L, const TObject *p1, const TObject *p2) { | |||
| 563 | luaO_verror(L, l_s("attempt to compare %.10s with %.10s"), t1, t2); | 563 | luaO_verror(L, l_s("attempt to compare %.10s with %.10s"), t1, t2); |
| 564 | } | 564 | } |
| 565 | 565 | ||
| 566 | |||
| 567 | |||
| 568 | #define opmode(t,a,b,c,sa,k,m) (((t)<<OpModeT) | \ | ||
| 569 | ((b)<<OpModeBreg) | ((c)<<OpModeCreg) | \ | ||
| 570 | ((sa)<<OpModesetA) | ((k)<<OpModeK) | (m)) | ||
| 571 | |||
| 572 | |||
| 573 | const lu_byte luaG_opmodes[] = { | ||
| 574 | /* T J B C sA K mode opcode */ | ||
| 575 | opmode(0,0,1,0, 1,0,iABC), /* OP_MOVE */ | ||
| 576 | opmode(0,0,0,0, 1,1,iABc), /* OP_LOADK */ | ||
| 577 | opmode(0,0,0,0, 1,0,iAsBc), /* OP_LOADINT */ | ||
| 578 | opmode(0,0,1,0, 1,0,iABC), /* OP_LOADNIL */ | ||
| 579 | opmode(0,0,0,0, 1,0,iABc), /* OP_LOADUPVAL */ | ||
| 580 | opmode(0,0,0,0, 1,1,iABc), /* OP_GETGLOBAL */ | ||
| 581 | opmode(0,0,1,1, 1,0,iABC), /* OP_GETTABLE */ | ||
| 582 | opmode(0,0,0,0, 0,1,iABc), /* OP_SETGLOBAL */ | ||
| 583 | opmode(0,0,1,1, 0,0,iABC), /* OP_SETTABLE */ | ||
| 584 | opmode(0,0,0,0, 1,0,iABc), /* OP_NEWTABLE */ | ||
| 585 | opmode(0,0,1,1, 1,0,iABC), /* OP_SELF */ | ||
| 586 | opmode(0,0,1,1, 1,0,iABC), /* OP_ADD */ | ||
| 587 | opmode(0,0,1,1, 1,0,iABC), /* OP_SUB */ | ||
| 588 | opmode(0,0,1,1, 1,0,iABC), /* OP_MUL */ | ||
| 589 | opmode(0,0,1,1, 1,0,iABC), /* OP_DIV */ | ||
| 590 | opmode(0,0,1,1, 1,0,iABC), /* OP_POW */ | ||
| 591 | opmode(0,0,1,0, 1,0,iABC), /* OP_UNM */ | ||
| 592 | opmode(0,0,1,0, 1,0,iABC), /* OP_NOT */ | ||
| 593 | opmode(0,0,1,1, 1,0,iABC), /* OP_CONCAT */ | ||
| 594 | opmode(0,1,0,0, 0,0,iAsBc), /* OP_JMP */ | ||
| 595 | opmode(0,1,0,0, 0,0,iAsBc), /* OP_CJMP */ | ||
| 596 | opmode(1,0,0,1, 0,0,iABC), /* OP_TESTEQ */ | ||
| 597 | opmode(1,0,0,1, 0,0,iABC), /* OP_TESTNE */ | ||
| 598 | opmode(1,0,0,1, 0,0,iABC), /* OP_TESTLT */ | ||
| 599 | opmode(1,0,0,1, 0,0,iABC), /* OP_TESTLE */ | ||
| 600 | opmode(1,0,0,1, 0,0,iABC), /* OP_TESTGT */ | ||
| 601 | opmode(1,0,0,1, 0,0,iABC), /* OP_TESTGE */ | ||
| 602 | opmode(1,0,1,0, 1,0,iABC), /* OP_TESTT */ | ||
| 603 | opmode(1,0,1,0, 1,0,iABC), /* OP_TESTF */ | ||
| 604 | opmode(0,0,0,0, 1,0,iAsBc), /* OP_NILJMP */ | ||
| 605 | opmode(0,0,0,0, 0,0,iABC), /* OP_CALL */ | ||
| 606 | opmode(0,0,0,0, 0,0,iABC), /* OP_RETURN */ | ||
| 607 | opmode(0,0,0,0, 0,0,iAsBc), /* OP_FORPREP */ | ||
| 608 | opmode(0,0,0,0, 0,0,iAsBc), /* OP_FORLOOP */ | ||
| 609 | opmode(0,1,0,0, 0,0,iAsBc), /* OP_TFORPREP */ | ||
| 610 | opmode(0,1,0,0, 0,0,iAsBc), /* OP_TFORLOOP */ | ||
| 611 | opmode(0,0,0,0, 0,0,iABc), /* OP_SETLIST */ | ||
| 612 | opmode(0,0,0,0, 0,0,iABc), /* OP_SETLIST0 */ | ||
| 613 | opmode(0,0,0,0, 0,0,iABc) /* OP_CLOSURE */ | ||
| 614 | }; | ||
