Add Show and Read instances for Data.Ord.Down
authorKrzysztof Gogolewski <krz.gogolewski@gmail.com>
Mon, 14 Oct 2013 19:47:40 +0000 (21:47 +0200)
committerKrzysztof Gogolewski <krz.gogolewski@gmail.com>
Mon, 14 Oct 2013 19:47:40 +0000 (21:47 +0200)
libraries mailing list thread "Proposal: Show and Read for Data.Ord.Down", Sep 2013, http://www.haskell.org/pipermail/libraries/2013-September/020867.html

libraries/base/Data/Ord.hs

index f7d32f6..a574b83 100644 (file)
@@ -23,6 +23,8 @@ module Data.Ord (
  ) where
 
 import GHC.Base
+import GHC.Show
+import GHC.Read
 
 -- | 
 -- > comparing p x y = compare (p x) (p y)
@@ -42,7 +44,8 @@ comparing p x y = compare (p x) (p y)
 -- as in: @then sortWith by 'Down' x@
 --
 -- /Since: 4.6.0.0/
-newtype Down a = Down a deriving (Eq)
+-- Show and Read instances /Since: 4.7.0.0/
+newtype Down a = Down a deriving (Eq, Show, Read)
 
 instance Ord a => Ord (Down a) where
     compare (Down x) (Down y) = y `compare` x