diff --git a/testsuite/tests/lib/base/T19569.hs b/testsuite/tests/lib/base/T19569b.hs
similarity index 100%
rename from testsuite/tests/lib/base/T19569.hs
rename to testsuite/tests/lib/base/T19569b.hs
diff --git a/testsuite/tests/lib/base/all.T b/testsuite/tests/lib/base/all.T
index 8d88097a174f57e937683a7195620c31d5357cc6..18c3f5814f93d9a3193edeac4bddb4ef6ede7099 100644
--- a/testsuite/tests/lib/base/all.T
+++ b/testsuite/tests/lib/base/all.T
@@ -6,4 +6,4 @@ test('T17310', normal, compile, [''])
 test('T19691', normal, compile, [''])
 test('executablePath', extra_run_opts(config.os), compile_and_run, [''])
 test('T17472', normal, compile_and_run, [''])
-test('T19569', normal, compile_and_run, [''])
+test('T19569b', normal, compile_and_run, [''])
diff --git a/testsuite/tests/simplCore/should_run/T19569.hs b/testsuite/tests/simplCore/should_run/T19569a.hs
similarity index 100%
rename from testsuite/tests/simplCore/should_run/T19569.hs
rename to testsuite/tests/simplCore/should_run/T19569a.hs
diff --git a/testsuite/tests/simplCore/should_run/T19569.stdout b/testsuite/tests/simplCore/should_run/T19569a.stdout
similarity index 100%
rename from testsuite/tests/simplCore/should_run/T19569.stdout
rename to testsuite/tests/simplCore/should_run/T19569a.stdout
diff --git a/testsuite/tests/simplCore/should_run/all.T b/testsuite/tests/simplCore/should_run/all.T
index 34e7e2e386d28762ca87c2ea42afae35185851aa..52a1af40a8e7488d3cc9e72c64028e85ab8aad1e 100644
--- a/testsuite/tests/simplCore/should_run/all.T
+++ b/testsuite/tests/simplCore/should_run/all.T
@@ -97,7 +97,7 @@ test('NumConstantFolding16', normal, compile_and_run, [''])
 test('NumConstantFolding32', normal, compile_and_run, [''])
 test('NumConstantFolding', normal, compile_and_run, [''])
 test('T19413', normal, compile_and_run, [''])
-test('T19569', [only_ways(['optasm']),extra_run_opts('True 1000000')], compile_and_run, ['-O2'])
+test('T19569a', [only_ways(['optasm']),extra_run_opts('True 1000000')], compile_and_run, ['-O2'])
 test('T20203', normal, compile, ['-O -dsuppress-all -dsuppress-uniques -dno-typeable-binds -ddump-simpl'])
 test('T19313', normal, compile_and_run, [''])
 test('UnliftedArgRule', normal, compile_and_run, [''])