diff options
Diffstat (limited to 'lparser.c')
-rw-r--r-- | lparser.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lparser.c,v 2.159 2017/05/13 12:57:20 roberto Exp roberto $ | 2 | ** $Id: lparser.c,v 2.160 2017/06/27 11:35:31 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 | */ |
@@ -1650,10 +1650,10 @@ LClosure *luaY_parser (lua_State *L, ZIO *z, Mbuffer *buff, | |||
1650 | LexState lexstate; | 1650 | LexState lexstate; |
1651 | FuncState funcstate; | 1651 | FuncState funcstate; |
1652 | LClosure *cl = luaF_newLclosure(L, 1); /* create main closure */ | 1652 | LClosure *cl = luaF_newLclosure(L, 1); /* create main closure */ |
1653 | setclLvalue(L, L->top, cl); /* anchor it (to avoid being collected) */ | 1653 | setclLvalue2s(L, L->top, cl); /* anchor it (to avoid being collected) */ |
1654 | luaD_inctop(L); | 1654 | luaD_inctop(L); |
1655 | lexstate.h = luaH_new(L); /* create table for scanner */ | 1655 | lexstate.h = luaH_new(L); /* create table for scanner */ |
1656 | sethvalue(L, L->top, lexstate.h); /* anchor it */ | 1656 | sethvalue2s(L, L->top, lexstate.h); /* anchor it */ |
1657 | luaD_inctop(L); | 1657 | luaD_inctop(L); |
1658 | funcstate.f = cl->p = luaF_newproto(L); | 1658 | funcstate.f = cl->p = luaF_newproto(L); |
1659 | funcstate.f->source = luaS_new(L, name); /* create and anchor TString */ | 1659 | funcstate.f->source = luaS_new(L, name); /* create and anchor TString */ |