diff options
author | Ian Lynagh <ian@well-typed.com> | 2012-08-10 22:26:51 +0100 |
---|---|---|
committer | Ian Lynagh <ian@well-typed.com> | 2012-08-10 22:26:51 +0100 |
commit | cb07cb7df2cac23d1b4a132f98cf427a755e5f5d (patch) | |
tree | 626cbaf9016d03575446d0f69364d8f1f6ba97c9 | |
parent | 415598b232f6664fb4da8321f5f578405af245de (diff) | |
download | haskell-cb07cb7df2cac23d1b4a132f98cf427a755e5f5d.tar.gz |
Always define startProfTimer and stopProfTimer
This allows us to provide access to them in the base library.
-rw-r--r-- | rts/Proftimer.c | 8 | ||||
-rw-r--r-- | rts/Proftimer.h | 2 |
2 files changed, 4 insertions, 6 deletions
diff --git a/rts/Proftimer.c b/rts/Proftimer.c index 569f087bb4..7ee32f835c 100644 --- a/rts/Proftimer.c +++ b/rts/Proftimer.c @@ -25,21 +25,21 @@ static int ticks_to_heap_profile; // Time for a heap profile on the next context switch rtsBool performHeapProfile; -#ifdef PROFILING - void stopProfTimer( void ) { +#ifdef PROFILING do_prof_ticks = rtsFalse; +#endif } void startProfTimer( void ) { +#ifdef PROFILING do_prof_ticks = rtsTrue; -} - #endif +} void stopHeapProfTimer( void ) diff --git a/rts/Proftimer.h b/rts/Proftimer.h index 07dffff6b9..2b7646f2b7 100644 --- a/rts/Proftimer.h +++ b/rts/Proftimer.h @@ -14,10 +14,8 @@ void initProfTimer ( void ); void handleProfTick ( void ); -#ifdef PROFILING void stopProfTimer ( void ); void startProfTimer ( void ); -#endif void stopHeapProfTimer ( void ); void startHeapProfTimer ( void ); |