Commit 5a185e27 authored by Simon Marlow's avatar Simon Marlow

remove unnecessary/broken definition of mask_

parent 4da6b466
......@@ -10,11 +10,6 @@ import Prelude hiding (catch)
import Control.Exception
#if __GLASGOW_HASKELL__ < 613
mask_ :: ((IO a -> IO a) -> IO b) -> IO b
mask_ f = block (f unblock)
#endif
catchIO :: IO a -> (IOException -> IO a) -> IO a
catchIO = catch
......
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