[commit: ghc] ghc-lwc2: Removed setting yielded from Substrate's scheduleScontActionRTS. This will allow the user-level scheduler to examine why the thread was sleeping in the first place. (609dbbd)

[Sivaramakrishnan Krishnamoorthy Chandrasekaran]

Repository : http://darcs.haskell.org/ghc.git/

On branch  : ghc-lwc2

http://hackage.haskell.org/trac/ghc/changeset/609dbbdd2e6ba648bdf9d0ed34a88426bc001903

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

commit 609dbbdd2e6ba648bdf9d0ed34a88426bc001903
Author: KC Sivaramakrishnan <chandras at cs.purdue.edu>
Date:   Fri Mar 8 12:36:12 2013 -0500

    Removed setting yielded from Substrate's scheduleScontActionRTS. This will allow the user-level scheduler to examine why the thread was sleeping in the first place.

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

 libraries/base/LwConc/Substrate.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/libraries/base/LwConc/Substrate.hs b/libraries/base/LwConc/Substrate.hs
index 6a707a4..0a3e9ce 100644
--- a/libraries/base/LwConc/Substrate.hs
+++ b/libraries/base/LwConc/Substrate.hs
@@ -466,7 +466,7 @@ scheduleSContActionRts sc = Exception.catch (atomically $ do
   case stat of
     SContSwitched (BlockedInHaskell (ResumeToken t)) -> writePVar t False
     otherwise -> return ()
-  setSContStatus sc $ SContSwitched Yielded
+  -- setSContStatus sc $ SContSwitched Yielded
   unblock <- getScheduleSContActionSCont sc
   unblock sc) (\e -> do {
                       hPutStrLn stderr ("ERROR:" ++ show (e::IOException));