diff options
| author | Edsko de Vries <edsko@well-typed.com> | 2014-07-13 15:19:45 -0500 |
|---|---|---|
| committer | Austin Seipp <austin@well-typed.com> | 2014-07-13 15:19:45 -0500 |
| commit | 16403f0d182d2d3d0b1fbe5ad778ead4bfcb7e16 (patch) | |
| tree | 926bff900ac33c7cb319320356e4eaeb2eccd2e5 /rts/Task.h | |
| parent | 39630ab15cc0607103dc4ef3d9089de44ef17c2d (diff) | |
| download | haskell-16403f0d182d2d3d0b1fbe5ad778ead4bfcb7e16.tar.gz | |
Acquire all_tasks_mutex in forkProcess
Summary: (for the same reason that we acquire all the other mutexes)
Test Plan: validate
Reviewers: simonmar, austin, duncan
Reviewed By: simonmar, austin, duncan
Subscribers: simonmar, relrod, carter
Differential Revision: https://phabricator.haskell.org/D60
Diffstat (limited to 'rts/Task.h')
| -rw-r--r-- | rts/Task.h | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/rts/Task.h b/rts/Task.h index cf70256326..8dab0a2fcf 100644 --- a/rts/Task.h +++ b/rts/Task.h @@ -171,6 +171,11 @@ isBoundTask (Task *task) // extern Task *all_tasks; +// The all_tasks list is protected by the all_tasks_mutex +#if defined(THREADED_RTS) +extern Mutex all_tasks_mutex; +#endif + // Start and stop the task manager. // Requires: sched_mutex. // |