diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2004-06-29 15:49:02 -0300 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2004-06-29 15:49:02 -0300 |
| commit | 02a2c01ccd4dda04636a30cb60b6dd52511fd790 (patch) | |
| tree | e2d76d2647ca613715738f37ba1d532a149a187e /lvm.c | |
| parent | 23e08a68f51b36506c5ee8571e9dca01d67b7454 (diff) | |
| download | lua-02a2c01ccd4dda04636a30cb60b6dd52511fd790.tar.gz lua-02a2c01ccd4dda04636a30cb60b6dd52511fd790.tar.bz2 lua-02a2c01ccd4dda04636a30cb60b6dd52511fd790.zip | |
new way to code RK values
Diffstat (limited to '')
| -rw-r--r-- | lvm.c | 6 |
1 files changed, 3 insertions, 3 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lvm.c,v 2.9 2004/06/08 16:23:58 roberto Exp roberto $ | 2 | ** $Id: lvm.c,v 2.10 2004/06/29 17:05:00 roberto Exp roberto $ |
| 3 | ** Lua virtual machine | 3 | ** Lua virtual machine |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -369,9 +369,9 @@ static StkId Arith (lua_State *L, StkId ra, const TValue *rb, | |||
| 369 | #define RB(i) check_exp(getBMode(GET_OPCODE(i)) == OpArgR, base+GETARG_B(i)) | 369 | #define RB(i) check_exp(getBMode(GET_OPCODE(i)) == OpArgR, base+GETARG_B(i)) |
| 370 | #define RC(i) check_exp(getCMode(GET_OPCODE(i)) == OpArgR, base+GETARG_C(i)) | 370 | #define RC(i) check_exp(getCMode(GET_OPCODE(i)) == OpArgR, base+GETARG_C(i)) |
| 371 | #define RKB(i) check_exp(getBMode(GET_OPCODE(i)) == OpArgK, \ | 371 | #define RKB(i) check_exp(getBMode(GET_OPCODE(i)) == OpArgK, \ |
| 372 | (GETARG_B(i) < MAXSTACK) ? base+GETARG_B(i) : k+GETARG_B(i)-MAXSTACK) | 372 | ISK(GETARG_B(i)) ? k+INDEXK(GETARG_B(i)) : base+GETARG_B(i)) |
| 373 | #define RKC(i) check_exp(getCMode(GET_OPCODE(i)) == OpArgK, \ | 373 | #define RKC(i) check_exp(getCMode(GET_OPCODE(i)) == OpArgK, \ |
| 374 | (GETARG_C(i) < MAXSTACK) ? base+GETARG_C(i) : k+GETARG_C(i)-MAXSTACK) | 374 | ISK(GETARG_C(i)) ? k+INDEXK(GETARG_C(i)) : base+GETARG_C(i)) |
| 375 | #define KBx(i) check_exp(getBMode(GET_OPCODE(i)) == OpArgK, k+GETARG_Bx(i)) | 375 | #define KBx(i) check_exp(getBMode(GET_OPCODE(i)) == OpArgK, k+GETARG_Bx(i)) |
| 376 | 376 | ||
| 377 | 377 | ||
