diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2009-12-22 13:32:50 -0200 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2009-12-22 13:32:50 -0200 |
| commit | f84b575cfa52dc832751846aa0b4c8ff437d3ca3 (patch) | |
| tree | 246ef484b08d132d006c16a6c8cbe55e61c3bfce /ldo.c | |
| parent | 3cb343efd644fb771b6d8193406afd49527dc1ec (diff) | |
| download | lua-f84b575cfa52dc832751846aa0b4c8ff437d3ca3.tar.gz lua-f84b575cfa52dc832751846aa0b4c8ff437d3ca3.tar.bz2 lua-f84b575cfa52dc832751846aa0b4c8ff437d3ca3.zip | |
no more pseudoindex LUA_GLOBALSINDEX; global table now accessible
through registry
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 2.77 2009/12/17 12:26:09 roberto Exp roberto $ | 2 | ** $Id: ldo.c,v 2.78 2009/12/17 12:28:57 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 | */ |
| @@ -619,7 +619,7 @@ static void f_parser (lua_State *L, void *ud) { | |||
| 619 | : luaY_parser(L, p->z, &p->buff, &p->varl, p->name); | 619 | : luaY_parser(L, p->z, &p->buff, &p->varl, p->name); |
| 620 | setptvalue2s(L, L->top, tf); | 620 | setptvalue2s(L, L->top, tf); |
| 621 | incr_top(L); | 621 | incr_top(L); |
| 622 | cl = luaF_newLclosure(L, tf->sizeupvalues, hvalue(&G(L)->l_gt)); | 622 | cl = luaF_newLclosure(L, tf->sizeupvalues, G(L)->l_gt); |
| 623 | cl->l.p = tf; | 623 | cl->l.p = tf; |
| 624 | setclvalue(L, L->top - 1, cl); | 624 | setclvalue(L, L->top - 1, cl); |
| 625 | for (i = 0; i < tf->sizeupvalues; i++) /* initialize upvalues */ | 625 | for (i = 0; i < tf->sizeupvalues; i++) /* initialize upvalues */ |