lua

A copy of the Lua development repository
Log | Files | Refs | README

commit 878979cef7f77f7d77e22f60d2f5c754d6a0327d
parent 8e586c13fcf3066886a7edd69011304eaad57a2b
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date:   Wed, 20 Jun 2001 14:22:24 -0300

no more opnames in binary tag methods

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

diff --git 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; }