diff options
Diffstat (limited to 'compiler/utils')
| -rw-r--r-- | compiler/utils/Outputable.lhs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/utils/Outputable.lhs b/compiler/utils/Outputable.lhs index 6ca88cf467..364786e212 100644 --- a/compiler/utils/Outputable.lhs +++ b/compiler/utils/Outputable.lhs @@ -380,9 +380,9 @@ showSDocForUser :: DynFlags -> PrintUnqualified -> SDoc -> String showSDocForUser _ unqual doc = show (runSDoc doc (initSDocContext (mkUserStyle unqual AllTheWay))) -showSDocUnqual :: SDoc -> String +showSDocUnqual :: DynFlags -> SDoc -> String -- Only used in the gruesome isOperator -showSDocUnqual d +showSDocUnqual _ d = show (runSDoc d (initSDocContext (mkUserStyle neverQualify AllTheWay))) showsPrecSDoc :: Int -> SDoc -> ShowS |