X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FRetainerSet.h;h=5004527d21732b3d6870452715419dbf58657f1b;hb=86add45dbfb6f962b65e371143dd467ae783f9e7;hp=e3d3acd38cdc7cf2fa35698bfa46619f0870bf38;hpb=9a9803e8dc80ba41bd3e2d31228e64fa6b61060e;p=ghc-hetmet.git

diff --git a/rts/RetainerSet.h b/rts/RetainerSet.h
index e3d3acd..5004527 100644
--- a/rts/RetainerSet.h
+++ b/rts/RetainerSet.h
@@ -14,7 +14,7 @@
 
 #ifdef PROFILING
 
-BEGIN_RTS_PRIVATE
+#include "BeginPrivate.h"
 
 /*
   Type 'retainer' defines the retainer identity.
@@ -165,7 +165,7 @@ void traverseAllRetainerSet(void (*f)(RetainerSet *));
 
 #ifdef SECOND_APPROACH
 // Prints a single retainer set.
-void printRetainerSetShort(FILE *, RetainerSet *);
+void printRetainerSetShort(FILE *, RetainerSet *, nat);
 #endif
 
 // Print the statistics on all the retainer sets.
@@ -199,7 +199,7 @@ void outputAllRetainerSet(FILE *);
 //       the best place to define it.
 void printRetainer(FILE *, retainer);
 
-END_RTS_PRIVATE
+#include "EndPrivate.h"
 
 #endif /* PROFILING */
 #endif /* RETAINERSET_H */