transformers-except 0.1.1 → 0.1.2
raw patch · 4 files changed
+23/−15 lines, 4 filessetup-changed
Files
- Setup.hs +0/−2
- src/Control/Monad/Trans/Except/Exit.hs +1/−7
- src/Control/Monad/Trans/Except/Extra.hs +11/−1
- transformers-except.cabal +11/−5
− Setup.hs
@@ -1,2 +0,0 @@-import Distribution.Simple-main = defaultMain
src/Control/Monad/Trans/Except/Exit.hs view
@@ -3,17 +3,11 @@ , orDieWithCode ) where -import Control.Applicative (pure)-import Control.Monad ((>>=), (>>))--import Data.Either (either)-import Data.Function ((.))-import Data.Int (Int) import Data.Text (Text) import qualified Data.Text as T import System.Exit (ExitCode(..), exitWith)-import System.IO (IO, stderr, hPutStrLn)+import System.IO (stderr, hPutStrLn) import Control.Monad.Trans.Except (ExceptT, runExceptT)
src/Control/Monad/Trans/Except/Extra.hs view
@@ -42,6 +42,8 @@ , bracketExceptT , bracketExceptionT++ , hushM ) where import Control.Exception (Exception, IOException, SomeException)@@ -53,7 +55,7 @@ import Control.Monad.Trans.Class (lift) import Control.Monad.Trans.Except -import Data.Maybe (Maybe, maybe)+import Data.Maybe (Maybe(..), maybe) import Data.Either (Either(..), either) import Data.Foldable (Foldable, foldr) import Data.Function (($), (.), const, id, flip)@@ -282,3 +284,11 @@ z <- f a' return $ either id (const b) z {-# INLINE bracketF #-}++-- | Convert an Either to a Maybe and execute the supplied handler+-- in the Left case.+hushM :: Monad m => Either e a -> (e -> m ()) -> m (Maybe a)+hushM r f = case r of+ Right a -> return (Just a)+ Left e -> f e >> return Nothing+{-# INLINE hushM #-}
transformers-except.cabal view
@@ -1,15 +1,21 @@+cabal-version: 3.0 name: transformers-except-version: 0.1.1-license: BSD3+version: 0.1.2+license: BSD-3-Clause license-file: LICENSE author: Tim McGilchrist <timmcgil@gmail.com> maintainer: Tim McGilchrist <timmcgil@gmail.com> copyright: (c) 2017 Tim McGilchrist synopsis: An Except monad transformer with category: System-cabal-version: >= 1.8 build-type: Simple-tested-with: GHC == 8.6.2, GHC == 8.4.4, GHC == 8.2.2, GHC == 8.0.2, GHC == 7.10.3+tested-with: GHC == 8.10.5+ , GHC == 8.8.4+ , GHC == 8.6.5+ , GHC == 8.4.4+ , GHC == 8.2.2+ , GHC == 8.0.2+ description: Extra pieces for working with Except homepage: http://github.com/tmcgilchrist/transformers-either/ bug-reports: http://github.com/tmcgilchrist/transformers-either/issues@@ -26,7 +32,7 @@ ghc-options: -Wall-+ default-language: Haskell98 hs-source-dirs: src