lua

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:
M
lopcodes.h
 | 
6
+++---
M
lparser.c
 | 
4
++--
M
lvm.c
 | 
6
+++---

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++;