set-extra 1.3.1 → 1.3.2

raw patch · 2 files changed

+7/−6 lines, 2 files

Files

• Data/Set/Extra.hs +5/−4
• set-extra.cabal +2/−2

@@ -26,6 +26,7 @@  import qualified Control.Monad as List (mapM, mapM_, filterM, foldM) import Control.Monad.State ()+import qualified Data.Foldable as Foldable (all, any, and, or) import Data.Map as Map (Map, insertWith, empty) import Data.Set as Set import Data.Set.ExtraG@@ -60,7 +61,7 @@ concatMapM f s = mapM f s >>= return . flatten  any :: Ord a => (a -> Bool) -> Set a -> Bool-any f s = not . Set.null . Set.filter id . map f $ s+any = Foldable.any  {- anyM :: Monad m => (a -> m (Maybe Bool)) -> Set a -> m (Maybe Bool)@@ -71,13 +72,13 @@ -}  all :: Ord a => (a -> Bool) -> Set a -> Bool-all f s = not . Set.null . Set.filter not . map f $ s+all = Foldable.all  or :: Set Bool -> Bool-or = any id+or = Foldable.or  and :: Set Bool -> Bool-and = all id+and = Foldable.and  -- |Create a singleton set containing a singleton set of a. ss :: Ord a => a -> Set (Set a)

@@ -1,5 +1,5 @@ Name:           set-extra-Version:        1.3.1+Version:        1.3.2 License:        BSD3 License-File:	COPYING Author:         David Fox@@ -7,7 +7,7 @@ Description:    Functions that could be added to Data.Set. Synopsis:       Functions that could be added to Data.Set. Maintainer:     David Fox <dsf@seereason.com>-Homepage:       http://src.seereason.com/set-extra+Homepage:       https://github.com/ddssff/set-extra ghc-options:	-O2 -Wall Exposed-modules: Data.Set.Extra, Data.Set.ExtraG Build-Depends: base < 5, containers, mtl, syb