[commit: testsuite] master: Test Trac #7969 (ab682ae)

[Simon Peyton Jones]

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

On branch  : master

https://github.com/ghc/testsuite/commit/ab682ae8fdf5a10d90d3fc62c0fc8dab59e549e7

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

commit ab682ae8fdf5a10d90d3fc62c0fc8dab59e549e7
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Mon Jun 17 23:03:08 2013 +0100

    Test Trac #7969

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

 tests/rename/should_compile/Makefile     |    5 +++++
 tests/rename/should_compile/T7969.hs     |    5 +++++
 tests/rename/should_compile/T7969.stdout |    1 +
 tests/rename/should_compile/T7969a.hs    |    3 +++
 tests/rename/should_compile/all.T        |    5 +++++
 5 files changed, 19 insertions(+), 0 deletions(-)

diff --git a/tests/rename/should_compile/Makefile b/tests/rename/should_compile/Makefile
index 4e5cd6c..69e899b 100644
--- a/tests/rename/should_compile/Makefile
+++ b/tests/rename/should_compile/Makefile
@@ -46,3 +46,8 @@ T7963:
 	'$(TEST_HC)' $(TEST_HC_OPTS) -c T7963a.hs
 	'$(TEST_HC)' $(TEST_HC_OPTS) -c T7963.hs -ddump-minimal-imports
 	cat T7963.imports
+
+T7969:
+	'$(TEST_HC)' $(TEST_HC_OPTS) -c T7969a.hs
+	'$(TEST_HC)' $(TEST_HC_OPTS) -c T7969.hs -ddump-minimal-imports
+	cat T7969.imports
diff --git a/tests/rename/should_compile/T7969.hs b/tests/rename/should_compile/T7969.hs
new file mode 100644
index 0000000..e9f6048
--- /dev/null
+++ b/tests/rename/should_compile/T7969.hs
@@ -0,0 +1,5 @@
+{-# LANGUAGE StandaloneDeriving #-}
+module T7969 where
+import T7969a 
+
+deriving instance Eq T
diff --git a/tests/rename/should_compile/T7969.stdout b/tests/rename/should_compile/T7969.stdout
new file mode 100644
index 0000000..b6f1ebc
--- /dev/null
+++ b/tests/rename/should_compile/T7969.stdout
@@ -0,0 +1 @@
+import T7969a ( T(..) )
diff --git a/tests/rename/should_compile/T7969a.hs b/tests/rename/should_compile/T7969a.hs
new file mode 100644
index 0000000..07dbcd1
--- /dev/null
+++ b/tests/rename/should_compile/T7969a.hs
@@ -0,0 +1,3 @@
+module T7969a where
+
+data T = MkT
diff --git a/tests/rename/should_compile/all.T b/tests/rename/should_compile/all.T
index 7d08ca5..3035e2c 100644
--- a/tests/rename/should_compile/all.T
+++ b/tests/rename/should_compile/all.T
@@ -209,3 +209,8 @@ test('T7963',
                    'T7963.imports'])],
      run_command,
      ['$MAKE -s --no-print-directory T7963'])
+test('T7969',
+     [extra_clean(['T7969a.hi', 'T7969a.o',
+                   'T7969.imports'])],
+     run_command,
+     ['$MAKE -s --no-print-directory T7969'])