Commit d0758346 authored by Ian Lynagh's avatar Ian Lynagh
Browse files

Generalise the type of onException

Now it matches Control.Exception's type
parent 1303eb43
......@@ -16,7 +16,7 @@ module Distribution.Compat.Exception
import System.Exit
import qualified Control.Exception as Exception
onException :: IO a -> IO () -> IO a
onException :: IO a -> IO b -> IO a
#ifdef NEW_EXCEPTION
onException = Exception.onException
#else
......
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