applicative-fail 0.0.2 → 0.0.3
raw patch · 2 files changed
+4/−3 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
applicative-fail.cabal view
@@ -1,5 +1,5 @@ name: applicative-fail-version: 0.0.2+version: 0.0.3 synopsis: Applicative functor which collects all your fails description: Applicative functor to perform parse-like actions and
src/Control/Applicative/Fail.hs view
@@ -85,8 +85,9 @@ fsucc a = Success a failEither :: Fail e a -> Either e a-failEither (Success a) = Right a-failEither (Fail e _) = Left e+failEither (Success a) = Right a+failEither (Fail _ (Just a)) = Right a+failEither (Fail e Nothing) = Left e getFail :: Fail e a -> Maybe e getFail (Fail e _) = Just e