From 15ce8d09040c07e5c738f9ffbb5a71a913b4be65 Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Mon, 18 Jun 2018 14:57:20 -0300
Subject: in generational mode, an emergency collection can turn any object
 black during any memory allocation.

---
 lparser.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lparser.c b/lparser.c
index e67d70ea..3c68d1c2 100644
--- a/lparser.c
+++ b/lparser.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lparser.c,v 2.179 2018/03/07 15:55:38 roberto Exp roberto $
+** $Id: lparser.c,v 2.180 2018/04/04 14:23:41 roberto Exp roberto $
 ** Lua Parser
 ** See Copyright Notice in lua.h
 */
@@ -1709,7 +1709,7 @@ LClosure *luaY_parser (lua_State *L, ZIO *z, Mbuffer *buff,
   luaD_inctop(L);
   funcstate.f = cl->p = luaF_newproto(L);
   funcstate.f->source = luaS_new(L, name);  /* create and anchor TString */
-  lua_assert(iswhite(funcstate.f));  /* do not need barrier here */
+  luaC_objbarrier(L, funcstate.f, funcstate.f->source);
   lexstate.buff = buff;
   lexstate.dyd = dyd;
   dyd->actvar.n = dyd->gt.n = dyd->label.n = 0;
-- 
cgit v1.2.3-55-g6feb