summaryrefslogtreecommitdiff
path: root/utils/deriveConstants/Main.hs
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2019-09-07 01:48:46 -0400
committerBen Gamari <ben@smart-cactus.org>2019-09-07 04:13:18 -0400
commit95844745eda80f8fe35794c81e4ac87b9d528999 (patch)
tree3b027829a84db11a2d842447dbec0de50979fb04 /utils/deriveConstants/Main.hs
parentb55ee979d32df938eee9c4c02c189f8be267e8a1 (diff)
downloadhaskell-wip/pause-threads.tar.gz
Support for pausing other threadswip/pause-threads
Diffstat (limited to 'utils/deriveConstants/Main.hs')
-rw-r--r--utils/deriveConstants/Main.hs5
1 files changed, 5 insertions, 0 deletions
diff --git a/utils/deriveConstants/Main.hs b/utils/deriveConstants/Main.hs
index a812ac42c8..434dad0737 100644
--- a/utils/deriveConstants/Main.hs
+++ b/utils/deriveConstants/Main.hs
@@ -556,6 +556,11 @@ wanteds os = concat
,closureField C "MessageBlackHole" "tso"
,closureField C "MessageBlackHole" "bh"
+ ,closureSize C "MessagePauseThread"
+ ,closureField C "MessagePauseThread" "link"
+ ,closureField C "MessagePauseThread" "tso"
+ ,closureField C "MessagePauseThread" "mvar"
+
,closureSize C "StgCompactNFData"
,closureField C "StgCompactNFData" "totalW"
,closureField C "StgCompactNFData" "autoBlockW"