Fix "runghc foo" where the program is foo.hs or foo.lhs
[ghc-hetmet.git] / rts / ThreadLabels.h
1 /* -----------------------------------------------------------------------------
2  * ThreadLabels.h
3  *
4  * (c) The GHC Team 2002-2006
5  *
6  * Table of thread labels.
7  *
8  * ---------------------------------------------------------------------------*/
9
10 #ifndef __THREADLABELS_H__
11 #define __THREADLABELS_H__
12
13 #if defined(DEBUG)
14 void    initThreadLabelTable (void);
15 void    freeThreadLabelTable (void);
16 void    updateThreadLabel    (StgWord key, void *data);
17 void *  lookupThreadLabel    (StgWord key);
18 void    removeThreadLabel    (StgWord key);
19 void    labelThread          (StgPtr tso, char *label);
20 #endif
21
22 #endif /* __THREADLABELS_H__ */