From 878979cef7f77f7d77e22f60d2f5c754d6a0327d Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Wed, 20 Jun 2001 14:22:46 -0300
Subject: [PATCH] no more opnames in binary tag methods

---
 lvm.c | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/lvm.c b/lvm.c
index 5df99658..c3972b7e 100644
--- a/lvm.c
+++ b/lvm.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lvm.c,v 1.185 2001/06/15 19:17:17 roberto Exp roberto $
+** $Id: lvm.c,v 1.186 2001/06/15 20:36:57 roberto Exp roberto $
 ** Lua virtual machine
 ** See Copyright Notice in lua.h
 */
@@ -224,7 +224,6 @@ void luaV_setglobal (lua_State *L, TString *name, StkId val) {
 
 static int call_binTM (lua_State *L, const TObject *p1, const TObject *p2,
                        TObject *res, TMS event) {
-  TString *opname;
   Closure *tm = luaT_gettmbyObj(G(L), p1, event);  /* try first operand */
   if (tm == NULL) {
     tm = luaT_gettmbyObj(G(L), p2, event);  /* try second operand */
@@ -234,8 +233,7 @@ static int call_binTM (lua_State *L, const TObject *p1, const TObject *p2,
         return 0;  /* no tag method */
     }
   }
-  opname = luaS_new(L, luaT_eventname[event]);
-  setTMresult(L, res, callTM(L, tm, l_s("oos"), p1, p2, opname));
+  setTMresult(L, res, callTM(L, tm, l_s("oo"), p1, p2));
   return 1;
 }