[commit: ghc] master: Comments only (7ef90e3)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/7ef90e3a4d1e043ebb574b05c8da0d4148ed297b/ghc

>---------------------------------------------------------------

commit 7ef90e3a4d1e043ebb574b05c8da0d4148ed297b
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Thu Mar 13 12:14:11 2014 +0000

    Comments only


>---------------------------------------------------------------

7ef90e3a4d1e043ebb574b05c8da0d4148ed297b
 compiler/typecheck/TcTyClsDecls.lhs |    4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/compiler/typecheck/TcTyClsDecls.lhs b/compiler/typecheck/TcTyClsDecls.lhs
index 0c5ceea..05dc029 100644
--- a/compiler/typecheck/TcTyClsDecls.lhs
+++ b/compiler/typecheck/TcTyClsDecls.lhs
@@ -1019,7 +1019,9 @@ tcFamTyPats :: Name -- of the family ToCon
             -> Kind -- of the family TyCon
             -> HsWithBndrs [LHsType Name] -- patterns
             -> (TcKind -> TcM ())         -- kind-checker for RHS
-            -> ([TKVar] -> [TcType] -> Kind -> TcM a)
+            -> ([TKVar]              -- Kind and type variables
+                -> [TcType]          -- Kind and type arguments
+                -> Kind -> TcM a)
             -> TcM a
 tcFamTyPats fam_tc_name kind pats kind_checker thing_inside
   = do { (fam_arg_kinds, typats, res_kind)