From d3cfe8948991666fe518140b1a60082accb7b7fd Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Wed, 26 Oct 2005 15:22:08 +0000
Subject: [PATCH] [project @ 2005-10-26 15:22:08 by simonmar] The prev/next
 link fields in struct Capability_ aren't used

---
 ghc/rts/Capability.c |    2 --
 ghc/rts/Capability.h |    3 ---
 2 files changed, 5 deletions(-)

diff --git a/ghc/rts/Capability.c b/ghc/rts/Capability.c
index 2288ca6..d30d5bc 100644
--- a/ghc/rts/Capability.c
+++ b/ghc/rts/Capability.c
@@ -138,8 +138,6 @@ initCapability( Capability *cap, nat i )
     cap->suspended_ccalling_tasks = NULL;
     cap->returning_tasks_hd = NULL;
     cap->returning_tasks_tl = NULL;
-    cap->next = NULL;
-    cap->prev = NULL;
 #endif
 
     cap->f.stgGCEnter1     = (F_)__stg_gc_enter_1;
diff --git a/ghc/rts/Capability.h b/ghc/rts/Capability.h
index 875f3e7..5b96019 100644
--- a/ghc/rts/Capability.h
+++ b/ghc/rts/Capability.h
@@ -61,9 +61,6 @@ struct Capability_ {
     Task *suspended_ccalling_tasks;
 
 #if defined(THREADED_RTS)
-    struct Capability_ *next;
-    struct Capability_ *prev;
-
     // Worker Tasks waiting in the wings.  Singly-linked.
     Task *spare_workers;
 
-- 
1.7.10.4