remove unnecessary/broken definition of mask_

diff --git a/compiler/utils/Exception.hs b/compiler/utils/Exception.hs
index de78634..fa067b0 100644 (file)
--- a/compiler/utils/Exception.hs
+++ b/compiler/utils/Exception.hs
@@ -10,11 +10,6 @@ import Prelude hiding (catch)
 
 import Control.Exception
 
 
 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
 
 catchIO :: IO a -> (IOException -> IO a) -> IO a
 catchIO = catch