X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2FThreadLabels.h;h=254b91ed10bbc3ad10b21da450e665a1c2690ce8;hp=97d3d0d2412b05806ba73fbd346dd367680d8a9d;hb=HEAD;hpb=0065d5ab628975892cea1ec7303f968c3338cbe1 diff --git a/rts/ThreadLabels.h b/rts/ThreadLabels.h index 97d3d0d..254b91e 100644 --- a/rts/ThreadLabels.h +++ b/rts/ThreadLabels.h @@ -1,27 +1,25 @@ /* ----------------------------------------------------------------------------- * ThreadLabels.h * - * (c) The GHC Team 2002-2003 + * (c) The GHC Team 2002-2006 * * Table of thread labels. * * ---------------------------------------------------------------------------*/ -#ifndef __THREADLABELS_H__ -#define __THREADLABELS_H__ -#include "Rts.h" -#include "Hash.h" +#ifndef THREADLABELS_H +#define THREADLABELS_H -void -initThreadLabelTable(void); +#include "BeginPrivate.h" -void -updateThreadLabel(StgWord key, void *data); +#if defined(DEBUG) +void initThreadLabelTable (void); +void freeThreadLabelTable (void); +void * lookupThreadLabel (StgWord key); +void removeThreadLabel (StgWord key); +void labelThread (StgPtr tso, char *label); +#endif -void * -lookupThreadLabel(StgWord key); +#include "EndPrivate.h" -void -removeThreadLabel(StgWord key); - -#endif /* __THREADLABELS_H__ */ +#endif /* THREADLABELS_H */