[project @ 1996-01-08 20:28:12 by partain]
[ghc-hetmet.git] / ghc / compiler / tests / simplCore / simpl002.hs
1 --!!! class/instance mumble that failed Lint at one time
2 --
3 class Foo a where
4    op :: Int -> a -> Bool
5
6 data Wibble a b c = MkWibble a b c
7
8 instance (Foo a, Foo b, Foo c) => Foo (Wibble a b c) where
9     op x y = error "xxx"