Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : master
http://hackage.haskell.org/trac/ghc/changeset/820134a0d80d54d218742d35453903d0348b279f >--------------------------------------------------------------- commit 820134a0d80d54d218742d35453903d0348b279f Author: Simon Marlow <marlo...@gmail.com> 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. */ _______________________________________________ Cvs-ghc mailing list Cvs-ghc@haskell.org http://www.haskell.org/mailman/listinfo/cvs-ghc