diff options
author | Kevin Buhr <buhr@asaurus.net> | 2019-05-06 23:32:42 -0500 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2019-05-08 15:59:46 -0400 |
commit | 9d9af0eea599b82f5567885a36e9059f8484aa39 (patch) | |
tree | ecb1d9818ee3277573db4b03edc3f594d6629725 | |
parent | 93f34bbd3319544d8eb3a5e2593bccb9b12e3459 (diff) | |
download | haskell-9d9af0eea599b82f5567885a36e9059f8484aa39.tar.gz |
Add regression test for old issue #507
-rw-r--r-- | testsuite/tests/ghci/should_run/T507.script | 1 | ||||
-rw-r--r-- | testsuite/tests/ghci/should_run/T507.stdout | 1 | ||||
-rw-r--r-- | testsuite/tests/ghci/should_run/all.T | 1 |
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']) |