[commit: ghc] wip/devel2-ci: testsuite: Mark T14740 and tcfail159 as broken in debugged compiler (da0062c)
git at git.haskell.org
git at git.haskell.org
Sun Dec 30 18:35:44 UTC 2018
Repository : ssh://git@git.haskell.org/ghc
On branch : wip/devel2-ci
Link : http://ghc.haskell.org/trac/ghc/changeset/da0062cae1b2814ab59b3e2acaca1c3fc1bda3e1/ghc
>---------------------------------------------------------------
commit da0062cae1b2814ab59b3e2acaca1c3fc1bda3e1
Author: Ben Gamari <ben at smart-cactus.org>
Date: Sun Dec 30 13:32:50 2018 -0500
testsuite: Mark T14740 and tcfail159 as broken in debugged compiler
As noted in #16113, these trigger an assertion in isUnliftedRuntimeRep.
>---------------------------------------------------------------
da0062cae1b2814ab59b3e2acaca1c3fc1bda3e1
testsuite/tests/parser/should_fail/all.T | 2 +-
testsuite/tests/typecheck/should_fail/all.T | 2 +-
2 files changed, 2 insertions(+), 2 deletions(-)
diff --git a/testsuite/tests/parser/should_fail/all.T b/testsuite/tests/parser/should_fail/all.T
index f1f5122..ce67d20 100644
--- a/testsuite/tests/parser/should_fail/all.T
+++ b/testsuite/tests/parser/should_fail/all.T
@@ -114,7 +114,7 @@ test('T12610', normal, compile_fail, [''])
test('T13450', normal, compile_fail, [''])
test('T13450TH', normal, compile_fail, [''])
test('T14588', normal, compile_fail, [''])
-test('T14740', normal, compile_fail, [''])
+test('T14740', when(compiler_debugged(), expect_broken(16113)), compile_fail, [''])
test('T15209', normal, compile_fail, [''])
test('NoNumericUnderscores0', normal, compile_fail, [''])
diff --git a/testsuite/tests/typecheck/should_fail/all.T b/testsuite/tests/typecheck/should_fail/all.T
index f0afa0d..27e971f 100644
--- a/testsuite/tests/typecheck/should_fail/all.T
+++ b/testsuite/tests/typecheck/should_fail/all.T
@@ -143,7 +143,7 @@ test('tcfail156', normal, compile_fail, [''])
test('tcfail157', normal, compile_fail, [''])
# Skip tcfail158 until Trac ticket #15899 fixes the broken test
test('tcfail158', skip, compile_fail, [''])
-test('tcfail159', normal, compile_fail, [''])
+test('tcfail159', when(debugged_compiler(), expect_broken(16113)), compile_fail, [''])
test('tcfail160', normal, compile_fail, [''])
test('tcfail161', normal, compile_fail, [''])
test('tcfail162', normal, compile_fail, [''])
More information about the ghc-commits
mailing list