fix maximum limit for expanding area.

This commit is contained in:
Vítor Santos Costa 2011-10-21 22:05:28 +01:00
parent 5cd157147f
commit df05859cb4

View File

@ -1608,7 +1608,7 @@ Yap_ExtendWorkSpaceThroughHole(UInt s)
#elif SIZEOF_INT_P==8 #elif SIZEOF_INT_P==8
{ {
int n = 1024*1024; int n = 1024*1024;
while (n) { while (n--) {
/* progress 1 MB */ /* progress 1 MB */
WorkSpaceTop += 512*1024; WorkSpaceTop += 512*1024;
if (ExtendWorkSpace(s, MAP_FIXED)) { if (ExtendWorkSpace(s, MAP_FIXED)) {