diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2002-10-09 10:42:01 -0300 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2002-10-09 10:42:01 -0300 |
| commit | 46b063ef59c7b334f8f36a9ab5dfd76d094e70d7 (patch) | |
| tree | 3d7aa7300a4478278515fa274cc0b7ee7076512c /ldo.c | |
| parent | e1d5153a33d278ac9db18f5bcc142a75e48606de (diff) | |
| download | lua-46b063ef59c7b334f8f36a9ab5dfd76d094e70d7.tar.gz lua-46b063ef59c7b334f8f36a9ab5dfd76d094e70d7.tar.bz2 lua-46b063ef59c7b334f8f36a9ab5dfd76d094e70d7.zip | |
`undump' also uses private buffer
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); |