diff options
author | Ben Gamari <bgamari.foss@gmail.com> | 2018-06-19 17:11:05 -0400 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2018-06-19 20:15:46 -0400 |
commit | 21fa62feace8524cbf4559ccfcc96b22cb07879f (patch) | |
tree | 71db68691ebbcf861827388632ca140b8bfd21f2 /libraries/base/GHC/Generics.hs | |
parent | 436c0e9b5e201b9121e4b48a7351dd42800eb7f3 (diff) | |
download | haskell-21fa62feace8524cbf4559ccfcc96b22cb07879f.tar.gz |
base: Add missing instances for Data.Ord.Down
Specifically:
* MonadFix
* MonadZip
* Data
* Foldable
* Traversable
* Eq1
* Ord1
* Read1
* Show1
* Generic
* Generic1
Fixes #15098.
Reviewers: RyanGlScott, hvr
Reviewed By: RyanGlScott
Subscribers: sjakobi, rwbarton, thomie, ekmett, carter
GHC Trac Issues: #15098
Differential Revision: https://phabricator.haskell.org/D4870
Diffstat (limited to 'libraries/base/GHC/Generics.hs')
-rw-r--r-- | libraries/base/GHC/Generics.hs | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/libraries/base/GHC/Generics.hs b/libraries/base/GHC/Generics.hs index 05a96b98eb..34425f2b5f 100644 --- a/libraries/base/GHC/Generics.hs +++ b/libraries/base/GHC/Generics.hs @@ -731,6 +731,7 @@ module GHC.Generics ( -- We use some base types import Data.Either ( Either (..) ) import Data.Maybe ( Maybe(..), fromMaybe ) +import Data.Ord ( Down(..) ) import GHC.Integer ( Integer, integerToInt ) import GHC.Prim ( Addr#, Char#, Double#, Float#, Int#, Word# ) import GHC.Ptr ( Ptr ) @@ -1435,6 +1436,9 @@ deriving instance Generic ((,,,,,) a b c d e f) -- | @since 4.6.0.0 deriving instance Generic ((,,,,,,) a b c d e f g) +-- | @since 4.12.0.0 +deriving instance Generic (Down a) + -- | @since 4.6.0.0 deriving instance Generic1 [] @@ -1469,6 +1473,9 @@ deriving instance Generic1 ((,,,,,) a b c d e) -- | @since 4.6.0.0 deriving instance Generic1 ((,,,,,,) a b c d e f) +-- | @since 4.12.0.0 +deriving instance Generic1 Down + -------------------------------------------------------------------------------- -- Copied from the singletons package -------------------------------------------------------------------------------- |