summaryrefslogtreecommitdiff
path: root/testsuite/tests
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests')
-rw-r--r--testsuite/tests/printer/Makefile5
-rw-r--r--testsuite/tests/printer/Test20256.hs5
-rw-r--r--testsuite/tests/printer/all.T1
3 files changed, 11 insertions, 0 deletions
diff --git a/testsuite/tests/printer/Makefile b/testsuite/tests/printer/Makefile
index 2c4195eeb1..e80655d83f 100644
--- a/testsuite/tests/printer/Makefile
+++ b/testsuite/tests/printer/Makefile
@@ -754,3 +754,8 @@ Test20297:
Test20846:
$(CHECK_PPR) $(LIBDIR) Test20846.hs
$(CHECK_EXACT) $(LIBDIR) Test20846.hs
+
+.PHONY: Test20256
+Test20256:
+ $(CHECK_PPR) $(LIBDIR) Test20256.hs
+ $(CHECK_EXACT) $(LIBDIR) Test20256.hs
diff --git a/testsuite/tests/printer/Test20256.hs b/testsuite/tests/printer/Test20256.hs
new file mode 100644
index 0000000000..4ffa9a76f0
--- /dev/null
+++ b/testsuite/tests/printer/Test20256.hs
@@ -0,0 +1,5 @@
+module Test20256 where
+
+foo = do
+ ; a <- doAsync
+ ; b
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'])