Partial fix for #926

[ghc-hetmet.git] / includes / OSThreads.h

diff --git a/includes/OSThreads.h b/includes/OSThreads.h
index 32f147a..f9af6c4 100644 (file)
--- a/includes/OSThreads.h
+++ b/includes/OSThreads.h
@@ -73,6 +73,8 @@ typedef pthread_key_t   ThreadLocalKey;
 
 typedef HANDLE Condition;
 typedef DWORD OSThreadId;
 
 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
 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 int  createOSThread        ( OSThreadId* tid, 
                                    OSThreadProc *startProc, void *param);

+extern rtsBool osThreadIsAlive    ( OSThreadId id );

 
 //
 // Condition Variables
 
 //
 // Condition Variables