[commit: testsuite] master: Test Trac #8535 (404851a)

[git at git.haskell.org]

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

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

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

commit 404851a06d6e9dc8075ef31b60fc8b20fda23c22
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Mon Nov 18 10:50:08 2013 +0000

    Test Trac #8535


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

404851a06d6e9dc8075ef31b60fc8b20fda23c22
 tests/ghci/scripts/T8535.script                     |    2 ++
 tests/ghci/scripts/{ghci020.stdout => T8535.stdout} |    1 +
 tests/ghci/scripts/all.T                            |    1 +
 3 files changed, 4 insertions(+)

diff --git a/tests/ghci/scripts/T8535.script b/tests/ghci/scripts/T8535.script
new file mode 100644
index 0000000..bd41a8a
--- /dev/null
+++ b/tests/ghci/scripts/T8535.script
@@ -0,0 +1,2 @@
+import Data.Monoid
+:info (->)
diff --git a/tests/ghci/scripts/ghci020.stdout b/tests/ghci/scripts/T8535.stdout
similarity index 68%
copy from tests/ghci/scripts/ghci020.stdout
copy to tests/ghci/scripts/T8535.stdout
index 6d621d3..dbc88e1 100644
--- a/tests/ghci/scripts/ghci020.stdout
+++ b/tests/ghci/scripts/T8535.stdout
@@ -1,3 +1,4 @@
 data (->) a b 	-- Defined in ‛GHC.Prim’
 instance Monad ((->) r) -- Defined in ‛GHC.Base’
 instance Functor ((->) r) -- Defined in ‛GHC.Base’
+instance Monoid b => Monoid (a -> b) -- Defined in ‛Data.Monoid’
diff --git a/tests/ghci/scripts/all.T b/tests/ghci/scripts/all.T
index 9c6ad0c..966ea90 100755
--- a/tests/ghci/scripts/all.T
+++ b/tests/ghci/scripts/all.T
@@ -159,3 +159,4 @@ test('T8357', normal, ghci_script, ['T8357.script'])
 test('T8383', normal, ghci_script, ['T8383.script'])
 test('T8469', normal, ghci_script, ['T8469.script'])
 test('T8485', normal, ghci_script, ['T8485.script'])
+test('T8535', normal, ghci_script, ['T8535.script'])