summaryrefslogtreecommitdiff
path: root/testsuite/tests/deriving/should_compile/drv004.hs
blob: 324a7f81d449164580624dfeb668559f7face8f7 (plain)
1
2
3
4
5
6
7
8
9
-- !!! simple example of deriving Ord and Eq simultaneously
--
module ShouldSucceed where

data Foo a b c
  = C1 a Int
  | C2 b Double
  | C3 c String
  deriving (Eq, Ord)