X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FTimer.c;fp=rts%2FTimer.c;h=586991a4db88f939576d752bd4e1c79513221ecd;hb=f5605a5a2ea4a4707c9bec48048d730f0f56dae2;hp=0e0b5386b759530934ca135c98d6148a3e51cb56;hpb=08f3834baf68671f1b9e61def2e4d5511fbe2c8d;p=ghc-hetmet.git

diff --git a/rts/Timer.c b/rts/Timer.c
index 0e0b538..586991a 100644
--- a/rts/Timer.c
+++ b/rts/Timer.c
@@ -93,5 +93,7 @@ startTimer(void)
 void
 stopTimer(void)
 {
-  stopTicker();
+  if (RtsFlags.MiscFlags.tickInterval != 0) {
+      stopTicker();
+  }
 }