From e2d03a9b0ea69c80e2a1b7bb0eeceb3b5ee9ec95 Mon Sep 17 00:00:00 2001
From: Gareth Rees <gdr@ravenbrook.com>
Date: Fri, 7 Nov 2014 14:04:35 +0000
Subject: [PATCH] Vmarenagrow now passes on the result code from vmchunkcreate,
 instead of substituting resresource under the circumstances described in
 job003899.

Copied from Perforce
 Change: 187489
 ServerID: perforce.ravenbrook.com
---
 mps/code/arenavm.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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,