File tree Expand file tree Collapse file tree 3 files changed +11
-3
lines changed Expand file tree Collapse file tree 3 files changed +11
-3
lines changed Original file line number Diff line number Diff line change @@ -173,7 +173,7 @@ import Control.DeepSeq ( NFData, rnf )
173
173
import Control.Monad ( MonadPlus (.. ), liftM , ap )
174
174
import Control.Monad.ST ( ST )
175
175
import Control.Monad.Primitive
176
-
176
+ import qualified Control.Monad.Fail as Fail
177
177
178
178
import Control.Monad.Zip
179
179
@@ -340,7 +340,12 @@ instance Monad Vector where
340
340
341
341
{-# INLINE (>>=) #-}
342
342
(>>=) = flip concatMap
343
+ #if !(MIN_VERSION_base(4,13,0))
344
+ {-# INLINE fail #-}
345
+ fail _= empty
346
+ #endif
343
347
348
+ instance Fail. MonadFail Vector where
344
349
{-# INLINE fail #-}
345
350
fail _ = empty
346
351
Original file line number Diff line number Diff line change
1
+ Changes in version 0.12.0.3
2
+ * Add support for ghc >=8.8 monad fail
1
3
Changes in version 0.12.0.2
2
4
* Fixes issue #220, compact heap operations crashing on boxed vectors constructed
3
5
using traverse.
Original file line number Diff line number Diff line change 1
1
Name : vector
2
- Version : 0.12.0.2
2
+ Version : 0.12.0.3
3
3
-- don't forget to update the changelog file!
4
4
License : BSD3
5
5
License-File : LICENSE
@@ -149,7 +149,8 @@ Library
149
149
, ghc-prim >= 0.2 && < 0.6
150
150
, deepseq >= 1.1 && < 1.5
151
151
if !impl(ghc > 8.0 )
152
- Build-Depends : semigroups >= 0.18 && < 0.19
152
+ Build-Depends : fail == 4.9. *
153
+ , semigroups >= 0.18 && < 0.19
153
154
154
155
Ghc-Options : -O2 -Wall
155
156
You can’t perform that action at this time.
0 commit comments