X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FThreadLabels.h;h=550e2869e32932cb4a087a7de371a30e68f1b548;hb=7d7c187b4a12f1bb350e85cdb0115e19537cc704;hp=97d3d0d2412b05806ba73fbd346dd367680d8a9d;hpb=0065d5ab628975892cea1ec7303f968c3338cbe1;p=ghc-hetmet.git

diff --git a/rts/ThreadLabels.h b/rts/ThreadLabels.h
index 97d3d0d..550e286 100644
--- a/rts/ThreadLabels.h
+++ b/rts/ThreadLabels.h
@@ -1,27 +1,26 @@
 /* -----------------------------------------------------------------------------
  * 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);
+#pragma GCC visibility push(hidden)
 
-void
-updateThreadLabel(StgWord key, void *data);
+#if defined(DEBUG)
+void    initThreadLabelTable (void);
+void    freeThreadLabelTable (void);
+void    updateThreadLabel    (StgWord key, void *data);
+void *  lookupThreadLabel    (StgWord key);
+void    removeThreadLabel    (StgWord key);
+void    labelThread          (StgPtr tso, char *label);
+#endif
 
-void *
-lookupThreadLabel(StgWord key);
+#pragma GCC visibility pop
 
-void
-removeThreadLabel(StgWord key);
-
-#endif /* __THREADLABELS_H__ */
+#endif /* THREADLABELS_H */