make GC happen when we have 1/4 of total memory free.

There was a problem of not having enough room to put 10% of the heap.
This commit is contained in:
Vítor Santos de Costa 2008-10-24 10:35:53 +01:00
parent 5c959aee93
commit 7f365f7377

View File

@ -770,7 +770,7 @@ extern REGSTORE Yap_standard_regs;
static inline UInt
CalculateStackGap(void)
{
UInt gmin = (LCL0-H0)>>3;
UInt gmin = (LCL0-H0)>>2;
if (gmin < MinStackGap) gmin = MinStackGap;
return gmin;