[commit: ghc] master, master: Test case: :info Coercible in GHCi (0142237)

[git at git.haskell.org]

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

On branches: master,master
Link       : http://ghc.haskell.org/trac/ghc/changeset/014223745186fc0ca6afb9938227df9ce7d28b38/ghc

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

commit 014223745186fc0ca6afb9938227df9ce7d28b38
Author: Joachim Breitner <mail at joachim-breitner.de>
Date:   Sun Mar 16 17:12:58 2014 +0100

    Test case: :info Coercible in GHCi
    
    This prepares against future breakage, especially if #8894 is tackled.


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

014223745186fc0ca6afb9938227df9ce7d28b38
 testsuite/tests/ghci/scripts/all.T          |    1 +
 testsuite/tests/ghci/scripts/ghci059.script |    6 ++++++
 2 files changed, 7 insertions(+)

diff --git a/testsuite/tests/ghci/scripts/all.T b/testsuite/tests/ghci/scripts/all.T
index 06c0716..6812c9d 100755
--- a/testsuite/tests/ghci/scripts/all.T
+++ b/testsuite/tests/ghci/scripts/all.T
@@ -167,4 +167,5 @@ test('T8649', normal, ghci_script, ['T8649.script'])
 test('T8674', normal, ghci_script, ['T8674.script'])
 test('T8696', normal, ghci_script, ['T8696.script'])
 test('T8776', normal, ghci_script, ['T8776.script'])
+test('ghci059', normal, ghci_script, ['ghci059.script'])
 
diff --git a/testsuite/tests/ghci/scripts/ghci059.script b/testsuite/tests/ghci/scripts/ghci059.script
new file mode 100644
index 0000000..a78be19
--- /dev/null
+++ b/testsuite/tests/ghci/scripts/ghci059.script
@@ -0,0 +1,6 @@
+# At one point, :info Coercible would not report it as a constraint, but as a
+# data type. So this test case ensures that this is broken later.
+
+:m + Data.Coerce
+:info Coercible
+:info coerce