diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2010-10-02 19:51:18 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2010-10-02 19:51:18 +0000 |
| commit | 5a185e27def3ee8ace1704235eb277bc60c38618 (patch) | |
| tree | ff2d7861587c9eb47aec13952c0eb84fdd18d627 /compiler/utils/Exception.hs | |
| parent | 4da6b4667527241d7e227de51adb1dc0997bab90 (diff) | |
| download | haskell-5a185e27def3ee8ace1704235eb277bc60c38618.tar.gz | |
remove unnecessary/broken definition of mask_
Diffstat (limited to 'compiler/utils/Exception.hs')
| -rw-r--r-- | compiler/utils/Exception.hs | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/compiler/utils/Exception.hs b/compiler/utils/Exception.hs index de7863454a..fa067b0859 100644 --- a/compiler/utils/Exception.hs +++ b/compiler/utils/Exception.hs @@ -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 |