ranges 0.2.1 → 0.2.2

raw patch · 2 files changed

+3/−3 lines, 2 files

Files

• Data/Ranges.hs +2/−2
• ranges.cabal +1/−1

@@ -38,8 +38,8 @@ 	| otherwise = error "lower bound must be smaller than upper bound"  -- | Construct a 'Ranges' from a list of lower and upper bounds.-ranges :: (Ord a) => [(a,a)] -> Ranges a-ranges = Ranges . foldr (flip mergeRanges) [] . map (uncurry range)+ranges :: (Ord a) => [Range a] -> Ranges a+ranges = Ranges . foldr (flip mergeRanges) []  -- | Tests if a given range contains a particular value. inRange :: (Ord a) => a -> Range a -> Bool

@@ -1,5 +1,5 @@ Name: ranges-Version: 0.2.1+Version: 0.2.2 Description: Ranges and some functions allowing things like fast membership 	lookup on ranges with holes in them and so on. Synopsis: Ranges and various functions on them.