diff options
| author | Inari Listenmaa <inari.listenmaa@gmail.com> | 2017-08-21 10:26:57 +0300 |
|---|---|---|
| committer | Inari Listenmaa <inari.listenmaa@gmail.com> | 2017-08-21 10:26:57 +0300 |
| commit | c89759e6388aa00a82c9a4847be73c9e71726147 (patch) | |
| tree | 5994c67ad1d79820d18451518265de5c91c60b30 /src/compiler/GF/System/Catch.hs | |
| parent | 2d85550e5466c18f248321f7eab333025098ea53 (diff) | |
| parent | 0a3b822313cc664cef860b39ec74c21e0d00475b (diff) | |
Merge branch 'master' of https://github.com/GrammaticalFramework/GF
Diffstat (limited to 'src/compiler/GF/System/Catch.hs')
| -rw-r--r-- | src/compiler/GF/System/Catch.hs | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/src/compiler/GF/System/Catch.hs b/src/compiler/GF/System/Catch.hs index f69934af5..11fae1a7b 100644 --- a/src/compiler/GF/System/Catch.hs +++ b/src/compiler/GF/System/Catch.hs @@ -1,13 +1,7 @@ --- | Isolate backwards incompatible library changes to 'catch' and 'try' -{-# LANGUAGE CPP #-} +-- | Backwards compatible 'catch' and 'try' module GF.System.Catch where import qualified System.IO.Error as S -- ** Backwards compatible try and catch -#if MIN_VERSION_base(4,4,0) catch = S.catchIOError try = S.tryIOError -#else -catch = S.catch -try = S.try -#endif |