RTS tidyup sweep, first phase

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

diff --git a/rts/Proftimer.c b/rts/Proftimer.c
index 32e5c56..dfcc709 100644 (file)
--- a/rts/Proftimer.c
+++ b/rts/Proftimer.c
@@ -7,14 +7,15 @@
  * ---------------------------------------------------------------------------*/
 
 #include "PosixSource.h"
  * ---------------------------------------------------------------------------*/
 
 #include "PosixSource.h"

-

 #include "Rts.h"
 #include "Rts.h"

+

 #include "Profiling.h"
 #include "Profiling.h"

-#include "Timer.h"

 #include "Proftimer.h"
 #include "Proftimer.h"

-#include "RtsFlags.h"

 
 

+#ifdef PROFILING

 static rtsBool do_prof_ticks = rtsFalse;       // enable profiling ticks
 static rtsBool do_prof_ticks = rtsFalse;       // enable profiling ticks

+#endif
+

 static rtsBool do_heap_prof_ticks = rtsFalse;  // enable heap profiling ticks
 
 // Number of ticks until next heap census
 static rtsBool do_heap_prof_ticks = rtsFalse;  // enable heap profiling ticks
 
 // Number of ticks until next heap census

@@ -23,6 +24,8 @@ static int ticks_to_heap_profile;
 // Time for a heap profile on the next context switch
 rtsBool performHeapProfile;
 
 // Time for a heap profile on the next context switch
 rtsBool performHeapProfile;
 

+#ifdef PROFILING
+

 void
 stopProfTimer( void )
 {
 void
 stopProfTimer( void )
 {

@@ -35,6 +38,8 @@ startProfTimer( void )
     do_prof_ticks = rtsTrue;
 }
 
     do_prof_ticks = rtsTrue;
 }
 

+#endif
+

 void
 stopHeapProfTimer( void )
 {
 void
 stopHeapProfTimer( void )
 {