summaryrefslogtreecommitdiff
path: root/rts/Capability.h
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2010-11-25 13:57:29 +0000
committerSimon Marlow <marlowsd@gmail.com>2010-11-25 13:57:29 +0000
commit150ac5e907ec5096660f90caaa5f076da181d81b (patch)
tree1063793e8e1c563e68004f7063993771736ebcfb /rts/Capability.h
parent82a769cba9297d362b5e5ce2d1983e37b6057873 (diff)
downloadhaskell-150ac5e907ec5096660f90caaa5f076da181d81b.tar.gz
Keep a maximum of 6 spare worker threads per Capability (#4262)
Diffstat (limited to 'rts/Capability.h')
-rw-r--r--rts/Capability.h1
1 files changed, 1 insertions, 0 deletions
diff --git a/rts/Capability.h b/rts/Capability.h
index a32062a27f..a15ce15d88 100644
--- a/rts/Capability.h
+++ b/rts/Capability.h
@@ -79,6 +79,7 @@ struct Capability_ {
#if defined(THREADED_RTS)
// Worker Tasks waiting in the wings. Singly-linked.
Task *spare_workers;
+ nat n_spare_workers; // count of above
// This lock protects running_task, returning_tasks_{hd,tl}, wakeup_queue.
Mutex lock;