File: case-multi-line.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 (23 lines) | stat: -rw-r--r-- 324 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
 
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
    () -> ()