[commit: testsuite] master: Add a regression test (see #8116) (cfec7e1)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/testsuite

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/cfec7e1759f16266dbb17b692640a19e9379bb92/testsuite

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

commit cfec7e1759f16266dbb17b692640a19e9379bb92
Author: Austin Seipp <aseipp at pobox.com>
Date:   Wed Aug 14 20:20:01 2013 -0500

    Add a regression test (see #8116)
    
    Signed-off-by: Austin Seipp <aseipp at pobox.com>


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

cfec7e1759f16266dbb17b692640a19e9379bb92
 tests/ghci/scripts/T8116.script |    2 ++
 tests/ghci/scripts/T8116.stdout |    1 +
 tests/ghci/scripts/all.T        |    2 +-
 3 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/tests/ghci/scripts/T8116.script b/tests/ghci/scripts/T8116.script
new file mode 100644
index 0000000..984faa8
--- /dev/null
+++ b/tests/ghci/scripts/T8116.script
@@ -0,0 +1,2 @@
+:m + Data.Complex
+((-2) :+ 0)**(1.5 :+ 0)
diff --git a/tests/ghci/scripts/T8116.stdout b/tests/ghci/scripts/T8116.stdout
new file mode 100644
index 0000000..fe9dff6
--- /dev/null
+++ b/tests/ghci/scripts/T8116.stdout
@@ -0,0 +1 @@
+(-5.195736337412959e-16) :+ (-2.82842712474619)
diff --git a/tests/ghci/scripts/all.T b/tests/ghci/scripts/all.T
index a6cbca9..fe4d0fb 100755
--- a/tests/ghci/scripts/all.T
+++ b/tests/ghci/scripts/all.T
@@ -151,4 +151,4 @@ test('T7872', normal, ghci_script, ['T7872.script'])
 test('T7873', normal, ghci_script, ['T7873.script'])
 test('T7939', normal, ghci_script, ['T7939.script'])
 test('T7894', normal, ghci_script, ['T7894.script'])
-
+test('T8116', normal, ghci_script, ['T8116.script'])