Commit 2b296d22 authored by Mikhail Glushenkov's avatar Mikhail Glushenkov
Browse files

Fix warning on Windows.

parent 6ce9ca28
......@@ -34,8 +34,12 @@ import qualified Data.Set as S
import Data.Maybe
( isJust, fromMaybe, maybeToList )
import Control.Exception as Exception
( Exception(fromException, toException), bracket, catches
( Exception(toException), bracket, catches
, Handler(Handler), handleJust, IOException, SomeException )
#ifndef mingw32_HOST_OS
import Control.Exception as Exception
( Exception(fromException) )
#endif
import System.Exit
( ExitCode(..) )
import Distribution.Compat.Exception
......
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