X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FTimer.c;fp=rts%2FTimer.c;h=0e0b5386b759530934ca135c98d6148a3e51cb56;hb=e1ddf51abb3a89392cc9da9a36b74f0d69f9a36b;hp=05d1fecdc7faadc194293a2912147004d84b1c4a;hpb=65ff44face84ae30f1ddf7d009d51c1778f8c7d3;p=ghc-hetmet.git

diff --git a/rts/Timer.c b/rts/Timer.c
index 05d1fec..0e0b538 100644
--- a/rts/Timer.c
+++ b/rts/Timer.c
@@ -85,7 +85,9 @@ void
 startTimer(void)
 {
   initProfTimer();
-  startTicker(RtsFlags.MiscFlags.tickInterval, handle_tick);
+  if (RtsFlags.MiscFlags.tickInterval != 0) {
+      startTicker(RtsFlags.MiscFlags.tickInterval, handle_tick);
+  }
 }
 
 void