[commit: packages/directory] master: Add missing import on Windows in CreateDirectoryIfMissing001 (865b0f4)
git at git.haskell.org
git at git.haskell.org
Fri Dec 18 09:53:13 UTC 2015
Repository : ssh://git@git.haskell.org/directory
On branch : master
Link : http://ghc.haskell.org/trac/ghc/changeset/865b0f4b92e2c18ecb346a15c71f99698022d11e/directory
>---------------------------------------------------------------
commit 865b0f4b92e2c18ecb346a15c71f99698022d11e
Author: Phil Ruffwind <rf at rufflewind.com>
Date: Sun Oct 11 00:16:10 2015 -0400
Add missing import on Windows in CreateDirectoryIfMissing001
>---------------------------------------------------------------
865b0f4b92e2c18ecb346a15c71f99698022d11e
tests/CreateDirectoryIfMissing001.hs | 9 +++------
1 file changed, 3 insertions(+), 6 deletions(-)
diff --git a/tests/CreateDirectoryIfMissing001.hs b/tests/CreateDirectoryIfMissing001.hs
index 339585d..bfa7089 100644
--- a/tests/CreateDirectoryIfMissing001.hs
+++ b/tests/CreateDirectoryIfMissing001.hs
@@ -6,13 +6,10 @@ import Control.Concurrent (forkIO, newEmptyMVar, putMVar, takeMVar)
import qualified Control.Exception as E
import Control.Monad (replicateM_)
import Data.Monoid ((<>))
-import System.FilePath ((</>), addTrailingPathSeparator)
-import System.IO.Error(isAlreadyExistsError, isDoesNotExistError,
- isPermissionError)
-#ifndef mingw32_HOST_OS
import GHC.IO.Exception (IOErrorType(InappropriateType))
-import System.IO.Error(ioeGetErrorType)
-#endif
+import System.FilePath ((</>), addTrailingPathSeparator)
+import System.IO.Error (ioeGetErrorType, isAlreadyExistsError,
+ isDoesNotExistError, isPermissionError)
main :: TestEnv -> IO ()
main _t = do
More information about the ghc-commits
mailing list