tools-yj 0.1.0.24 → 0.1.0.25
raw patch · 2 files changed
+5/−1 lines, 2 filesPVP: minor bump suggested
API additions: PVP suggests at least a minor version bump
API changes (from Hackage documentation)
+ Control.Monad.ToolsYj: doWhile_ :: Monad m => m Bool -> m ()
Files
- src/Control/Monad/ToolsYj.hs +4/−0
- tools-yj.cabal +1/−1
src/Control/Monad/ToolsYj.hs view
@@ -2,6 +2,7 @@ module Control.Monad.ToolsYj where +import Control.Monad.Fix import Data.Bool whenDef :: Applicative m => a -> Bool -> m a -> m a@@ -12,3 +13,6 @@ whenMaybeDef :: Applicative m => b -> Maybe a -> (a -> m b) -> m b whenMaybeDef = flip . maybe . pure++doWhile_ :: Monad m => m Bool -> m ()+doWhile_ a = fix $ (a >>=) . bool (pure ())
tools-yj.cabal view
@@ -5,7 +5,7 @@ -- see: https://github.com/sol/hpack name: tools-yj-version: 0.1.0.24+version: 0.1.0.25 synopsis: Tribial tools description: Please see the README on GitHub at <https://github.com/YoshikuniJujo/tools-yj#readme> category: Tools