projects
/
ghc-hetmet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(from parent 1:
aceacfc
)
Fix Haddock comments in TcGenDeriv
author
simonpj@microsoft.com
<unknown>
Thu, 21 Aug 2008 07:49:24 +0000
(07:49 +0000)
committer
simonpj@microsoft.com
<unknown>
Thu, 21 Aug 2008 07:49:24 +0000
(07:49 +0000)
compiler/typecheck/TcGenDeriv.lhs
patch
|
blob
|
history
diff --git
a/compiler/typecheck/TcGenDeriv.lhs
b/compiler/typecheck/TcGenDeriv.lhs
index
2def224
..
817e813
100644
(file)
--- 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}