diff options
| author | Alina Banerjee <alina@glitchgirl.us> | 2021-06-27 04:23:13 +0000 |
|---|---|---|
| committer | Alina Banerjee <alina@glitchgirl.us> | 2021-07-19 22:38:29 +0000 |
| commit | de9fedc380d22ff6db3e4c7540af07b99d26fbd9 (patch) | |
| tree | 621cc2ed0f3e4cdd9b1b69c43d6a61215c7b4430 | |
| parent | b9d9b40a4b6af724eee16371bc3ba35e648354f9 (diff) | |
| download | haskell-de9fedc380d22ff6db3e4c7540af07b99d26fbd9.tar.gz | |
testsuite: Use appropriate threadDelay in T16916
| -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..d970f021bf 100644 --- a/testsuite/tests/lib/base/T16916.hs +++ b/testsuite/tests/lib/base/T16916.hs @@ -31,7 +31,7 @@ idleCpuUsage = do -- measure the process time spent in the rts, not in the mutator -- make sure to disable idle GC (+RTS -I0) !startCPUTime <- getCPUTime - threadDelay 100000 + GHC.Event.threadDelay 100000 !endCPUTime <- getCPUTime let !t = endCPUTime - startCPUTime return $ t |