[project @ 1998-01-26 13:17:38 by simonm]

[ghc-hetmet.git] / ghc / tests / deriving / should_compile / drv010.hs

diff --git a/ghc/tests/deriving/should_compile/drv010.hs b/ghc/tests/deriving/should_compile/drv010.hs
index e681450..621a2ec 100644 (file)
--- a/ghc/tests/deriving/should_compile/drv010.hs
+++ b/ghc/tests/deriving/should_compile/drv010.hs
@@ -1,4 +1,4 @@
 --!!! deriving Enum on d. type with nullary constructors
 module ShouldSucceed where
 
-data AD = A | B | C | D deriving (Enum)
+data D = D1 deriving(Eq,Ord)