summaryrefslogtreecommitdiff
path: root/ltm.c
diff options
context:
space:
mode:
Diffstat (limited to 'ltm.c')
-rw-r--r--ltm.c7
1 files changed, 3 insertions, 4 deletions
diff --git a/ltm.c b/ltm.c
index 78cebeb2..fa13cbfd 100644
--- a/ltm.c
+++ b/ltm.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: ltm.c,v 1.58 2000/12/26 18:46:09 roberto Exp roberto $ 2** $Id: ltm.c,v 1.59 2000/12/28 12:55:41 roberto Exp roberto $
3** Tag methods 3** Tag methods
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -129,11 +129,10 @@ LUA_API void lua_gettagmethod (lua_State *L, int t, const char *event) {
129 e = luaI_checkevent(L, event, t); 129 e = luaI_checkevent(L, event, t);
130 checktag(L, t); 130 checktag(L, t);
131 if (luaT_validevent(t, e) && luaT_gettm(L, t, e)) { 131 if (luaT_validevent(t, e) && luaT_gettm(L, t, e)) {
132 clvalue(L->top) = luaT_gettm(L, t, e); 132 setclvalue(L->top, luaT_gettm(L, t, e));
133 ttype(L->top) = LUA_TFUNCTION;
134 } 133 }
135 else 134 else
136 ttype(L->top) = LUA_TNIL; 135 setnilvalue(L->top);
137 incr_top; 136 incr_top;
138} 137}
139 138