[commit: ghc] master: testsuite: Add test for #10249 (6889400)

git at git.haskell.org git at git.haskell.org
Thu Dec 8 23:45:24 UTC 2016


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

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/6889400bd5ce6b481844fe5cfa7c9256ff5cd52f/ghc

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

commit 6889400bd5ce6b481844fe5cfa7c9256ff5cd52f
Author: Ben Gamari <bgamari.foss at gmail.com>
Date:   Thu Dec 8 16:32:55 2016 -0500

    testsuite: Add test for #10249
    
    Test Plan: Validate
    
    Reviewers: austin
    
    Subscribers: thomie
    
    Differential Revision: https://phabricator.haskell.org/D2794
    
    GHC Trac Issues: #10249


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

6889400bd5ce6b481844fe5cfa7c9256ff5cd52f
 testsuite/tests/ghci/scripts/T10249.script | 1 +
 testsuite/tests/ghci/scripts/T10249.stderr | 8 ++++++++
 testsuite/tests/ghci/scripts/all.T         | 1 +
 3 files changed, 10 insertions(+)

diff --git a/testsuite/tests/ghci/scripts/T10249.script b/testsuite/tests/ghci/scripts/T10249.script
new file mode 100644
index 0000000..c9cdc63
--- /dev/null
+++ b/testsuite/tests/ghci/scripts/T10249.script
@@ -0,0 +1 @@
+_
\ No newline at end of file
diff --git a/testsuite/tests/ghci/scripts/T10249.stderr b/testsuite/tests/ghci/scripts/T10249.stderr
new file mode 100644
index 0000000..ade9950
--- /dev/null
+++ b/testsuite/tests/ghci/scripts/T10249.stderr
@@ -0,0 +1,8 @@
+
+<interactive>:1:1: error:
+    • Found hole: _ :: t
+      Where: ‘t’ is a rigid type variable bound by
+               the inferred type of it :: t at <interactive>:1:1
+    • In the expression: _
+      In an equation for ‘it’: it = _
+    • Relevant bindings include it :: t (bound at <interactive>:1:1)
diff --git a/testsuite/tests/ghci/scripts/all.T b/testsuite/tests/ghci/scripts/all.T
index 53cb1e3..b89d1c4 100755
--- a/testsuite/tests/ghci/scripts/all.T
+++ b/testsuite/tests/ghci/scripts/all.T
@@ -268,3 +268,4 @@ test('T12523', normal, ghci_script, ['T12523.script'])
 test('T12024', normal, ghci_script, ['T12024.script'])
 test('T12447', expect_broken(12447), ghci_script, ['T12447.script'])
 test('T12550', expect_broken(12550), ghci_script, ['T12550.script'])
+test('T10249', normal, ghci_script, ['T10249.script'])



More information about the ghc-commits mailing list