X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FTimer.c;h=dddc75414d4efaf2c68f5c8d680ed4830e932414;hb=81c95f7d9854521a568179bb19199299835b7a53;hp=8c178a076bab249cef90d2c7bee8225a70e93331;hpb=a2a67cd520b9841114d69a87a423dabcb3b4368e;p=ghc-hetmet.git diff --git a/rts/Timer.c b/rts/Timer.c index 8c178a0..dddc754 100644 --- a/rts/Timer.c +++ b/rts/Timer.c @@ -76,8 +76,6 @@ handle_tick(int unused STG_UNUSED) ticks_to_gc = RtsFlags.GcFlags.idleGCDelayTime / RtsFlags.MiscFlags.tickInterval; recent_activity = ACTIVITY_INACTIVE; - blackholes_need_checking = rtsTrue; - /* hack: re-use the blackholes_need_checking flag */ wakeUpRts(); } } @@ -114,9 +112,9 @@ stopTimer(void) } void -exitTimer(void) +exitTimer (rtsBool wait) { if (RtsFlags.MiscFlags.tickInterval != 0) { - exitTicker(); + exitTicker(wait); } }