git.iko.soy/ormolu
on 625f239 help sign in
ormolu/data/examples/declaration/value/function/operators-out.hs
45 lines 492 B history raw
1foo = bar
2 ++ case foo of
3 a -> a
5main =
6 bar
7 $ baz -- bar
8 -- baz
10bar
11 $ {- foo
12 -}
13 bar
15f =
16 Foo <$> bar
17 <*> baz
19update =
20 do
21 foobar
22 `catch` \case
23 a -> a
25foo =
26 do
27 1
28 + 2
30main =
31 do stuff
32 `finally` do
33 recover
35lenses =
36 Just $ M.fromList
37 $ "type"
38 .= ("user.connection" :: Text)
39 # "connection"
40 .= uc
41 # "user"
42 .= case name of
43 Just n -> Just $ object ["name" .= n]
44 Nothing -> Nothing
45 # []