X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=includes%2Frts%2FThreads.h;h=4f343b804c875ccf587982dc4c3319204edd6cfc;hp=06a0ed11dc7ee843c6309bf07868a50c70fbad5e;hb=653e325e08c5f632aa194f9239e938faca5abba5;hpb=4c083061fa937ca7d05211e516002d9e4c14af2d

diff --git a/includes/rts/Threads.h b/includes/rts/Threads.h
index 06a0ed1..4f343b8 100644
--- a/includes/rts/Threads.h
+++ b/includes/rts/Threads.h
@@ -34,7 +34,14 @@ StgRegTable * resumeThread  (void *);
 //
 int    cmp_thread      (StgPtr tso1, StgPtr tso2);
 int    rts_getThreadId (StgPtr tso);
+
+#if !defined(mingw32_HOST_OS)
 pid_t  forkProcess     (HsStablePtr *entry);
+#else
+pid_t  forkProcess     (HsStablePtr *entry)
+    GNU_ATTRIBUTE(__noreturn__);
+#endif
+
 HsBool rtsSupportsBoundThreads (void);
 
 // The number of Capabilities