Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
jberryman
GHC
Commits
839d23a4
Commit
839d23a4
authored
Mar 08, 2005
by
simonpj
Browse files
[project @ 2005-03-08 09:45:45 by simonpj]
Better printing of types; merge please
parent
ceefdee5
Changes
1
Hide whitespace changes
Inline
Side-by-side
ghc/compiler/iface/IfaceType.lhs
View file @
839d23a4
...
...
@@ -307,10 +307,13 @@ instance Outputable IfaceTyCon where
-------------------
pprIfaceContext :: IfaceContext -> SDoc
-- Prints "(C a, D b) =>", including the arrow
pprIfaceContext [] = empty
pprIfaceContext theta = parens (sep (punctuate comma (map ppr theta)))
<+> ptext SLIT("=>")
pprIfaceContext [] = empty
pprIfaceContext theta = ppr_preds theta <+> ptext SLIT("=>")
ppr_preds [pred] = ppr pred -- No parens
ppr_preds preds = parens (sep (punctuate comma (map ppr preds)))
-------------------
pabrackets p = ptext SLIT("[:") <> p <> ptext SLIT(":]")
\end{code}
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment