[commit: ghc] ghc-7.4: last_free_capability should never be NULL (74af5a6)

[Ian Lynagh]

Repository : ssh://darcs.haskell.org//srv/darcs/ghc

On branch  : ghc-7.4

http://hackage.haskell.org/trac/ghc/changeset/74af5a62196b5af703bd38110409cd1c4f858dce

>---------------------------------------------------------------

commit 74af5a62196b5af703bd38110409cd1c4f858dce
Author: Simon Marlow <marlowsd at gmail.com>
Date:   Mon Jan 9 11:52:24 2012 +0000

    last_free_capability should never be NULL

>---------------------------------------------------------------

 rts/Capability.c |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/rts/Capability.c b/rts/Capability.c
index 7ce23a1..05b0761 100644
--- a/rts/Capability.c
+++ b/rts/Capability.c
@@ -353,7 +353,7 @@ moreCapabilities (nat from USED_IF_THREADS, nat to USED_IF_THREADS)
 	initCapability(&capabilities[i], i);
     }
 
-    last_free_capability = NULL;
+    last_free_capability = &capabilities[0];
 
     debugTrace(DEBUG_sched, "allocated %d more capabilities", to - from);