X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Ftypecheck%2FTcRnTypes.lhs;h=c1ab87d84b6b8849fc4a7fbed0a168a317144525;hb=80ef1f06253f1a20a63816c295e180e47cd9a347;hp=feaf9f949200cfc9799bb5cfb764e5354bf70632;hpb=aafdba3bce91afb003f5f50e001e141744837bae;p=ghc-hetmet.git

diff --git a/compiler/typecheck/TcRnTypes.lhs b/compiler/typecheck/TcRnTypes.lhs
index feaf9f9..c1ab87d 100644
--- a/compiler/typecheck/TcRnTypes.lhs
+++ b/compiler/typecheck/TcRnTypes.lhs
@@ -318,8 +318,8 @@ data TcLclEnv		-- Changes as we move inside an expression
 	tcl_ctxt :: ErrCtxt,		-- Error context
 	tcl_errs :: TcRef Messages,	-- Place to accumulate errors
 
-	tcl_th_ctxt    :: ThStage,	-- Template Haskell context
-	tcl_arrow_ctxt :: ArrowCtxt,	-- Arrow-notation context
+	tcl_th_ctxt    :: ThStage,	      -- Template Haskell context
+	tcl_arrow_ctxt :: ArrowCtxt,	      -- Arrow-notation context
 
 	tcl_rdr :: LocalRdrEnv,		-- Local name envt
 		-- Maintained during renaming, of course, but also during