diff options
Diffstat (limited to 'ldo.c')
-rw-r--r-- | ldo.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: ldo.c,v 1.45 1999/06/22 20:37:23 roberto Exp roberto $ | 2 | ** $Id: ldo.c,v 1.46 1999/08/16 20:52:00 roberto Exp roberto $ |
3 | ** Stack and Call structure of Lua | 3 | ** Stack and Call structure of Lua |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -190,7 +190,7 @@ void luaD_calln (int nArgs, int nResults) { | |||
190 | break; | 190 | break; |
191 | case LUA_T_CLOSURE: { | 191 | case LUA_T_CLOSURE: { |
192 | Closure *c = clvalue(func); | 192 | Closure *c = clvalue(func); |
193 | TObject *proto = &(c->consts[0]); | 193 | TObject *proto = c->consts; |
194 | ttype(func) = LUA_T_CLMARK; | 194 | ttype(func) = LUA_T_CLMARK; |
195 | firstResult = (ttype(proto) == LUA_T_CPROTO) ? | 195 | firstResult = (ttype(proto) == LUA_T_CPROTO) ? |
196 | callCclosure(c, fvalue(proto), base) : | 196 | callCclosure(c, fvalue(proto), base) : |