Skip to content

Commit 7b7560b

Browse files
committed
Add consecutive comments tests for case expressions
1 parent f1e1fe4 commit 7b7560b

File tree

1 file changed

+63
-14
lines changed

1 file changed

+63
-14
lines changed

tests/test-files/good/Elm-0.19/AllSyntax/Expressions.elm

Lines changed: 63 additions & 14 deletions
Original file line numberDiff line numberDiff line change
@@ -349,20 +349,25 @@ caseStatement =
349349
_ {- E -} -> {- F -} 2
350350

351351
c =
352+
case {- A -} {- B -} Just 1 {- C -} {- D -} of
353+
Just x {- E -} {- F -} -> {- G -} {- H -} x
354+
_ {- I -} {- J -} -> {- K -} {- L -} 2
355+
356+
d =
352357
case Just 1 of
353358
Just x ->
354359
x
355360

356361
_ ->
357362
2
358363

359-
d =
360-
case {- M -} Just 1 {- N -} of
361-
{- O -}
364+
e =
365+
case {- A -} Just 1 {- B -} of
366+
{- C -}
362367
Just x
363-
{- P -}
368+
{- D -}
364369
->
365-
{- Q -}
370+
{- E -}
366371
x
367372

368373
{- R -}
@@ -372,24 +377,68 @@ caseStatement =
372377
{- T -}
373378
2
374379

375-
e =
380+
f =
376381
case
377-
--M
382+
--A
378383
Just 1
379-
--N
384+
--B
380385
of
381-
--O
386+
--C
387+
Just x
388+
--D
389+
->
390+
--E
391+
x
392+
393+
--F
394+
_
395+
--G
396+
->
397+
--H
398+
2
399+
400+
g =
401+
case {- A -} {- B -} Just 1 {- C -} {- D -} of
402+
{- E -} {- F -}
382403
Just x
383-
--P
404+
{- G -} {- H -}
384405
->
385-
--Q
406+
{- I -} {- J -}
386407
x
387408

388-
--R
409+
{- K -} {- L -}
389410
_
390-
--S
411+
{- M -} {- N -}
412+
->
413+
{- O -} {- P -}
414+
2
415+
416+
h =
417+
case
418+
--A
419+
--B
420+
Just 1
421+
--C
422+
--D
423+
of
424+
--E
425+
--F
426+
Just x
427+
--G
428+
--H
429+
->
430+
--I
431+
--J
432+
x
433+
434+
--K
435+
--L
436+
_
437+
--M
438+
--N
391439
->
392-
--T
440+
--O
441+
--P
393442
2
394443
in
395444
{}

0 commit comments

Comments
 (0)