git.iko.soy/ormolu
on master help sign in
ormolu/region-tests/expected-result-17-18.hs
17 lines 217 B history raw
1{-# LANGUAGE LambdaCase #-}
3module Foo (
4 foo, bar, baz) where
6foo :: Int
7foo = 5
9bar :: Int -> Int
10bar = \case
11 0 -> foo
12 x -> x - foo
14baz :: Int -> Int
15baz = gege
16 where
17 gege = 1 + 2