X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=rts%2FTask.h;h=566c0425cd9f53b60df1e5e95afb4257777b63be;hb=ec064b6d9d43b1655dd24df06d29b5e43940c7d6;hp=f91872f9a01e2cbae81eba66fee80e4724db8de6;hpb=51b85031ce99f1e9d4c72249d6d85672188f0fbd;p=ghc-hetmet.git

diff --git a/rts/Task.h b/rts/Task.h
index f91872f..566c042 100644
--- a/rts/Task.h
+++ b/rts/Task.h
@@ -233,8 +233,9 @@ void startWorkerTask (Capability *cap);
 // A thread-local-storage key that we can use to get access to the
 // current thread's Task structure.
 #if defined(THREADED_RTS)
-#if defined(linux_HOST_OS) && \
-    (defined(i386_HOST_ARCH) || defined(x86_64_HOST_ARCH))
+#if (defined(linux_HOST_OS) && \
+     (defined(i386_HOST_ARCH) || defined(x86_64_HOST_ARCH))) || \
+    (defined(mingw32_HOST_OS) && __GNUC__ >= 4 && __GNUC_MINOR__ >= 4)
 #define MYTASK_USE_TLV
 extern __thread Task *my_task;
 #else