more fixes
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@827 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
2
C/save.c
2
C/save.c
@@ -650,7 +650,7 @@ check_header(CELL *info, CELL *ATrail, CELL *AStack, CELL *AHeap)
|
||||
if (Yap_ErrorMessage)
|
||||
return(FAIL_RESTORE);
|
||||
while (Yap_HeapBase != NULL && hp_size > Unsigned(AuxTop) - Unsigned(Yap_HeapBase)) {
|
||||
if(!Yap_growheap(FALSE)) {
|
||||
if(!Yap_growheap(FALSE, hp_size)) {
|
||||
return(FAIL_RESTORE);
|
||||
}
|
||||
}
|
||||
|
Reference in New Issue
Block a user