From 6e0e9935ec6ca877d17aa0fbc125a0c4a4e4b01b Mon Sep 17 00:00:00 2001 From: Waldemar Celes Date: Wed, 18 Jan 1995 18:15:54 -0200 Subject: trocar a funcao para garbage colector adaptativo. --- table.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/table.c b/table.c index 1eec2913..ac471124 100644 --- a/table.c +++ b/table.c @@ -3,7 +3,7 @@ ** 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 @@ -183,7 +183,7 @@ void lua_pack (void) recovered += lua_strcollector(); recovered += lua_hashcollector(); 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; } -- cgit v1.2.3-55-g6feb