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