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

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