diff options
-rw-r--r-- | rts/Task.c | 4 |
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(¤tTaskKey); |