[commit: testsuite] master: Add a test for AutoDeriveTypeable (7767fd5)

[José Pedro Magalhães]

Repository : ssh://darcs.haskell.org//srv/darcs/testsuite

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/7767fd5d8ba0fceeeac47cc9a38f32ada579c92c

>---------------------------------------------------------------

commit 7767fd5d8ba0fceeeac47cc9a38f32ada579c92c
Author: Jose Pedro Magalhaes <jpm at cs.ox.ac.uk>
Date:   Fri Mar 8 10:41:17 2013 +0000

    Add a test for AutoDeriveTypeable

>---------------------------------------------------------------

 .../deriving/should_compile/AutoDeriveTypeable.hs  |   16 ++++++++++++++++
 tests/deriving/should_compile/all.T                |    4 +++-
 2 files changed, 19 insertions(+), 1 deletions(-)

diff --git a/tests/deriving/should_compile/AutoDeriveTypeable.hs b/tests/deriving/should_compile/AutoDeriveTypeable.hs
new file mode 100644
index 0000000..677356d
--- /dev/null
+++ b/tests/deriving/should_compile/AutoDeriveTypeable.hs
@@ -0,0 +1,16 @@
+{-# LANGUAGE AutoDeriveTypeable #-}
+{-# LANGUAGE StandaloneDeriving #-}
+
+module AutoDeriveTypeable where
+
+import Data.Typeable
+
+
+data A = A
+
+data B = B deriving Typeable
+
+data C = C
+deriving instance Typeable C
+
+test = [typeRep [A], typeRep [B], typeRep [C]]
diff --git a/tests/deriving/should_compile/all.T b/tests/deriving/should_compile/all.T
index fbb93cf..07df602 100644
--- a/tests/deriving/should_compile/all.T
+++ b/tests/deriving/should_compile/all.T
@@ -37,4 +37,6 @@ test('T1133',
      run_command,
      ['$MAKE --no-print-directory -s T1133'])
 test('T7704', normal, compile, [''])
-test('T7710', normal, compile, [''])
\ No newline at end of file
+test('T7710', normal, compile, [''])
+
+test('AutoDeriveTypeable', normal, compile, [''])
\ No newline at end of file