X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=compiler%2FbasicTypes%2FBasicTypes.lhs;fp=compiler%2FbasicTypes%2FBasicTypes.lhs;h=85df1c2b62b8fab97cd8eb152e8cf7d410be7e2a;hb=294dab1b04599cd7628642b0fe02e088ac3da4ba;hp=022a8fc3b37a04d8c15de7af6a74ebe28872967b;hpb=e3d0f33551f53f8f78739faf168a6bb94f676c0d;p=ghc-hetmet.git diff --git a/compiler/basicTypes/BasicTypes.lhs b/compiler/basicTypes/BasicTypes.lhs index 022a8fc..85df1c2 100644 --- a/compiler/basicTypes/BasicTypes.lhs +++ b/compiler/basicTypes/BasicTypes.lhs @@ -640,7 +640,7 @@ data Activation = NeverActive | AlwaysActive | ActiveBefore CompilerPhase -- Active only *before* this phase | ActiveAfter CompilerPhase -- Active in this phase and later - deriving( Eq, Data, Typeable ) -- Eq used in comparing rules in HsDecls + deriving( Eq, Data, Typeable ) -- Eq used in comparing rules in HsDecls data RuleMatchInfo = ConLike -- See Note [CONLIKE pragma] | FunLike