X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Ftypecheck%2FTcHsType.lhs;h=fb9f0db50ca069aadca1447c9053cfc7a96ad470;hb=853e20a3eb86137cdb8accf69c6caa9db83a3d34;hp=81558201607b39a9bb5baffab2508d5b990cd97f;hpb=ca739e852566d7e0bfd594e6d7bf08da04f78d3c;p=ghc-hetmet.git

diff --git a/ghc/compiler/typecheck/TcHsType.lhs b/ghc/compiler/typecheck/TcHsType.lhs
index 8155820..fb9f0db 100644
--- a/ghc/compiler/typecheck/TcHsType.lhs
+++ b/ghc/compiler/typecheck/TcHsType.lhs
@@ -775,7 +775,7 @@ been instantiated.
 \begin{code}
 data TcSigInfo
   = TcSigInfo {
-	sig_id     :: TcId,		-- *Polymorphic* binder for this value...
+	sig_id     :: TcId,		--  *Polymorphic* binder for this value...
 
 	sig_scoped :: [Name],		-- Names for any scoped type variables
 					-- Invariant: correspond 1-1 with an initial