This commit is contained in:
Roberto Ierusalimschy 2001-06-13 15:51:20 -03:00
parent 7fae1c17b1
commit a3fbf5f5fd
1 changed files with 4 additions and 4 deletions

8
lgc.c
View File

@ -1,5 +1,5 @@
/* /*
** $Id: lgc.c,v 1.102 2001/06/08 19:01:38 roberto Exp roberto $ ** $Id: lgc.c,v 1.103 2001/06/12 18:43:13 roberto Exp roberto $
** Garbage Collector ** Garbage Collector
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -360,9 +360,6 @@ void luaC_collect (lua_State *L, int all) {
collecttable(L); collecttable(L);
collectproto(L); collectproto(L);
collectclosure(L); collectclosure(L);
checkMbuffer(L);
G(L)->GCthreshold = 2*G(L)->nblocks; /* set new threshold */
luaC_callgcTMudata(L);
} }
@ -370,6 +367,9 @@ void luaC_collectgarbage (lua_State *L) {
markall(L); markall(L);
invalidatetables(G(L)); invalidatetables(G(L));
luaC_collect(L, 0); luaC_collect(L, 0);
checkMbuffer(L);
G(L)->GCthreshold = 2*G(L)->nblocks; /* set new threshold */
luaC_callgcTMudata(L);
callgcTM(L, &luaO_nilobject); callgcTM(L, &luaO_nilobject);
} }