Extend ModBreaks with the srcspan's of the enclosing expressions

[ghc-hetmet.git] / rts / Timer.c

diff --git a/rts/Timer.c b/rts/Timer.c
index 05d1fec..586991a 100644 (file)
--- a/rts/Timer.c
+++ b/rts/Timer.c
@@ -85,11 +85,15 @@ void
 startTimer(void)
 {
   initProfTimer();
-  startTicker(RtsFlags.MiscFlags.tickInterval, handle_tick);
+  if (RtsFlags.MiscFlags.tickInterval != 0) {
+      startTicker(RtsFlags.MiscFlags.tickInterval, handle_tick);
+  }
 }
 
 void
 stopTimer(void)
 {
-  stopTicker();
+  if (RtsFlags.MiscFlags.tickInterval != 0) {
+      stopTicker();
+  }
 }