summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKevin Buhr <buhr@asaurus.net>2019-05-06 23:32:42 -0500
committerMarge Bot <ben+marge-bot@smart-cactus.org>2019-05-08 15:59:46 -0400
commit9d9af0eea599b82f5567885a36e9059f8484aa39 (patch)
treeecb1d9818ee3277573db4b03edc3f594d6629725
parent93f34bbd3319544d8eb3a5e2593bccb9b12e3459 (diff)
downloadhaskell-9d9af0eea599b82f5567885a36e9059f8484aa39.tar.gz
Add regression test for old issue #507
-rw-r--r--testsuite/tests/ghci/should_run/T507.script1
-rw-r--r--testsuite/tests/ghci/should_run/T507.stdout1
-rw-r--r--testsuite/tests/ghci/should_run/all.T1
3 files changed, 3 insertions, 0 deletions
diff --git a/testsuite/tests/ghci/should_run/T507.script b/testsuite/tests/ghci/should_run/T507.script
new file mode 100644
index 0000000000..d5ff170b2c
--- /dev/null
+++ b/testsuite/tests/ghci/should_run/T507.script
@@ -0,0 +1 @@
+:t zip [($)]
diff --git a/testsuite/tests/ghci/should_run/T507.stdout b/testsuite/tests/ghci/should_run/T507.stdout
new file mode 100644
index 0000000000..10e477f1a8
--- /dev/null
+++ b/testsuite/tests/ghci/should_run/T507.stdout
@@ -0,0 +1 @@
+zip [($)] :: [b1] -> [((a -> b2) -> a -> b2, b1)]
diff --git a/testsuite/tests/ghci/should_run/all.T b/testsuite/tests/ghci/should_run/all.T
index 84693d77b5..934360b0d5 100644
--- a/testsuite/tests/ghci/should_run/all.T
+++ b/testsuite/tests/ghci/should_run/all.T
@@ -61,3 +61,4 @@ test('T15633b',
ghci_script, ['T15633b.script'])
test('T16096', just_ghci, ghci_script, ['T16096.script'])
+test('T507', just_ghci, ghci_script, ['T507.script'])