yjtools 0.9.12 → 0.9.13

raw patch · 2 files changed

+7/−2 lines, 2 files

Files

Data/Bool/Tools.hs +6/−1
yjtools.cabal +1/−1

Data/Bool/Tools.hs view

@@ -1,6 +1,7 @@ module Data.Bool.Tools (   (&&&),-  (|||)+  (|||),+  whether ) where  (&&&), (|||) :: Monad m => m Bool -> m Bool -> m Bool@@ -10,3 +11,7 @@ p1 ||| p2 = do b1 <- p1                b2 <- p2 	       return $ b1 || b2++whether :: a -> a -> Bool -> a+whether x _ True = x+whether _ y False = y

yjtools.cabal view

@@ -1,5 +1,5 @@ Name:		yjtools-Version:	0.9.12+Version:	0.9.13 Cabal-Version:	>= 1.2 Build-Type:	Simple License:	LGPL