[commit: ghc] wip/marge_bot_batch_merge_job: testsuite: Mark T14740 and tcfail159 as broken in debugged compiler (71d5ab0)

[git at git.haskell.org]

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

On branch  : wip/marge_bot_batch_merge_job
Link       : http://ghc.haskell.org/trac/ghc/changeset/71d5ab07fe413fb0d9b04b6b55abc6055c1f0a2e/ghc

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

commit 71d5ab07fe413fb0d9b04b6b55abc6055c1f0a2e
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.


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

71d5ab07fe413fb0d9b04b6b55abc6055c1f0a2e
 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 62ff1df..ad23574 100644
--- a/testsuite/tests/parser/should_fail/all.T
+++ b/testsuite/tests/parser/should_fail/all.T
@@ -115,7 +115,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 a87c846..52f02cf 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(compiler_debugged(), expect_broken(16113)), compile_fail, [''])
 test('tcfail160', normal, compile_fail, [''])
 test('tcfail161', normal, compile_fail, [''])
 test('tcfail162', normal, compile_fail, [''])