diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2003-10-20 10:24:26 -0200 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2003-10-20 10:24:26 -0200 |
| commit | 9914e1bcddfb7ba0e5b4597a0540df8ec3111b3f (patch) | |
| tree | 7e6c0c04a492d81c156845e7f242428ed1d912c8 /ldo.c | |
| parent | 10de467c794a536902755c236933623767bb452e (diff) | |
| download | lua-9914e1bcddfb7ba0e5b4597a0540df8ec3111b3f.tar.gz lua-9914e1bcddfb7ba0e5b4597a0540df8ec3111b3f.tar.bz2 lua-9914e1bcddfb7ba0e5b4597a0540df8ec3111b3f.zip | |
detail
Diffstat (limited to 'ldo.c')
| -rw-r--r-- | ldo.c | 6 |
1 files changed, 3 insertions, 3 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ldo.c,v 1.225 2003/09/05 14:30:59 roberto Exp roberto $ | 2 | ** $Id: ldo.c,v 1.226 2003/10/03 16:04:11 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 | */ |
| @@ -450,8 +450,8 @@ static void f_parser (lua_State *L, void *ud) { | |||
| 450 | struct SParser *p = cast(struct SParser *, ud); | 450 | struct SParser *p = cast(struct SParser *, ud); |
| 451 | int c = luaZ_lookahead(p->z); | 451 | int c = luaZ_lookahead(p->z); |
| 452 | luaC_checkGC(L); | 452 | luaC_checkGC(L); |
| 453 | tf = (c == LUA_SIGNATURE[0]) ? luaU_undump(L, p->z, &p->buff, p->name) : | 453 | tf = ((c == LUA_SIGNATURE[0]) ? luaU_undump : luaY_parser)(L, p->z, |
| 454 | luaY_parser(L, p->z, &p->buff, p->name); | 454 | &p->buff, p->name); |
| 455 | cl = luaF_newLclosure(L, 0, gt(L)); | 455 | cl = luaF_newLclosure(L, 0, gt(L)); |
| 456 | cl->l.p = tf; | 456 | cl->l.p = tf; |
| 457 | setclvalue(L->top, cl); | 457 | setclvalue(L->top, cl); |