Commit 13607ad8 authored by Simon Marlow's avatar Simon Marlow

Tweak to pretty printing for UsageFile

parent 62a34c72
......@@ -709,7 +709,8 @@ pprUsage usage@UsageHomeModule{}
vcat [ ppr n <+> ppr v | (n,v) <- usg_entities usage ]
pprUsage usage@UsageFile{}
= hsep [ptext (sLit "addDependentFile"), ppr (usg_file_path usage)]
= hsep [ptext (sLit "addDependentFile"),
doubleQuotes (text (usg_file_path usage))]
pprUsageImport :: Outputable a => Usage -> (Usage -> a) -> SDoc
pprUsageImport usage usg_mod'
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