Commit 602adc29 authored by Ian Lynagh's avatar Ian Lynagh

Fix the Windows build

parent 916a1cab
......@@ -32,6 +32,9 @@ import Foreign.Marshal.Alloc ( allocaBytes )
import System.IO (IOMode(..), openBinaryFile, hGetBuf, hPutBuf, hClose)
import System.IO.Error ( try )
import GHC.IOBase ( IOException(..) )
#if defined(mingw32_HOST_OS)
import GHC.IOBase ( IOErrorType(..) )
#endif
#else
import System.IO ( try )
#endif
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment