summaryrefslogtreecommitdiff
path: root/libraries/base/Data/Ord.hs
diff options
context:
space:
mode:
Diffstat (limited to 'libraries/base/Data/Ord.hs')
-rw-r--r--libraries/base/Data/Ord.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/libraries/base/Data/Ord.hs b/libraries/base/Data/Ord.hs
index 809f148070..767d7b379f 100644
--- a/libraries/base/Data/Ord.hs
+++ b/libraries/base/Data/Ord.hs
@@ -48,5 +48,6 @@ comparing p x y = compare (p x) (p y)
-- @since 4.6.0.0
newtype Down a = Down a deriving (Eq, Show, Read)
+-- | @since 4.6.0.0
instance Ord a => Ord (Down a) where
compare (Down x) (Down y) = y `compare` x