[project @ 1999-01-27 15:01:03 by simonpj]
[ghc-hetmet.git] / ghc / tests / deriving / should_fail / drvfail004.hs
1 -- !!! deriving Ord without deriving Eq
2 --
3 module ShouldFail where
4
5 data Foo a b
6   = C1 a Int
7   | C2 b Double
8   deriving Ord