diff options
| author | Josef Svenningsson <josefs@fb.com> | 2020-03-05 10:27:03 -0800 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2020-03-23 14:05:33 -0400 |
| commit | 19f125578247dfe8036b5793cb3f6b684474f9c7 (patch) | |
| tree | 4de0a73fa49e16977a6766f6b86a78a9b3497648 /testsuite/tests/ado/all.T | |
| parent | abc02b4036c2d8efe50b720d8c8103c4f1b8899a (diff) | |
| download | haskell-19f125578247dfe8036b5793cb3f6b684474f9c7.tar.gz | |
Fix ApplicativeDo regression #17835
A previous fix for #15344 made sure that monadic 'fail' is used properly
when translating ApplicativeDo. However, it didn't properly account
for when a 'fail' will be inserted which resulted in some programs
failing with a type error.
Diffstat (limited to 'testsuite/tests/ado/all.T')
| -rw-r--r-- | testsuite/tests/ado/all.T | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/testsuite/tests/ado/all.T b/testsuite/tests/ado/all.T index b6f2480189..f564f365eb 100644 --- a/testsuite/tests/ado/all.T +++ b/testsuite/tests/ado/all.T @@ -17,3 +17,4 @@ test('T13875', normal, compile_and_run, ['']) test('T14163', normal, compile_and_run, ['']) test('T15344', normal, compile_and_run, ['']) test('T16628', normal, compile_fail, ['']) +test('T17835', normal, compile, ['']) |