diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2014-11-10 15:24:43 -0200 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2014-11-10 15:24:43 -0200 |
| commit | 779381fe9e8fc3dea184d5d9de0d3170e9b64772 (patch) | |
| tree | 2bf2bb5f7d72405e360bda0606381097e8ebe6df | |
| parent | b6911c177ddf3080a70a910b1d6b2aab288350e1 (diff) | |
| download | lua-779381fe9e8fc3dea184d5d9de0d3170e9b64772.tar.gz lua-779381fe9e8fc3dea184d5d9de0d3170e9b64772.tar.bz2 lua-779381fe9e8fc3dea184d5d9de0d3170e9b64772.zip | |
detail (comment)
| -rw-r--r-- | ltm.c | 4 |
1 files changed, 2 insertions, 2 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ltm.c,v 2.30 2014/11/02 19:19:04 roberto Exp roberto $ | 2 | ** $Id: ltm.c,v 2.31 2014/11/10 14:46:05 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 | */ |
| @@ -86,7 +86,7 @@ const TValue *luaT_gettmbyobj (lua_State *L, const TValue *o, TMS event) { | |||
| 86 | void luaT_callTM (lua_State *L, const TValue *f, const TValue *p1, | 86 | void luaT_callTM (lua_State *L, const TValue *f, const TValue *p1, |
| 87 | const TValue *p2, TValue *p3, int hasres) { | 87 | const TValue *p2, TValue *p3, int hasres) { |
| 88 | ptrdiff_t result = savestack(L, p3); | 88 | ptrdiff_t result = savestack(L, p3); |
| 89 | setobj2s(L, L->top++, f); /* push function */ | 89 | setobj2s(L, L->top++, f); /* push function (assume EXTRA_STACK) */ |
| 90 | setobj2s(L, L->top++, p1); /* 1st argument */ | 90 | setobj2s(L, L->top++, p1); /* 1st argument */ |
| 91 | setobj2s(L, L->top++, p2); /* 2nd argument */ | 91 | setobj2s(L, L->top++, p2); /* 2nd argument */ |
| 92 | if (!hasres) /* no result? 'p3' is third argument */ | 92 | if (!hasres) /* no result? 'p3' is third argument */ |