File: case-single-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 (6 lines) | stat: -rw-r--r-- 172 bytes parent folder | download | duplicates (6) 
1
2
3
4
5
6
 
foo :: Int -> Int
foo x = case x of x -> x

foo :: IO ()
foo = case [1] of [_] -> "singleton"; _ -> "not singleton"
foo = case [1] of { [] -> foo; _ -> bar } `finally` baz