testsuite: Add test for #10249
authorBen Gamari <bgamari.foss@gmail.com>
Thu, 8 Dec 2016 21:32:55 +0000 (16:32 -0500)
committerBen Gamari <ben@smart-cactus.org>
Thu, 8 Dec 2016 23:44:55 +0000 (18:44 -0500)
Test Plan: Validate

Reviewers: austin

Subscribers: thomie

Differential Revision: https://phabricator.haskell.org/D2794

GHC Trac Issues: #10249

testsuite/tests/ghci/scripts/T10249.script [new file with mode: 0644]
testsuite/tests/ghci/scripts/T10249.stderr [new file with mode: 0644]
testsuite/tests/ghci/scripts/all.T

diff --git a/testsuite/tests/ghci/scripts/T10249.script b/testsuite/tests/ghci/scripts/T10249.script
new file mode 100644 (file)
index 0000000..c9cdc63
--- /dev/null
@@ -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 (file)
index 0000000..ade9950
--- /dev/null
@@ -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)
index 53cb1e3..b89d1c4 100755 (executable)
@@ -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'])