commit b82ff713e321f4b65b2dc41fc1fe97633f7b197d
parent 77113ee02f383848cd4877e2780c36ffb4405b84
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Tue, 9 Feb 1999 16:01:33 -0200
new name for opcode
Diffstat:
3 files changed, 8 insertions(+), 8 deletions(-)
diff --git a/lopcodes.h b/lopcodes.h
@@ -1,5 +1,5 @@
/*
-** $Id: lopcodes.h,v 1.23 1999/02/08 18:54:19 roberto Exp roberto $
+** $Id: lopcodes.h,v 1.24 1999/02/09 15:58:45 roberto Exp roberto $
** Opcodes for Lua virtual machine
** See Copyright Notice in lua.h
*/
@@ -27,8 +27,8 @@ POPDUP,/* b v v TOP-=b */
PUSHNUMBERW,/* w - (float)w */
PUSHNUMBER,/* b - (float)b */
-PUSHNEGW,/* w - (float)-w */
-PUSHNEG,/* b - (float)-b */
+PUSHNUMBERNEGW,/* w - (float)-w */
+PUSHNUMBERNEG,/* b - (float)-b */
PUSHCONSTANTW,/*w - CNST[w] */
PUSHCONSTANT,/* b - CNST[b] */
diff --git a/lparser.c b/lparser.c
@@ -1,5 +1,5 @@
/*
-** $Id: lparser.c,v 1.18 1999/02/08 18:54:19 roberto Exp roberto $
+** $Id: lparser.c,v 1.19 1999/02/09 15:59:10 roberto Exp roberto $
** LL(1) Parser and code generator for Lua
** See Copyright Notice in lua.h
*/
@@ -270,7 +270,7 @@ static void code_number (LexState *ls, real f) {
real af = (f<0) ? -f : f;
if (0 <= af && af <= (real)MAX_WORD && (int)af == af) {
/* abs(f) has a short integer value */
- code_oparg(ls, (f<0) ? PUSHNEG : PUSHNUMBER, (int)af, 1);
+ code_oparg(ls, (f<0) ? PUSHNUMBERNEG : PUSHNUMBER, (int)af, 1);
}
else
code_constant(ls, real_constant(ls->fs, f));
diff --git a/lvm.c b/lvm.c
@@ -1,5 +1,5 @@
/*
-** $Id: lvm.c,v 1.47 1999/02/08 18:54:19 roberto Exp roberto $
+** $Id: lvm.c,v 1.48 1999/02/09 15:58:45 roberto Exp roberto $
** Lua virtual machine
** See Copyright Notice in lua.h
*/
@@ -359,8 +359,8 @@ StkId luaV_execute (Closure *cl, TProtoFunc *tf, StkId base) {
S->top++;
break;
- case PUSHNEGW: aux += highbyte(*pc++);
- case PUSHNEG: aux += *pc++;
+ case PUSHNUMBERNEGW: aux += highbyte(*pc++);
+ case PUSHNUMBERNEG: aux += *pc++;
ttype(S->top) = LUA_T_NUMBER;
nvalue(S->top) = -aux;
S->top++;