[project @ 1998-01-26 14:39:19 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 621a2ec..e681450 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 D = D1 deriving(Eq,Ord)
+data AD = A | B | C | D deriving (Enum)