X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FRetainerProfile.h;h=b2adf71d9d23f76d838cb599b1a5289edd815ed8;hb=7d9eb2e45b4a9ff4cb053b1ec37602be88528b62;hp=da9a847478cdd79b6fd67bfa169a2b3428e38da2;hpb=948c01bdb7f42504487a624b229137694871efd0;p=ghc-hetmet.git diff --git a/rts/RetainerProfile.h b/rts/RetainerProfile.h index da9a847..b2adf71 100644 --- a/rts/RetainerProfile.h +++ b/rts/RetainerProfile.h @@ -14,10 +14,12 @@ #include "RetainerSet.h" -extern void initRetainerProfiling ( void ); -extern void endRetainerProfiling ( void ); -extern void retainerProfile ( void ); -extern void resetStaticObjectForRetainerProfiling( StgClosure *static_objects ); +#include "BeginPrivate.h" + +void initRetainerProfiling ( void ); +void endRetainerProfiling ( void ); +void retainerProfile ( void ); +void resetStaticObjectForRetainerProfiling( StgClosure *static_objects ); extern StgWord flip; @@ -41,6 +43,8 @@ retainerSetOf( StgClosure *c ) extern lnat retainerStackBlocks ( void ); #endif +#include "EndPrivate.h" + #endif /* PROFILING */ #endif /* RETAINERPROFILE_H */