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
b1cc93ff
Commit
b1cc93ff
authored
Aug 14, 1998
by
sof
Browse files
[project @ 1998-08-14 13:05:06 by sof]
mirror compiler source defn of hang
parent
5c44bfbb
Changes
1
Hide whitespace changes
Inline
Side-by-side
ghc/lib/misc/Pretty.lhs
View file @
b1cc93ff
...
...
@@ -399,7 +399,7 @@ hcat = foldr (<>) empty
hsep = foldr (<+>) empty
vcat = foldr ($$) empty
hang d1 n d2 =
d1 $$ (
nest n d2
)
hang d1 n d2 =
sep [d1,
nest n d2
]
punctuate p [] = []
punctuate p (d:ds) = go d ds
...
...
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