hexagoxel
/
brittany
1
0
Fork 0
Code Issues 117 Pull Requests 5 Packages Projects Releases 5 Wiki Activity

Fix warning

pull/83/head
Lennart Spitzner 2017-12-19 17:52:33 +01:00
parent 162b6e6bfd
commit ce7ec0b467
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Language/Haskell/Brittany/Internal/Layouters/IE.hs
View File

@ -93,7 +93,7 @@ layoutLLIEs llies = docWrapNodeRest llies $ do
ieDs <- layoutAnnAndSepLLIEs llies ieDs <- layoutAnnAndSepLLIEs llies
case ieDs of case ieDs of
[] -> docLit $ Text.pack "()" [] -> docLit $ Text.pack "()"
ieDs@(ieDsH:ieDsT) -> (ieDsH:ieDsT) ->
docAlt docAlt
[ docSeq $ docLit (Text.pack "("):ieDs ++ [docParenR] [ docSeq $ docLit (Text.pack "("):ieDs ++ [docParenR]
, docLines $ , docLines $