diff options
| -rw-r--r-- | testsuite/tests/lib/base/T16916.hs | 2 |
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 |