X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FTimer.c;h=586991a4db88f939576d752bd4e1c79513221ecd;hb=d4050431de1adddedb240e497f77f89301f77070;hp=8088600246e761c591829979ed2635cba437b242;hpb=ab0e778ccfde61aed4c22679b24d175fc6cc9bf3;p=ghc-hetmet.git diff --git a/rts/Timer.c b/rts/Timer.c index 8088600..586991a 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,19 @@ 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(); + if (RtsFlags.MiscFlags.tickInterval != 0) { + stopTicker(); + } }