Improve error message in deriving( Functor )
[ghc.git] / testsuite / tests / typecheck / should_fail / tcfail023.hs
1 module ShouldFail where
2
3 -- !!! Duplicate instances
4
5 data B = C
6
7 class A a where
8 op :: a -> Bool
9
10 instance A B where
11 op C = True
12
13 instance A B where
14 op C = True
15
16