diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2009-10-23 17:12:19 -0200 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2009-10-23 17:12:19 -0200 |
commit | 5bc91c640588ca77b9f84146fc88fcc9bdbfbcd1 (patch) | |
tree | d5d049ad2357648cabe25c19a8620566e9f27131 /ldo.c | |
parent | f5073de0a72562e1998f23052715e56a3b9fde18 (diff) | |
download | lua-5bc91c640588ca77b9f84146fc88fcc9bdbfbcd1.tar.gz lua-5bc91c640588ca77b9f84146fc88fcc9bdbfbcd1.tar.bz2 lua-5bc91c640588ca77b9f84146fc88fcc9bdbfbcd1.zip |
no more one environment per thread: all threads share a single global
environment
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.68 2009/09/28 16:32:50 roberto Exp roberto $ | 2 | ** $Id: ldo.c,v 2.69 2009/10/11 20:02:19 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 | */ |
@@ -579,7 +579,7 @@ static void f_parser (lua_State *L, void *ud) { | |||
579 | : luaY_parser(L, p->z, &p->buff, &p->varl, p->name); | 579 | : luaY_parser(L, p->z, &p->buff, &p->varl, p->name); |
580 | setptvalue2s(L, L->top, tf); | 580 | setptvalue2s(L, L->top, tf); |
581 | incr_top(L); | 581 | incr_top(L); |
582 | cl = luaF_newLclosure(L, tf->sizeupvalues, hvalue(gt(L))); | 582 | cl = luaF_newLclosure(L, tf->sizeupvalues, hvalue(&G(L)->l_gt)); |
583 | cl->l.p = tf; | 583 | cl->l.p = tf; |
584 | setclvalue(L, L->top - 1, cl); | 584 | setclvalue(L, L->top - 1, cl); |
585 | for (i = 0; i < tf->sizeupvalues; i++) /* initialize upvalues */ | 585 | for (i = 0; i < tf->sizeupvalues; i++) /* initialize upvalues */ |