Add a comment about one superfluous docSetParSpacing

pull/160/head
Lennart Spitzner 2018-07-06 22:57:33 +02:00
parent ab27825b7b
commit 4497fa927f
1 changed files with 7 additions and 4 deletions

View File

@ -177,10 +177,13 @@ layoutExpr lexpr@(L _ expr) = do
, -- func argline1 , -- func argline1
-- arglines -- arglines
-- e.g. -- e.g.
-- func if x -- func Abc
-- then 1 -- { member1 = True
-- else 2 -- , member2 = 13
docSetParSpacing -- }
docSetParSpacing -- this is most likely superfluous because
-- this is a sequence of a one-line and a par-space
-- anyways, so it is _always_ par-spaced.
$ docAddBaseY BrIndentRegular $ docAddBaseY BrIndentRegular
$ docSeq $ docSeq
[ appSep $ docForceSingleline expDoc1 [ appSep $ docForceSingleline expDoc1