writeCovReport' :: Bool -> FilePath -> IORef LcovReport -> IO ()
writeCovReport' mkParentDir reportFile ref = do
  when mkParentDir $ createDirectoryIfMissing True $ takeDirectory reportFile
  readIORef ref >>= writeReport reportFile

-- _cover "examples/accounts/accounts.repl"
writeCovReport' :: Bool -> FilePath -> IORef LcovReport -> IO ()
writeCovReport' mkParentDir reportFile ref = do
  when mkParentDir $ createDirectoryIfMissing True $ takeDirectory reportFile
  readIORef ref >>= writeReport reportFile

-- _cover "examples/accounts/accounts.repl"
writeCovReport' mkParentDir reportFile ref = do
  when mkParentDir $ createDirectoryIfMissing True $ takeDirectory reportFile
  readIORef ref >>= writeReport reportFile

-- _cover "examples/accounts/accounts.repl"