Add missing initialisation of cap->disabled
authorSimon Marlow <marlowsd@gmail.com>
Mon, 16 Jan 2012 14:36:56 +0000 (14:36 +0000)
committerSimon Marlow <marlowsd@gmail.com>
Mon, 16 Jan 2012 14:39:38 +0000 (14:39 +0000)
rts/Capability.c

index 3177e3b..54f9196 100644 (file)
@@ -228,6 +228,7 @@ initCapability( Capability *cap, nat i )
     cap->no = i;
     cap->in_haskell        = rtsFalse;
     cap->idle              = 0;
+    cap->disabled          = rtsFalse;
 
     cap->run_queue_hd      = END_TSO_QUEUE;
     cap->run_queue_tl      = END_TSO_QUEUE;