X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=includes%2FOSThreads.h;h=f9af6c408c1bcfa0ae3e6a2d3ba2f37a3947e520;hp=32f147ae6f1157609e6c0f9ed12e95f05393d0ca;hb=e4fdc426413d178c86d3ba93702aad5eb17734bf;hpb=80ce44f764633347ea15b570e3f758b6e7aecd63

diff --git a/includes/OSThreads.h b/includes/OSThreads.h
index 32f147a..f9af6c4 100644
--- a/includes/OSThreads.h
+++ b/includes/OSThreads.h
@@ -73,6 +73,8 @@ typedef pthread_key_t   ThreadLocalKey;
 
 typedef HANDLE Condition;
 typedef DWORD OSThreadId;
+// don't be tempted to use HANDLE as the OSThreadId: there can be 
+// many HANDLES to a given thread, so comparison would not work.
 typedef DWORD ThreadLocalKey;
 
 #define OSThreadProcAttr __stdcall
@@ -146,6 +148,7 @@ typedef void OSThreadProcAttr OSThreadProc(void *);
 
 extern int  createOSThread        ( OSThreadId* tid, 
 				    OSThreadProc *startProc, void *param);
+extern rtsBool osThreadIsAlive    ( OSThreadId id );
 
 //
 // Condition Variables