[commit: ghc] master: remove unused sched_shutting_down (820134a)

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

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/820134a0d80d54d218742d35453903d0348b279f

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

commit 820134a0d80d54d218742d35453903d0348b279f
Author: Simon Marlow <[email protected]>
Date:   Fri Oct 12 15:31:17 2012 +0100

    remove unused sched_shutting_down

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

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

diff --git a/rts/Capability.c b/rts/Capability.c
index 4c33115..d02c34d 100644
--- a/rts/Capability.c
+++ b/rts/Capability.c
@@ -842,7 +842,7 @@ tryGrabCapability (Capability *cap, Task *task)
  * allow the workers to stop.
  *
  * This function should be called when interrupted and
- * shutting_down_scheduler = rtsTrue, thus any worker that wakes up
+ * sched_state = SCHED_SHUTTING_DOWN, thus any worker that wakes up
  * will exit the scheduler and call taskStop(), and any bound thread
  * that wakes up will return to its caller.  Runnable threads are
  * killed.
diff --git a/rts/Schedule.c b/rts/Schedule.c
index d44cf72..7d3fb53 100644
--- a/rts/Schedule.c
+++ b/rts/Schedule.c
@@ -98,13 +98,6 @@ volatile StgWord sched_state = SCHED_RUNNING;
 StgTSO dummy_tso;
 
 /*
- * Set to TRUE when entering a shutdown state (via shutdownHaskellAndExit()) --
- * in an MT setting, needed to signal that a worker thread shouldn't hang around
- * in the scheduler when it is out of work.
- */
-rtsBool shutting_down_scheduler = rtsFalse;
-
-/*
  * This mutex protects most of the global scheduler data in
  * the THREADED_RTS runtime.
  */