Unbreak Windows build: delete unusud throwIOIO
authorThomas Miedema <thomasmiedema@gmail.com>
Wed, 8 Jul 2015 13:30:30 +0000 (15:30 +0200)
committerThomas Miedema <thomasmiedema@gmail.com>
Wed, 8 Jul 2015 13:30:45 +0000 (15:30 +0200)
Should have been part of 9aa0e4b23d074af44363236fb0f120f07c6e0067.

utils/ghc-pkg/Main.hs

index 6133017..1d80e97 100644 (file)
@@ -1977,11 +1977,6 @@ installSignalHandlers = do
   return ()
 #endif
 
-#if mingw32_HOST_OS || mingw32_TARGET_OS
-throwIOIO :: Exception.IOException -> IO a
-throwIOIO = Exception.throwIO
-#endif
-
 catchIO :: IO a -> (Exception.IOException -> IO a) -> IO a
 catchIO = Exception.catch