[project @ 1997-07-31 02:33:07 by sof]
[ghc-hetmet.git] / ghc / compiler / tests / deriving / drv003.hs
diff --git a/ghc/compiler/tests/deriving/drv003.hs b/ghc/compiler/tests/deriving/drv003.hs
deleted file mode 100644 (file)
index f6d6780..0000000
+++ /dev/null
@@ -1,17 +0,0 @@
---!!! This is the example given in TcDeriv
---
-module ShouldSucceed where
-
-data T a b
-  = C1 (Foo a) (Bar b) 
-  | C2 Int (T b a) 
-  | C3 (T a a)
-  deriving Eq
-
-data Foo a = MkFoo Double a deriving ()
-instance (Eq a) => Eq (Foo a)
-
-data Bar a = MkBar Int Int deriving ()
-instance (Ping b) => Eq (Bar b)
-
-class Ping a