X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2FTimer.c;h=0e0b5386b759530934ca135c98d6148a3e51cb56;hp=8088600246e761c591829979ed2635cba437b242;hb=8a2809c29de9f23eba7ca682b48390033a9d40f6;hpb=ab0e778ccfde61aed4c22679b24d175fc6cc9bf3 diff --git a/rts/Timer.c b/rts/Timer.c index 8088600..0e0b538 100644 --- a/rts/Timer.c +++ b/rts/Timer.c @@ -42,9 +42,7 @@ static void handle_tick(int unused STG_UNUSED) { -#ifdef PROFILING handleProfTick(); -#endif if (RtsFlags.ConcFlags.ctxtSwitchTicks > 0) { ticks_to_ctxt_switch--; if (ticks_to_ctxt_switch <= 0) { @@ -83,18 +81,17 @@ handle_tick(int unused STG_UNUSED) #endif } -int +void startTimer(void) { -#ifdef PROFILING initProfTimer(); -#endif - - return startTicker(RtsFlags.MiscFlags.tickInterval, handle_tick); + if (RtsFlags.MiscFlags.tickInterval != 0) { + startTicker(RtsFlags.MiscFlags.tickInterval, handle_tick); + } } -int +void stopTimer(void) { - return stopTicker(); + stopTicker(); }