From f5209837011fe1ff46e94d7d807c16f2fd6cb0e2 Mon Sep 17 00:00:00 2001 From: Ian Lynagh Date: Tue, 21 Oct 2008 18:33:17 +0000 Subject: [PATCH] Fix doc syntax --- compiler/typecheck/TcTyClsDecls.lhs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/compiler/typecheck/TcTyClsDecls.lhs b/compiler/typecheck/TcTyClsDecls.lhs index f7b5f83..76e7426 100644 --- a/compiler/typecheck/TcTyClsDecls.lhs +++ b/compiler/typecheck/TcTyClsDecls.lhs @@ -896,7 +896,7 @@ tcResultType (tmpl_tvs, res_tmpl) dc_tvs (ResTyGADT res_ty) = do { res_ty' <- tcHsKindedType res_ty ; let Just subst = tcMatchTy (mkVarSet tmpl_tvs) res_tmpl res_ty' - -- *Lazily* figure out the univ_tvs etc + -- /Lazily/ figure out the univ_tvs etc -- Each univ_tv is either a dc_tv or a tmpl_tv (univ_tvs, eq_spec) = foldr choose ([], []) tidy_tmpl_tvs choose tmpl (univs, eqs) -- 1.7.10.4