git.iko.soy/ormolu
on d82d607 help sign in
ormolu/data/examples/declaration/instance/contexts.hs
33 lines 399 B history raw
1instance Eq a=>Eq [a] where (==) _ _ = False
3instance (
4 Ord a,
5 Ord b
6 ) => Ord (a,b) where
7 compare _ _ = GT
9instance (Show a, Show b) =>
10 Show (
11 a,
12 b
13 ) where
14 showsPrec _ _ = showString ""
16instance (
17 Read a, -- Foo
18 Read b
19 , Read (
20 c, -- Bar
21 d
22 )
23 )
24 =>
25 Read (
26 a, -- Baz
27 b
28 ,(
29 c, -- Quux
30 d
31 )
32 ) where
33 readsPrec = undefined