diff options
Diffstat (limited to 'lparser.c')
-rw-r--r-- | lparser.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lparser.c,v 2.139 2014/06/19 18:27:20 roberto Exp roberto $ | 2 | ** $Id: lparser.c,v 2.140 2014/07/18 12:17:54 roberto Exp roberto $ |
3 | ** Lua Parser | 3 | ** Lua Parser |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -164,7 +164,7 @@ static int registerlocalvar (LexState *ls, TString *varname) { | |||
164 | LocVar, SHRT_MAX, "local variables"); | 164 | LocVar, SHRT_MAX, "local variables"); |
165 | while (oldsize < f->sizelocvars) f->locvars[oldsize++].varname = NULL; | 165 | while (oldsize < f->sizelocvars) f->locvars[oldsize++].varname = NULL; |
166 | f->locvars[fs->nlocvars].varname = varname; | 166 | f->locvars[fs->nlocvars].varname = varname; |
167 | luaC_objbarrier(ls->L, f, ts2gco(varname)); | 167 | luaC_objbarrier(ls->L, f, obj2gco(varname)); |
168 | return fs->nlocvars++; | 168 | return fs->nlocvars++; |
169 | } | 169 | } |
170 | 170 | ||
@@ -232,7 +232,7 @@ static int newupvalue (FuncState *fs, TString *name, expdesc *v) { | |||
232 | f->upvalues[fs->nups].instack = (v->k == VLOCAL); | 232 | f->upvalues[fs->nups].instack = (v->k == VLOCAL); |
233 | f->upvalues[fs->nups].idx = cast_byte(v->u.info); | 233 | f->upvalues[fs->nups].idx = cast_byte(v->u.info); |
234 | f->upvalues[fs->nups].name = name; | 234 | f->upvalues[fs->nups].name = name; |
235 | luaC_objbarrier(fs->ls->L, f, ts2gco(name)); | 235 | luaC_objbarrier(fs->ls->L, f, obj2gco(name)); |
236 | return fs->nups++; | 236 | return fs->nups++; |
237 | } | 237 | } |
238 | 238 | ||
@@ -1630,7 +1630,7 @@ LClosure *luaY_parser (lua_State *L, ZIO *z, Mbuffer *buff, | |||
1630 | incr_top(L); | 1630 | incr_top(L); |
1631 | funcstate.f = cl->p = luaF_newproto(L); | 1631 | funcstate.f = cl->p = luaF_newproto(L); |
1632 | funcstate.f->source = luaS_new(L, name); /* create and anchor TString */ | 1632 | funcstate.f->source = luaS_new(L, name); /* create and anchor TString */ |
1633 | luaC_objbarrier(L, funcstate.f, ts2gco(funcstate.f->source)); | 1633 | luaC_objbarrier(L, funcstate.f, obj2gco(funcstate.f->source)); |
1634 | lexstate.buff = buff; | 1634 | lexstate.buff = buff; |
1635 | lexstate.dyd = dyd; | 1635 | lexstate.dyd = dyd; |
1636 | dyd->actvar.n = dyd->gt.n = dyd->label.n = 0; | 1636 | dyd->actvar.n = dyd->gt.n = dyd->label.n = 0; |