X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FTask.c;h=e93d60d86f6d582238f1ecce93f45885b79b0abd;hb=addf865136274069fe72793aa6f82a6e0fd4758a;hp=8a289be0078f8a4d68af8b532a8ef9b219a74145;hpb=ed30194937e0562e62da3e71f9da8585ac6cf477;p=ghc-hetmet.git

diff --git a/rts/Task.c b/rts/Task.c
index 8a289be..e93d60d 100644
--- a/rts/Task.c
+++ b/rts/Task.c
@@ -63,8 +63,10 @@ initTaskManager (void)
     if (!tasksInitialized) {
 	taskCount = 0;
 	tasksInitialized = 1;
-#if defined(THREADED_RTS) && !defined(MYTASK_USE_TLV)
+#if defined(THREADED_RTS)
+#if !defined(MYTASK_USE_TLV)
 	newThreadLocalKey(&currentTaskKey);
+#endif
         initMutex(&all_tasks_mutex);
 #endif
     }