From: Simon Marlow <simonmar@microsoft.com>
Date: Wed, 14 Jun 2006 13:47:28 +0000 (+0000)
Subject: call wakeUpRts() in the correct place
X-Git-Tag: Before_FC_branch_merge~390
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=6879f4132340cb2f56eced35b8f6029a6f9a3ecb

call wakeUpRts() in the correct place
---

diff --git a/rts/Timer.c b/rts/Timer.c
index b4f5f8f..90f89b1 100644
--- a/rts/Timer.c
+++ b/rts/Timer.c
@@ -71,9 +71,8 @@ handle_tick(int unused STG_UNUSED)
 	  recent_activity = ACTIVITY_INACTIVE;
 	  blackholes_need_checking = rtsTrue;
 	  /* hack: re-use the blackholes_need_checking flag */
-	  
+	  wakeUpRts();
       }
-      wakeUpRts();
       break;
   default:
       break;