[commit: testsuite] master: Test for #5589. (ef55fb6)

[Simon Peyton Jones]

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

On branch  : master

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

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

commit ef55fb6e2e0252f94b25c8e791813ec7d01c97e1
Author: Michal Terepeta <michal.terepeta at gmail.com>
Date:   Sun Oct 30 20:27:04 2011 +0100

    Test for #5589.

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

 tests/rename/should_fail/T5589.hs     |    6 ++++++
 tests/rename/should_fail/T5589.stderr |    5 +++++
 tests/rename/should_fail/all.T        |    1 +
 3 files changed, 12 insertions(+), 0 deletions(-)

diff --git a/tests/rename/should_fail/T5589.hs b/tests/rename/should_fail/T5589.hs
new file mode 100644
index 0000000..c7708e5
--- /dev/null
+++ b/tests/rename/should_fail/T5589.hs
@@ -0,0 +1,6 @@
+module T5589 where
+
+bbb, aaa :: Int
+aaa :: Int
+aaa = undefined
+bbb = undefined
diff --git a/tests/rename/should_fail/T5589.stderr b/tests/rename/should_fail/T5589.stderr
new file mode 100644
index 0000000..f5f3a01
--- /dev/null
+++ b/tests/rename/should_fail/T5589.stderr
@@ -0,0 +1,5 @@
+
+T5589.hs:4:1:
+    Duplicate type signature:
+      T5589.hs:4:1-10: aaa :: Int
+      T5589.hs:3:1-15: bbb, aaa :: Int
diff --git a/tests/rename/should_fail/all.T b/tests/rename/should_fail/all.T
index ef7f857..385f617 100644
--- a/tests/rename/should_fail/all.T
+++ b/tests/rename/should_fail/all.T
@@ -93,4 +93,5 @@ test('T5385',
      ['T5385','-v0'])
 test('T5513', normal, compile_fail, [''])
 test('T5533', normal, compile_fail, [''])
+test('T5589', normal, compile_fail, [''])
 test('Misplaced', normal, compile_fail, [''])