diff options
Diffstat (limited to 'compiler/GHC/Hs/Binds.hs')
| -rw-r--r-- | compiler/GHC/Hs/Binds.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Hs/Binds.hs b/compiler/GHC/Hs/Binds.hs index 5316046880..91b5dd7724 100644 --- a/compiler/GHC/Hs/Binds.hs +++ b/compiler/GHC/Hs/Binds.hs @@ -604,7 +604,7 @@ ppr_sig (CompleteMatchSig _ src cs mty) ((hsep (punctuate comma (map ppr (unLoc cs)))) <+> opt_sig) where - opt_sig = maybe empty ((\t -> dcolon <+> ppr t) . unLoc) mty + opt_sig = maybe empty (\t -> dcolon <+> ppr t) mty instance OutputableBndrId p => Outputable (FixitySig (GhcPass p)) where |