X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FProfHeap.h;h=0251416762786cf44c12131ddfe179089f5996ca;hb=1f5e3b2472084434edf71a89c4764d1509e8e9b0;hp=270dc5573efbc4698d0564880d5ea0bb85ba48fa;hpb=fd4ef873be4c343463e3a601897e13b8fe11897a;p=ghc-hetmet.git diff --git a/ghc/rts/ProfHeap.h b/ghc/rts/ProfHeap.h index 270dc55..0251416 100644 --- a/ghc/rts/ProfHeap.h +++ b/ghc/rts/ProfHeap.h @@ -1,13 +1,19 @@ /* ----------------------------------------------------------------------------- - * $Id: ProfHeap.h,v 1.1 1999/09/15 13:46:29 simonmar Exp $ * - * (c) The GHC Team, 1998-1999 + * (c) The GHC Team, 1998-2005 * * Support for heap profiling * * ---------------------------------------------------------------------------*/ +#ifndef PROFHEAP_H +#define PROFHEAP_H -void heapCensus(void); -extern nat initHeapProfiling(void); -void endHeapProfiling(void); +extern void heapCensus( void ); +extern nat initHeapProfiling( void ); +extern void endHeapProfiling( void ); +extern rtsBool closureSatisfiesConstraints( StgClosure* p ); +extern void LDV_recordDead( StgClosure *c, nat size ); +extern rtsBool strMatchesSelector( char* str, char* sel ); + +#endif /* PROFHEAP_H */