From 88fd33e7a87643660d4da16f8caf21be802bf1c1 Mon Sep 17 00:00:00 2001 From: "simonpj@microsoft.com" Date: Thu, 21 Aug 2008 07:49:24 +0000 Subject: [PATCH] Fix Haddock comments in TcGenDeriv --- compiler/typecheck/TcGenDeriv.lhs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/compiler/typecheck/TcGenDeriv.lhs b/compiler/typecheck/TcGenDeriv.lhs index 2def224..817e813 100644 --- a/compiler/typecheck/TcGenDeriv.lhs +++ b/compiler/typecheck/TcGenDeriv.lhs @@ -1297,10 +1297,10 @@ genAuxBind loc (MkDataCon dc) -- $cT1 etc fixity | is_infix = infix_RDR | otherwise = prefix_RDR -mk_data_type_name :: TyCon -> RdrName -- $tT +mk_data_type_name :: TyCon -> RdrName -- "$tT" mk_data_type_name tycon = mkAuxBinderName (tyConName tycon) mkDataTOcc -mk_constr_name :: DataCon -> RdrName -- $cC +mk_constr_name :: DataCon -> RdrName -- "$cC" mk_constr_name con = mkAuxBinderName (dataConName con) mkDataCOcc \end{code} -- 1.7.10.4