X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FProfHeap.h;h=82f0923c850ab787d7ebe7990bf2e0402dbb7372;hb=b996479a35d1876a1c11a350dc568da7b75fcaf2;hp=270dc5573efbc4698d0564880d5ea0bb85ba48fa;hpb=fd4ef873be4c343463e3a601897e13b8fe11897a;p=ghc-hetmet.git diff --git a/ghc/rts/ProfHeap.h b/ghc/rts/ProfHeap.h index 270dc55..82f0923 100644 --- a/ghc/rts/ProfHeap.h +++ b/ghc/rts/ProfHeap.h @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: ProfHeap.h,v 1.1 1999/09/15 13:46:29 simonmar Exp $ + * $Id: ProfHeap.h,v 1.4 2001/12/12 14:31:43 simonmar Exp $ * * (c) The GHC Team, 1998-1999 * @@ -7,7 +7,14 @@ * * ---------------------------------------------------------------------------*/ +#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