[commit: packages/containers] ghc-head: Remove unnecessary Ord constraint in Set.Base.map. (54fc9fe)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/containers

On branch  : ghc-head
Link       : http://git.haskell.org/?p=packages/containers.git;a=commit;h=54fc9fe187f5bf7930f5f3e5167a569d42b5d7dd

>---------------------------------------------------------------

commit 54fc9fe187f5bf7930f5f3e5167a569d42b5d7dd
Author: Milan Straka <fox at ucw.cz>
Date:   Mon Nov 26 09:47:50 2012 +0100

    Remove unnecessary Ord constraint in Set.Base.map.


>---------------------------------------------------------------

54fc9fe187f5bf7930f5f3e5167a569d42b5d7dd
 Data/Set/Base.hs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Data/Set/Base.hs b/Data/Set/Base.hs
index 8d42247..a7a73e6 100644
--- a/Data/Set/Base.hs
+++ b/Data/Set/Base.hs
@@ -659,7 +659,7 @@ partition p0 t0 = toPair $ go p0 t0
 -- It's worth noting that the size of the result may be smaller if,
 -- for some @(x,y)@, @x \/= y && f x == f y@
 
-map :: (Ord a, Ord b) => (a->b) -> Set a -> Set b
+map :: Ord b => (a->b) -> Set a -> Set b
 map f = fromList . List.map f . toList
 #if __GLASGOW_HASKELL__ >= 700
 {-# INLINABLE map #-}