File: case-multi-line-out.hs

package info (click to toggle)
haskell-ormolu 0.1.2.0-1
  • links: PTS
  • area: main
  • in suites: bullseye
  • size: 3,392 kB
  • sloc: haskell: 11,134; makefile: 7
file content (27 lines) | stat: -rw-r--r-- 323 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
 
foo :: Int -> Int
foo x = case x of
  5 -> 10
  _ -> 12

bar :: Int -> Int
bar x =
  case x of
    5 ->
      if x > 5
        then 10
        else 12
    _ -> 12

baz :: Int -> Int
baz x = case x of
  5 -> 10
  _ -> 12

quux :: Int -> Int
quux x = case x of
  x -> x

funnyComment =
  -- comment
  case () of
    () -> ()