[commit: ghc] wip/GenericsMetaData2: Also export FixityI. (91ff17e)
git at git.haskell.org
git at git.haskell.org
Tue Nov 11 17:44:58 UTC 2014
Repository : ssh://git@git.haskell.org/ghc
On branch : wip/GenericsMetaData2
Link : http://ghc.haskell.org/trac/ghc/changeset/91ff17e83ebc8ceb31aec0113d9bfdc19b468d2f/ghc
>---------------------------------------------------------------
commit 91ff17e83ebc8ceb31aec0113d9bfdc19b468d2f
Author: Jose Pedro Magalhaes <jpm at cs.ox.ac.uk>
Date: Tue Nov 11 16:48:46 2014 +0000
Also export FixityI.
>---------------------------------------------------------------
91ff17e83ebc8ceb31aec0113d9bfdc19b468d2f
libraries/base/GHC/Generics.hs | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/libraries/base/GHC/Generics.hs b/libraries/base/GHC/Generics.hs
index d22e5ee..1e4728d 100644
--- a/libraries/base/GHC/Generics.hs
+++ b/libraries/base/GHC/Generics.hs
@@ -560,7 +560,7 @@ module GHC.Generics (
-- * Meta-information
, Datatype(..), Constructor(..), Selector(..), NoSelector
- , Fixity(..), Associativity(..), prec
+ , Fixity(..), FixityI(..), Associativity(..), prec
, Meta(..)
-- * Generic type classes
@@ -686,6 +686,8 @@ instance (KnownSymbol n, SingI f, SingI r) => Constructor (MetaCons n f r) where
-- | declaration directly corresponds to an application of 'Infix'.
data Fixity = Prefix | Infix Associativity Int
deriving (Eq, Show, Ord, Read, Generic)
+
+-- | This variant of 'Fixity' appears at the type level.
data FixityI = PrefixI | InfixI Associativity Nat
-- | Get the precedence of a fixity value.
More information about the ghc-commits
mailing list