summaryrefslogtreecommitdiff
path: root/rts/sm/Compact.c
diff options
context:
space:
mode:
authorAndreas Klebinger <klebinger.andreas@gmx.at>2022-01-19 15:04:54 +0100
committerAndreas Klebinger <klebinger.andreas@gmx.at>2022-01-21 13:34:30 +0100
commitc0c4cdb180112a333d753bd9a92d64013debf69e (patch)
treef64bf8f3f207c62c48306e3873132f97c3a101c0 /rts/sm/Compact.c
parent3b009e1a6247057ff976043695b797b5d0649414 (diff)
downloadhaskell-wip/andreask/unbreak_master.tar.gz
Revert "rts/winio: Fix #18382"wip/andreask/unbreak_master
This commit prevents master from being built by ghc 9.0/9.2 so I will revert it for now. This reverts commit 5a6efd218734dbb5c1350531680cd3f4177690f1.
Diffstat (limited to 'rts/sm/Compact.c')
-rw-r--r--rts/sm/Compact.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/rts/sm/Compact.c b/rts/sm/Compact.c
index 3e71c30d35..43867343fc 100644
--- a/rts/sm/Compact.c
+++ b/rts/sm/Compact.c
@@ -461,6 +461,7 @@ thread_TSO (StgTSO *tso)
|| tso->why_blocked == BlockedOnMVarRead
|| tso->why_blocked == BlockedOnBlackHole
|| tso->why_blocked == BlockedOnMsgThrowTo
+ || tso->why_blocked == BlockedOnIOCompletion
|| tso->why_blocked == NotBlocked
) {
thread_(&tso->block_info.closure);