Add an example for case expression with preceding comment (now fixed)

2024-11-26 17:55:57 +03:00 · 2019-07-07 00:13:59 +02:00 · 2019-07-07 00:13:59 +02:00 · 3be1adbfc7
commit 3be1adbfc7
parent d7d4592b8e
2 changed files with 9 additions and 0 deletions
--- a/data/examples/declaration/value/function/case-multi-line-out.hs
+++ b/data/examples/declaration/value/function/case-multi-line-out.hs
@ -30,3 +30,8 @@ withGuards x =
          bar
    x | x > 5 -> 10
    _ -> 20
+
+funnyComment =
+  -- comment
+  case () of
+    () -> ()
--- a/data/examples/declaration/value/function/case-multi-line.hs
+++ b/data/examples/declaration/value/function/case-multi-line.hs
@ -26,3 +26,7 @@ withGuards x =
        bar
    x | x > 5 -> 10
    _ -> 20
+
+funnyComment = -- comment
+  case () of
+    () -> ()