[commit: testsuite] master: Test Trac #7164 (d6729f4)

[Simon Peyton Jones]

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

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/d6729f46da0aa0d767f8190cb315758976b9674d

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

commit d6729f46da0aa0d767f8190cb315758976b9674d
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Thu Aug 23 16:45:47 2012 +0100

    Test Trac #7164

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

 tests/rename/should_fail/T7164.hs     |    8 ++++++++
 tests/rename/should_fail/T7164.stderr |    5 +++++
 tests/rename/should_fail/all.T        |    1 +
 3 files changed, 14 insertions(+), 0 deletions(-)

diff --git a/tests/rename/should_fail/T7164.hs b/tests/rename/should_fail/T7164.hs
new file mode 100644
index 0000000..1a0415a
--- /dev/null
+++ b/tests/rename/should_fail/T7164.hs
@@ -0,0 +1,8 @@
+module T7164 where
+
+class Foo m where
+    herp :: (a -> a) -> m b -> m b
+    derp :: m a
+
+derp :: Int
+derp = 123
diff --git a/tests/rename/should_fail/T7164.stderr b/tests/rename/should_fail/T7164.stderr
new file mode 100644
index 0000000..a7c23e1
--- /dev/null
+++ b/tests/rename/should_fail/T7164.stderr
@@ -0,0 +1,5 @@
+
+T7164.hs:8:1:
+    Multiple declarations of `derp'
+    Declared at: T7164.hs:5:5
+                 T7164.hs:8:1
diff --git a/tests/rename/should_fail/all.T b/tests/rename/should_fail/all.T
index 168d657..fece0ac 100644
--- a/tests/rename/should_fail/all.T
+++ b/tests/rename/should_fail/all.T
@@ -104,3 +104,4 @@ test('T5892b', normal, compile_fail, [''])
 test('T5951', normal, compile_fail, [''])
 test('T6060', normal, compile_fail, [''])
 test('T6148', normal, compile_fail, [''])
+test('T7164', normal, compile_fail, [''])