X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Ftypecheck%2FTcSMonad.lhs;h=edeb5cbe136db257debb6ef1f1a0ed8bf768fd86;hp=0920a8be8b406fb987c6d27488a82f2db61cd56f;hb=62f76a3cbced691b60f511fb83547a5d62653252;hpb=ef6d82a4e1d4ba4884c322be85cff291e017f0e6

diff --git a/compiler/typecheck/TcSMonad.lhs b/compiler/typecheck/TcSMonad.lhs
index 0920a8b..edeb5cb 100644
--- a/compiler/typecheck/TcSMonad.lhs
+++ b/compiler/typecheck/TcSMonad.lhs
@@ -460,6 +460,7 @@ data SimplContext
   | SimplRuleLhs	-- Inferring type of a RULE lhs
   | SimplInteractive	-- Inferring type at GHCi prompt
   | SimplCheck		-- Checking a type signature or RULE rhs
+  deriving Eq
 
 instance Outputable SimplContext where
   ppr SimplInfer       = ptext (sLit "SimplInfer")