The Backpack patch.
[ghc.git] / testsuite / tests / backpack / should_fail / bkpfail04.bkp
1 unit p where
2     signature A where
3         data A = A { foo :: Int }
4
5 unit q where
6     signature A where
7         data A = A { bar :: Bool }
8
9 unit r where
10     dependency p[A=<A>]
11     dependency q[A=<A>]
12     module M where
13         import A
14         x = foo
15         y = bar