aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>2000-04-07 10:12:50 -0300
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>2000-04-07 10:12:50 -0300
commit14251c5a5640f73f8f98d2445900a3c3a8d472fb (patch)
tree5bd0b7ff85dc9eea319764e13944d303ce2f9b7d
parent42130ed71264a18cdb955ed4b3a8314f9a6c85cc (diff)
downloadlua-14251c5a5640f73f8f98d2445900a3c3a8d472fb.tar.gz
lua-14251c5a5640f73f8f98d2445900a3c3a8d472fb.tar.bz2
lua-14251c5a5640f73f8f98d2445900a3c3a8d472fb.zip
name changes + new operation - old operation
-rw-r--r--lopcodes.h18
-rw-r--r--ltests.c14
2 files changed, 16 insertions, 16 deletions
diff --git a/lopcodes.h b/lopcodes.h
index e93f8c35..47a9f622 100644
--- a/lopcodes.h
+++ b/lopcodes.h
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lopcodes.h,v 1.53 2000/03/27 14:31:12 roberto Exp roberto $ 2** $Id: lopcodes.h,v 1.54 2000/04/04 20:48:44 roberto Exp roberto $
3** Opcodes for Lua virtual machine 3** Opcodes for Lua virtual machine
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -105,35 +105,35 @@ OP_PUSHNEGNUM,/* N - -KNUM[u] */
105 105
106OP_PUSHUPVALUE,/* U - Closure[u] */ 106OP_PUSHUPVALUE,/* U - Closure[u] */
107 107
108OP_PUSHLOCAL,/* L - LOC[u] */ 108OP_GETLOCAL,/* L - LOC[u] */
109OP_GETGLOBAL,/* K - VAR[KSTR[k]] */ 109OP_GETGLOBAL,/* K - VAR[KSTR[k]] */
110 110
111OP_GETTABLE,/* - i t t[i] */ 111OP_GETTABLE,/* - i t t[i] */
112OP_GETDOTTED,/* K t t[KSTR[k]] */ 112OP_GETDOTTED,/* K t t[KSTR[k]] */
113OP_GETINDEXED,/* L t t[LOC[U]] */
113OP_PUSHSELF,/* K t t t[KSTR[k]] */ 114OP_PUSHSELF,/* K t t t[KSTR[k]] */
114 115
115OP_CREATETABLE,/* U - newarray(size = u) */ 116OP_CREATETABLE,/* U - newarray(size = u) */
116 117
117OP_SETLOCAL,/* L x - LOC[u]=x */ 118OP_SETLOCAL,/* L B v_b-v_1 - LOC[L]=v_b */
118OP_SETGLOBAL,/* K x - VAR[KSTR[k]]=x */ 119OP_SETGLOBAL,/* K x - VAR[KSTR[k]]=x */
119OP_SETTABLEPOP,/* - v i t - t[i]=v */ 120OP_SETTABLE,/* A B v a_a-a_1 i t a_x-a_1 i t t[i]=v */
120OP_SETTABLE,/* U v a_u-a_1 i t a_u-a_1 i t t[i]=v */
121 121
122OP_SETLIST,/* A B v_b-v_0 t t t[i+a*FPF]=v_i */ 122OP_SETLIST,/* A B v_b-v_0 t t t[i+a*FPF]=v_i */
123OP_SETMAP,/* U v_u k_u - v_0 k_0 t t t[k_i]=v_i */ 123OP_SETMAP,/* U v_u k_u - v_0 k_0 t t t[k_i]=v_i */
124 124
125OP_INCLOCAL,/* sA B - - LOC[B]+=sA */ 125OP_INCLOCAL,/* sA L - - LOC[L]+=sA */
126OP_ADD,/* - y x x+y */ 126OP_ADD,/* - y x x+y */
127OP_ADDI,/* S x x+s */ 127OP_ADDI,/* S x x+s */
128OP_SUB,/* - y x x-y */ 128OP_SUB,/* - y x x-y */
129OP_MULT,/* - y x x*y */ 129OP_MULT,/* - y x x*y */
130OP_DIV,/* - y x x/y */ 130OP_DIV,/* - y x x/y */
131OP_POW,/* - y x x^y */ 131OP_POW,/* - y x x^y */
132OP_CONC,/* U v_u-v_1 v1..-..v_u */ 132OP_CONCAT,/* U v_u-v_1 v1..-..v_u */
133OP_MINUS,/* - x -x */ 133OP_MINUS,/* - x -x */
134OP_NOT,/* - x (x==nil)? 1 : nil */ 134OP_NOT,/* - x (x==nil)? 1 : nil */
135 135
136OP_JMPNEQ,/* J y x - (x~=y)? PC+=s */ 136OP_JMPNE,/* J y x - (x~=y)? PC+=s */
137OP_JMPEQ,/* J y x - (x==y)? PC+=s */ 137OP_JMPEQ,/* J y x - (x==y)? PC+=s */
138OP_JMPLT,/* J y x - (x<y)? PC+=s */ 138OP_JMPLT,/* J y x - (x<y)? PC+=s */
139OP_JMPLE,/* J y x - (x<y)? PC+=s */ 139OP_JMPLE,/* J y x - (x<y)? PC+=s */
@@ -156,7 +156,7 @@ OP_SETLINE/* U - - LINE=u */
156 156
157 157
158 158
159#define ISJUMP(o) (OP_JMPNEQ <= (o) && (o) <= OP_JMP) 159#define ISJUMP(o) (OP_JMPNE <= (o) && (o) <= OP_JMP)
160 160
161 161
162#endif 162#endif
diff --git a/ltests.c b/ltests.c
index 017d29cb..596fee2b 100644
--- a/ltests.c
+++ b/ltests.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: ltests.c,v 1.10 2000/03/16 20:35:07 roberto Exp roberto $ 2** $Id: ltests.c,v 1.11 2000/04/06 17:35:23 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*/
@@ -70,16 +70,16 @@ static int printop (lua_State *L, Instruction i) {
70 case OP_PUSHNUM: U("PUSHNUM"); break; 70 case OP_PUSHNUM: U("PUSHNUM"); break;
71 case OP_PUSHNEGNUM: U("PUSHNEGNUM"); break; 71 case OP_PUSHNEGNUM: U("PUSHNEGNUM"); break;
72 case OP_PUSHUPVALUE: U("PUSHUPVALUE"); break; 72 case OP_PUSHUPVALUE: U("PUSHUPVALUE"); break;
73 case OP_PUSHLOCAL: U("PUSHLOCAL"); break; 73 case OP_GETLOCAL: U("GETLOCAL"); break;
74 case OP_GETGLOBAL: U("GETGLOBAL"); break; 74 case OP_GETGLOBAL: U("GETGLOBAL"); break;
75 case OP_GETTABLE: O("GETTABLE"); break; 75 case OP_GETTABLE: O("GETTABLE"); break;
76 case OP_GETDOTTED: U("GETDOTTED"); break; 76 case OP_GETDOTTED: U("GETDOTTED"); break;
77 case OP_GETINDEXED: U("GETINDEXED"); break;
77 case OP_PUSHSELF: U("PUSHSELF"); break; 78 case OP_PUSHSELF: U("PUSHSELF"); break;
78 case OP_CREATETABLE: U("CREATETABLE"); break; 79 case OP_CREATETABLE: U("CREATETABLE"); break;
79 case OP_SETLOCAL: U("SETLOCAL"); break; 80 case OP_SETLOCAL: AB("SETLOCAL"); break;
80 case OP_SETGLOBAL: U("SETGLOBAL"); break; 81 case OP_SETGLOBAL: U("SETGLOBAL"); break;
81 case OP_SETTABLEPOP: O("SETTABLEPOP"); break; 82 case OP_SETTABLE: AB("SETTABLE"); break;
82 case OP_SETTABLE: U("SETTABLE"); break;
83 case OP_SETLIST: AB("SETLIST"); break; 83 case OP_SETLIST: AB("SETLIST"); break;
84 case OP_SETMAP: U("SETMAP"); break; 84 case OP_SETMAP: U("SETMAP"); break;
85 case OP_ADD: O("ADD"); break; 85 case OP_ADD: O("ADD"); break;
@@ -89,10 +89,10 @@ static int printop (lua_State *L, Instruction i) {
89 case OP_MULT: O("MULT"); break; 89 case OP_MULT: O("MULT"); break;
90 case OP_DIV: O("DIV"); break; 90 case OP_DIV: O("DIV"); break;
91 case OP_POW: O("POW"); break; 91 case OP_POW: O("POW"); break;
92 case OP_CONC: U("CONC"); break; 92 case OP_CONCAT: U("CONCAT"); break;
93 case OP_MINUS: O("MINUS"); break; 93 case OP_MINUS: O("MINUS"); break;
94 case OP_NOT: O("NOT"); break; 94 case OP_NOT: O("NOT"); break;
95 case OP_JMPNEQ: S("JMPNEQ"); break; 95 case OP_JMPNE: S("JMPNE"); break;
96 case OP_JMPEQ: S("JMPEQ"); break; 96 case OP_JMPEQ: S("JMPEQ"); break;
97 case OP_JMPLT: S("JMPLT"); break; 97 case OP_JMPLT: S("JMPLT"); break;
98 case OP_JMPLE: S("JMPLE"); break; 98 case OP_JMPLE: S("JMPLE"); break;