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

oops :

Browse Source
This commit is contained in:
Vitor Santos Costa 2012-05-14 16:22:53 +01:00
parent 6c36a8ccd3
commit f3f9c75cf7
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
C/heapgc.c
View File

@ -4130,7 +4130,7 @@ call_gc(UInt gc_lim, Int predarity, CELL *current_env, yamop *nextop USES_REGS)
if (ASP - H < gc_margin/sizeof(CELL) || if (ASP - H < gc_margin/sizeof(CELL) ||
effectiveness < 20) { effectiveness < 20) {
LeaveGCMode( PASS_REGS1 ); LeaveGCMode( PASS_REGS1 );
#ifdef YAPOR #ifndef YAPOR
if (gc_margin < 2*CalculateStackGap()) if (gc_margin < 2*CalculateStackGap())
gc_margin = 2*CalculateStackGap(); gc_margin = 2*CalculateStackGap();
return Yap_growstack(gc_margin); return Yap_growstack(gc_margin);