Commit 5c3a415b authored by Ian Lynagh's avatar Ian Lynagh
Browse files

Pass DynFlags down to showSDocUnqual

parent b1a75d2f
......@@ -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
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment