summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2022-10-16 10:46:25 -0400
committerBen Gamari <ben@smart-cactus.org>2022-10-16 10:46:25 -0400
commit1c134c134713b2ccc4d6f71b5502693d1d56f90f (patch)
tree32d8d99da61d6353d22812d169a661772a903b29
parent19e3255f253ed186e6749679fa44bfc6d68ac5bd (diff)
downloadhaskell-wip/ghc-io-uring.tar.gz
-rw-r--r--testsuite/tests/lib/base/T16916.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/testsuite/tests/lib/base/T16916.hs b/testsuite/tests/lib/base/T16916.hs
index d012ac6fe7..2922c692a9 100644
--- a/testsuite/tests/lib/base/T16916.hs
+++ b/testsuite/tests/lib/base/T16916.hs
@@ -38,7 +38,7 @@ idleCpuUsage = do
main :: IO ()
main = do
- (Just eventMgr) <- getSystemEventManager
+ (_, Just eventMgr) <- getSystemEventManager
fd <- makeTestSocketFd
let getAvgCpuUsage = do