diff options
Diffstat (limited to 'ldo.c')
-rw-r--r-- | ldo.c | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: ldo.c,v 1.194 2002/09/02 20:00:41 roberto Exp roberto $ | 2 | ** $Id: ldo.c,v 1.195 2002/10/08 18:46:08 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 | */ |
@@ -426,7 +426,8 @@ struct SParser { /* data to `f_parser' */ | |||
426 | 426 | ||
427 | static void f_parser (lua_State *L, void *ud) { | 427 | static void f_parser (lua_State *L, void *ud) { |
428 | struct SParser *p = cast(struct SParser *, ud); | 428 | struct SParser *p = cast(struct SParser *, ud); |
429 | Proto *tf = p->bin ? luaU_undump(L, p->z) : luaY_parser(L, p->z, &p->buff); | 429 | Proto *tf = p->bin ? luaU_undump(L, p->z, &p->buff) : |
430 | luaY_parser(L, p->z, &p->buff); | ||
430 | Closure *cl = luaF_newLclosure(L, 0, gt(L)); | 431 | Closure *cl = luaF_newLclosure(L, 0, gt(L)); |
431 | cl->l.p = tf; | 432 | cl->l.p = tf; |
432 | setclvalue(L->top, cl); | 433 | setclvalue(L->top, cl); |