mirrors/lua
1
0
Fork 0
mirror of https://github.com/lua/lua synced 2025-02-13 03:34:04 +03:00
Code Issues Packages Projects Releases Wiki Activity

don't need to mark the stacks twice ;-)

Browse Source
This commit is contained in:
Roberto Ierusalimschy 2002-03-20 15:54:29 -03:00
parent ca2ceef659
commit 19ac0fadc9
1 changed files with 5 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
lgc.c
View File

@ -1,5 +1,5 @@
/*
** $Id: lgc.c,v 1.130 2002/03/07 18:14:29 roberto Exp roberto $
** $Id: lgc.c,v 1.131 2002/03/20 18:37:28 roberto Exp roberto $
** Garbage Collector
** See Copyright Notice in lua.h
*/
@ -234,10 +234,7 @@ static void traversetable (GCState *st, Table *h) {
}
static void markall (GCState *st) {
lua_assert(hvalue(defaultmeta(st->L))->flags == cast(unsigned short, ~0));
/* table is unchanged */
markstacks(st); /* mark all stacks */
static void propagatemarks (GCState *st) {
while (st->tmark) { /* traverse marked tables */
Table *h = st->tmark; /* get first table from list */
st->tmark = h->mark; /* remove it from list */
@ -456,10 +453,11 @@ void luaC_collectgarbage (lua_State *L) {
st.L = L;
st.tmark = NULL;
st.toclear = NULL;
markall(&st); /* mark all reachable objects */
markstacks(&st); /* mark all stacks */
propagatemarks(&st); /* mark all reachable objects */
separateudata(L); /* separate userdata to be preserved */
marktmu(&st); /* mark `preserved' userdata */
markall(&st); /* remark */
propagatemarks(&st); /* remark */
cleartables(st.toclear);
luaC_collect(L, 0);
checkMbuffer(L);