aboutsummaryrefslogtreecommitdiff
path: root/lparser.c
diff options
context:
space:
mode:
Diffstat (limited to 'lparser.c')
-rw-r--r--lparser.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/lparser.c b/lparser.c
index e621f680..9a5bcf37 100644
--- a/lparser.c
+++ b/lparser.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lparser.c,v 2.147 2014/12/27 20:31:43 roberto Exp roberto $ 2** $Id: lparser.c,v 2.148 2015/10/28 17:28:40 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*/
@@ -1627,10 +1627,10 @@ LClosure *luaY_parser (lua_State *L, ZIO *z, Mbuffer *buff,
1627 FuncState funcstate; 1627 FuncState funcstate;
1628 LClosure *cl = luaF_newLclosure(L, 1); /* create main closure */ 1628 LClosure *cl = luaF_newLclosure(L, 1); /* create main closure */
1629 setclLvalue(L, L->top, cl); /* anchor it (to avoid being collected) */ 1629 setclLvalue(L, L->top, cl); /* anchor it (to avoid being collected) */
1630 incr_top(L); 1630 luaD_inctop(L);
1631 lexstate.h = luaH_new(L); /* create table for scanner */ 1631 lexstate.h = luaH_new(L); /* create table for scanner */
1632 sethvalue(L, L->top, lexstate.h); /* anchor it */ 1632 sethvalue(L, L->top, lexstate.h); /* anchor it */
1633 incr_top(L); 1633 luaD_inctop(L);
1634 funcstate.f = cl->p = luaF_newproto(L); 1634 funcstate.f = cl->p = luaF_newproto(L);
1635 funcstate.f->source = luaS_new(L, name); /* create and anchor TString */ 1635 funcstate.f->source = luaS_new(L, name); /* create and anchor TString */
1636 lua_assert(iswhite(funcstate.f)); /* do not need barrier here */ 1636 lua_assert(iswhite(funcstate.f)); /* do not need barrier here */