[commit: ghc] master: Update test for #5129: (5a1ad23)

git at git.haskell.org git at git.haskell.org
Mon Mar 19 12:49:11 UTC 2018


Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/5a1ad231fc871f27f2811ae46285a79573d8dfae/ghc

>---------------------------------------------------------------

commit 5a1ad231fc871f27f2811ae46285a79573d8dfae
Author: Ömer Sinan Ağacan <omeragacan at gmail.com>
Date:   Mon Mar 19 15:46:44 2018 +0300

    Update test for #5129:
    
    Make sure it runs with --fast validate with correct optimisation
    settings (-O1 or above) so that it actually tests the bug.
    
    Because the bug is in the simplifier running it with -O0 doesn't
    test it.


>---------------------------------------------------------------

5a1ad231fc871f27f2811ae46285a79573d8dfae
 testsuite/tests/codeGen/should_run/all.T | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/testsuite/tests/codeGen/should_run/all.T b/testsuite/tests/codeGen/should_run/all.T
index 9403c4b..cf4904e 100644
--- a/testsuite/tests/codeGen/should_run/all.T
+++ b/testsuite/tests/codeGen/should_run/all.T
@@ -90,7 +90,13 @@ test('T3677', extra_run_opts('+RTS -K8k -RTS'), compile_and_run, [''])
 test('T4441', normal, compile_and_run, [''])
 test('T5149', omit_ways(['ghci']), multi_compile_and_run,
                  ['T5149', [('T5149_cmm.cmm', '')], ''])
-test('T5129', normal, compile_and_run, [''])
+
+test('T5129',
+     # The bug is in simplifier when run with -O1 and above, so only run it
+     # optimised, using any backend.
+     [ only_ways(['optasm']), expect_broken(5129) ],
+     compile_and_run, [''])
+
 test('T5626', exit_code(1), compile_and_run, [''])
 test('T5747', when(arch('i386'), extra_hc_opts('-msse2')), compile_and_run, ['-O2'])
 test('T5785', normal, compile_and_run, [''])



More information about the ghc-commits mailing list