diff --git a/CHANGELOG.markdown b/CHANGELOG.markdown index 43117c5f2c1f919fe6602d8f216b6157b746bb6e..0f865a95e5c28a6ccadfb8fd914c832d98b8e8d2 100644 --- a/CHANGELOG.markdown +++ b/CHANGELOG.markdown @@ -1,3 +1,7 @@ +next [????.??.??] +----------------- +* Allow building with `base-4.13`/`template-haskell-2.15`. + 0.10.1 [2019.03.26] ------------------- * Define a `MonadFail` instance for `CatchT`. diff --git a/exceptions.cabal b/exceptions.cabal index 3f4e2221936c9eee31c5a3eed962892e6948e8eb..9ff1bc16aaabcffdd6b245302a4ff495def409b3 100644 --- a/exceptions.cabal +++ b/exceptions.cabal @@ -45,7 +45,7 @@ library build-depends: base >= 4.3 && < 5, stm >= 2.2 && < 3, - template-haskell >= 2.2 && < 2.15, + template-haskell >= 2.2 && < 2.16, transformers >= 0.2 && < 0.6, transformers-compat >= 0.3 && < 0.7, mtl >= 2.0 && < 2.3 diff --git a/src/Control/Monad/Catch/Pure.hs b/src/Control/Monad/Catch/Pure.hs index 0d96957aa782ad72d32ece73c3dcf229d5c2ff4b..4e433b5e52f409413eae77a0b11a5afb8c7cf94d 100644 --- a/src/Control/Monad/Catch/Pure.hs +++ b/src/Control/Monad/Catch/Pure.hs @@ -110,7 +110,7 @@ instance Monad m => Monad (CatchT m) where CatchT m >>= k = CatchT $ m >>= \ea -> case ea of Left e -> return (Left e) Right a -> runCatchT (k a) -#if !MIN_VERSION_base(4,13,0) +#if !(MIN_VERSION_base(4,13,0)) fail = Fail.fail #endif