[project @ 1997-09-03 23:31:30 by sof]
[ghc-hetmet.git] / ghc / tests / typecheck / should_fail / tcfail036.hs
1 --!!! prelude class name in an instance-tycon position
2 --
3 module M where
4
5 data NUM = ONE | TWO
6 instance Num NUM
7   where ONE + ONE = TWO
8 instance Num NUM
9 instance Eq Num
10 --instance Text Num