diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2000-04-13 13:51:01 -0300 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2000-04-13 13:51:01 -0300 |
| commit | e7c8393682f2977742cdac359cce9e558318aeac (patch) | |
| tree | 4e3213fdea8c30dcf6f1d2b633eb1a54c755814e /ltests.c | |
| parent | ceaa97ff5b78db364b1608ede26e3dba9050be0e (diff) | |
| download | lua-e7c8393682f2977742cdac359cce9e558318aeac.tar.gz lua-e7c8393682f2977742cdac359cce9e558318aeac.tar.bz2 lua-e7c8393682f2977742cdac359cce9e558318aeac.zip | |
optimization INCLOCAL is not necessary, with `for'
Diffstat (limited to 'ltests.c')
| -rw-r--r-- | ltests.c | 5 |
1 files changed, 1 insertions, 4 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ltests.c,v 1.13 2000/04/12 18:57:19 roberto Exp roberto $ | 2 | ** $Id: ltests.c,v 1.14 2000/04/12 19:56:50 roberto Exp roberto $ |
| 3 | ** Internal Module for Debugging of the Lua Implementation | 3 | ** Internal Module for Debugging of the Lua Implementation |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -52,7 +52,6 @@ static void setnameval (lua_State *L, lua_Object t, const char *name, int val) { | |||
| 52 | #define U(o) sprintf(buff, "%-12s%4u", o, GETARG_U(i)) | 52 | #define U(o) sprintf(buff, "%-12s%4u", o, GETARG_U(i)) |
| 53 | #define S(o) sprintf(buff, "%-12s%4d", o, GETARG_S(i)) | 53 | #define S(o) sprintf(buff, "%-12s%4d", o, GETARG_S(i)) |
| 54 | #define AB(o) sprintf(buff, "%-12s%4d %4d", o, GETARG_A(i), GETARG_B(i)) | 54 | #define AB(o) sprintf(buff, "%-12s%4d %4d", o, GETARG_A(i), GETARG_B(i)) |
| 55 | #define sAB(o) sprintf(buff, "%-12s%4d %4d", o, GETARG_sA(i), GETARG_B(i)) | ||
| 56 | 55 | ||
| 57 | 56 | ||
| 58 | 57 | ||
| @@ -83,7 +82,6 @@ static int printop (lua_State *L, Instruction i) { | |||
| 83 | case OP_SETLIST: AB("SETLIST"); break; | 82 | case OP_SETLIST: AB("SETLIST"); break; |
| 84 | case OP_SETMAP: U("SETMAP"); break; | 83 | case OP_SETMAP: U("SETMAP"); break; |
| 85 | case OP_ADD: O("ADD"); break; | 84 | case OP_ADD: O("ADD"); break; |
| 86 | case OP_INCLOCAL: sAB("INCLOCAL"); break; | ||
| 87 | case OP_ADDI: S("ADDI"); break; | 85 | case OP_ADDI: S("ADDI"); break; |
| 88 | case OP_SUB: O("SUB"); break; | 86 | case OP_SUB: O("SUB"); break; |
| 89 | case OP_MULT: O("MULT"); break; | 87 | case OP_MULT: O("MULT"); break; |
| @@ -147,7 +145,6 @@ static void get_limits (lua_State *L) { | |||
| 147 | setnameval(L, t, "MAXARG_S", MAXARG_S); | 145 | setnameval(L, t, "MAXARG_S", MAXARG_S); |
| 148 | setnameval(L, t, "MAXARG_A", MAXARG_A); | 146 | setnameval(L, t, "MAXARG_A", MAXARG_A); |
| 149 | setnameval(L, t, "MAXARG_B", MAXARG_B); | 147 | setnameval(L, t, "MAXARG_B", MAXARG_B); |
| 150 | setnameval(L, t, "MAXARG_sA", MAXARG_sA); | ||
| 151 | setnameval(L, t, "MAXSTACK", MAXSTACK); | 148 | setnameval(L, t, "MAXSTACK", MAXSTACK); |
| 152 | setnameval(L, t, "MAXLOCALS", MAXLOCALS); | 149 | setnameval(L, t, "MAXLOCALS", MAXLOCALS); |
| 153 | setnameval(L, t, "MAXUPVALUES", MAXUPVALUES); | 150 | setnameval(L, t, "MAXUPVALUES", MAXUPVALUES); |