X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2FProftimer.c;h=32e5c560737317881e24a9738b64b0d2b7e03c16;hp=3b499152d66b768e682ec7b8947e07b5d6438720;hb=89eac8928317774fdc3f283d78d3ff3cb315db5e;hpb=0065d5ab628975892cea1ec7303f968c3338cbe1 diff --git a/rts/Proftimer.c b/rts/Proftimer.c index 3b49915..32e5c56 100644 --- a/rts/Proftimer.c +++ b/rts/Proftimer.c @@ -6,8 +6,6 @@ * * ---------------------------------------------------------------------------*/ -#if defined (PROFILING) - #include "PosixSource.h" #include "Rts.h" @@ -57,9 +55,6 @@ initProfTimer( void ) { performHeapProfile = rtsFalse; - RtsFlags.ProfFlags.profileIntervalTicks = - RtsFlags.ProfFlags.profileInterval / TICK_MILLISECS; - ticks_to_heap_profile = RtsFlags.ProfFlags.profileIntervalTicks; startHeapProfTimer(); @@ -69,9 +64,11 @@ initProfTimer( void ) void handleProfTick(void) { +#ifdef PROFILING if (do_prof_ticks) { CCCS->time_ticks++; } +#endif if (do_heap_prof_ticks) { ticks_to_heap_profile--; @@ -81,5 +78,3 @@ handleProfTick(void) } } } - -#endif /* PROFILING */