X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=compiler%2FbasicTypes%2FOccName.lhs;h=a363c1c5a08715b249927d65b62e5b7e5b1da66d;hb=2cd930397966d27a221998c8ac060151e2027e90;hp=1868c3f91895ebce986ef70ad0e2a15eb247e3e0;hpb=703a9c113f4770958d659411011456742cd695a6;p=ghc-hetmet.git diff --git a/compiler/basicTypes/OccName.lhs b/compiler/basicTypes/OccName.lhs index 1868c3f..a363c1c 100644 --- a/compiler/basicTypes/OccName.lhs +++ b/compiler/basicTypes/OccName.lhs @@ -597,8 +597,8 @@ mkLocalOcc uniq occ \end{code} \begin{code} --- | Derive a name for the representation type constructor of a @data@/@newtype@ --- instance. +-- | Derive a name for the representation type constructor of a +-- @data@\/@newtype@ instance. mkInstTyTcOcc :: Int -- ^ DFun Index -> OccName -- ^ Family name, e.g. @Map@ -> OccName -- ^ Nice unique version, e.g. @:R23Map@