diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

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

Browse Source 
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
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
H/Regs.h
View File

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