[project @ 1996-01-08 20:28:12 by partain]
[ghc.git] / ghc / compiler / tests / typecheck / should_succeed / tc077.hs
1 --!!! make sure context of EQ is minimised in interface file.
2 --
3 module M where
4
5 data NUM = ONE | TWO
6 class (Num a) => ORD a
7
8 class (ORD a, Text a) => EQ a where
9 (===) :: a -> a -> Bool