diff --git a/mps/code/arenavm.c b/mps/code/arenavm.c index 54b7ef7ba25..77abf295e0b 100644 --- a/mps/code/arenavm.c +++ b/mps/code/arenavm.c @@ -737,13 +737,13 @@ static Res VMArenaGrow(Arena arena, LocusPref pref, Size size) if (chunkSize < chunkMin) chunkSize = chunkMin; + res = ResRESOURCE; for(;; chunkSize = chunkHalf) { chunkHalf = chunkSize / 2; sliceSize = chunkHalf / fidelity; AVER(sliceSize > 0); /* remove slices, down to chunkHalf but no further */ - res = ResRESOURCE; for(; chunkSize > chunkHalf; chunkSize -= sliceSize) { if(chunkSize < chunkMin) { EVENT2(vmArenaExtendFail, chunkMin,