Added test for ticket #902, deriving for GADTs which declare H98 types fails.

testsuite/tests/ghc-regress/deriving/should_compile/all.T

@@ -9,4 +9,4 @@ test('drv008', normal, compile, [''])
 test('drv009', normal, compile, [''])
 test('drv010', normal, compile, [''])
 test('drv011', normal, compile, [''])
-
+test('drv012', normal, compile, [''])

testsuite/tests/ghc-regress/deriving/should_compile/drv012.hs

+{-# OPTIONS_GHC -fglasgow-exts #-}
+
+-- !!! deriving for GADTs which declare Haskell98 data types.
+-- bug reported as http://hackage.haskell.org/trac/ghc/ticket/902
+module ShouldSucceed where
+
+data Maybe1 a where {
+      Nothing1 :: Maybe1 a ;
+      Just1    :: a -> Maybe1 a
+    } deriving (Eq,Ord)