on 116a5a8 help sign in
ormolu/data/examples/declaration/class/default-implementations.hs
32 lines 481 B history raw
1-- | Foo
2class Foo a where
3 foo :: a -> a
4 foo a = a
6-- | Bar
7class Bar a where
8 bar ::
9 a
10 -> Int
11 bar = const 0
13-- | Baz
14class Baz a where
15 foobar :: a -> a
16 foobar a =
17 barbaz (bazbar a)
18 -- | Bar baz
19 barbaz ::
20 a -> a
21 -- | Baz bar
22 bazbar ::
23 a ->
24 a
25 -- First comment
26 barbaz a
27 = bazbar -- Middle comment
28 a
29 -- Last comment
30 bazbar a
31 = barbaz
32 a