projects
/
ghc-hetmet.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
3da22bd9d0a42bc7ba27a321db7844b79143b1ff
[ghc-hetmet.git]
/
ghc
/
compiler
/
tests
/
deriving
/
drv003.hs
1
--!!! This is the example given in TcDeriv
2
--
3
data T a b
4
= C1 (Foo a) (Bar b)
5
| C2 Int (T b a)
6
| C3 (T a a)
7
deriving Eq
8
9
data Foo a = MkFoo Double a deriving ()
10
instance (Eq a) => Eq (Foo a)
11
12
data Bar a = MkBar Int Int deriving ()
13
instance (Ping b) => Eq (Bar b)
14
15
class Ping a