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

setParSpacing for operator-expression ending in par

ghc92
Lennart Spitzner 2023-04-19 13:16:44 +00:00
parent d29303d4cd
commit 156b5cf407
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
source/library/Language/Haskell/Brittany/Internal/ToBriDoc/OpTree.hs
View File

@ -220,7 +220,7 @@ layoutOpTree allowSinglelinePar = \case
-> ToBriDocM BriDocNumbered -> ToBriDocM BriDocNumbered
coreAlternative hasParen locO locC fixity docL sharedOps sharedOpsFlat lastWrap coreAlternative hasParen locO locC fixity docL sharedOps sharedOpsFlat lastWrap
= do = do
let wrapParenIfSl x inner = if x then wrapParenSl inner else inner let wrapParenIfSl x inner = if x then wrapParenSl inner else docSetParSpacing inner
wrapParenSl inner = docAlt wrapParenSl inner = docAlt
[ docSeq [ docSeq
[ docLit $ Text.pack "(" [ docLit $ Text.pack "("