diff options
| author | Alan Zimmerman <alan.zimm@gmail.com> | 2022-03-10 23:23:16 +0000 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2022-05-11 08:23:33 -0400 |
| commit | 4a4c77ed8f16f157dd647593de58840b024bbd2d (patch) | |
| tree | ca61146523ef92158c599d9693bd9583c08e6146 /testsuite/tests/printer/all.T | |
| parent | 8500206ea7084f3914efd3fe7f4336f2893eb4ac (diff) | |
| download | haskell-4a4c77ed8f16f157dd647593de58840b024bbd2d.tar.gz | |
EPA: do statement with leading semicolon has wrong anchor
The code
do; a <- doAsync; b
Generated an incorrect Anchor for the statement list that starts after
the first semicolon.
This commit fixes it.
Closes #20256
Diffstat (limited to 'testsuite/tests/printer/all.T')
| -rw-r--r-- | testsuite/tests/printer/all.T | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/testsuite/tests/printer/all.T b/testsuite/tests/printer/all.T index 4562acc8e5..12b3960a7a 100644 --- a/testsuite/tests/printer/all.T +++ b/testsuite/tests/printer/all.T @@ -174,6 +174,7 @@ test('PprCommentPlacement2', [ignore_stderr, req_ppr_deps], makefile_test, ['Ppr test('Test20243', [ignore_stderr, req_ppr_deps], makefile_test, ['Test20243']) test('Test20247', [ignore_stderr, req_ppr_deps], makefile_test, ['Test20247']) +test('Test20256', [ignore_stderr, req_ppr_deps], makefile_test, ['Test20256']) test('Test20258', [ignore_stderr, req_ppr_deps], makefile_test, ['Test20258']) test('Test20297', [ignore_stderr, req_ppr_deps], makefile_test, ['Test20297']) test('Test20846', [ignore_stderr, req_ppr_deps], makefile_test, ['Test20846']) |