|
|
@ -1,5 +1,5 @@ |
|
|
|
/*
|
|
|
|
** $Id: ltm.c,v 2.30 2014/11/02 19:19:04 roberto Exp roberto $ |
|
|
|
** $Id: ltm.c,v 2.31 2014/11/10 14:46:05 roberto Exp roberto $ |
|
|
|
** Tag methods |
|
|
|
** See Copyright Notice in lua.h |
|
|
|
*/ |
|
|
@ -86,7 +86,7 @@ const TValue *luaT_gettmbyobj (lua_State *L, const TValue *o, TMS event) { |
|
|
|
void luaT_callTM (lua_State *L, const TValue *f, const TValue *p1, |
|
|
|
const TValue *p2, TValue *p3, int hasres) { |
|
|
|
ptrdiff_t result = savestack(L, p3); |
|
|
|
setobj2s(L, L->top++, f); /* push function */ |
|
|
|
setobj2s(L, L->top++, f); /* push function (assume EXTRA_STACK) */ |
|
|
|
setobj2s(L, L->top++, p1); /* 1st argument */ |
|
|
|
setobj2s(L, L->top++, p2); /* 2nd argument */ |
|
|
|
if (!hasres) /* no result? 'p3' is third argument */ |
|
|
|