diff options
Diffstat (limited to 'compiler')
| -rw-r--r-- | compiler/types/Class.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/types/Class.hs b/compiler/types/Class.hs index 09c8da9091..d62f90f09d 100644 --- a/compiler/types/Class.hs +++ b/compiler/types/Class.hs @@ -308,7 +308,7 @@ pprFundeps [] = empty pprFundeps fds = hsep (vbar : punctuate comma (map pprFunDep fds)) pprFunDep :: Outputable a => FunDep a -> SDoc -pprFunDep (us, vs) = hsep [interppSP us, text "->", interppSP vs] +pprFunDep (us, vs) = hsep [interppSP us, arrow, interppSP vs] instance Data.Data Class where -- don't traverse? |