summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--rts/Task.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/rts/Task.c b/rts/Task.c
index 918dc559b8..8779e292ef 100644
--- a/rts/Task.c
+++ b/rts/Task.c
@@ -58,7 +58,11 @@ initTaskManager (void)
taskCount = 0;
workerCount = 0;
tasksRunning = 0;
+#if defined(THREADED_RTS)
+ maxWorkers = DEFAULT_MAX_WORKERS * RtsFlags.ParFlags.nNodes;
+#else
maxWorkers = DEFAULT_MAX_WORKERS;
+#endif
initialized = 1;
#if defined(THREADED_RTS)
newThreadLocalKey(&currentTaskKey);