Skip to content

Commit 228a05b

Browse files
authored
Merge branch 'master' into importsfix
2 parents 4173871 + c914c35 commit 228a05b

File tree

1 file changed

+2
-0
lines changed

1 file changed

+2
-0
lines changed

ghcide/test/exe/Main.hs

+2
Original file line numberDiff line numberDiff line change
@@ -79,6 +79,7 @@ import System.FilePath
7979
import System.IO.Extra hiding (withTempDir)
8080
import qualified System.IO.Extra
8181
import System.Info.Extra (isWindows)
82+
import System.Mem (performGC)
8283
import System.Process.Extra (CreateProcess (cwd),
8384
createPipe, proc,
8485
readCreateProcessWithExitCode)
@@ -5767,6 +5768,7 @@ unitTests = do
57675768
findResolution_us :: Int -> IO Int
57685769
findResolution_us delay_us | delay_us >= 1000000 = error "Unable to compute timestamp resolution"
57695770
findResolution_us delay_us = withTempFile $ \f -> withTempFile $ \f' -> do
5771+
performGC
57705772
writeFile f ""
57715773
threadDelay delay_us
57725774
writeFile f' ""

0 commit comments

Comments
 (0)