nik/lush
1
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

trocar a funcao para garbage colector adaptativo.

Browse Source
This commit is contained in:
Waldemar Celes
1995-01-18 18:15:54 -02:00
parent 97053335fb
commit 6e0e9935ec
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
table.c
View File

@@ -3,7 +3,7 @@
** Module to control static tables ** Module to control static tables
*/ */
char *rcs_table="$Id: table.c,v 2.26 1995/01/12 14:19:04 roberto Exp roberto $"; char *rcs_table="$Id: table.c,v 2.27 1995/01/13 22:11:12 roberto Exp celes $";
#include <string.h> #include <string.h>
@@ -183,7 +183,7 @@ void lua_pack (void)
recovered += lua_strcollector(); recovered += lua_strcollector();
recovered += lua_hashcollector(); recovered += lua_hashcollector();
nentity = 0; /* reset counter */ nentity = 0; /* reset counter */
block=2*block-3*recovered/2; /* adapt block size */ block=(16*block-7*recovered)/12; /* adapt block size */
if (block < MIN_GARBAGE_BLOCK) block = MIN_GARBAGE_BLOCK; if (block < MIN_GARBAGE_BLOCK) block = MIN_GARBAGE_BLOCK;
} }