[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