[commit: testsuite] master: T5246 and T7474 back working with -DDEBUG (81a49bc)

git at git.haskell.org git at git.haskell.org
Fri Nov 22 20:11:15 UTC 2013


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

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/81a49bcc84f27245d11c5b151d41b2026a5a6602/testsuite

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

commit 81a49bcc84f27245d11c5b151d41b2026a5a6602
Author: Joachim Breitner <mail at joachim-breitner.de>
Date:   Fri Nov 22 20:10:05 2013 +0000

    T5246 and T7474 back working with -DDEBUG
    
    thanks to SPJ'S fixes for #8553 in 985663ea47487a9e567814ba000e81d65358bf02


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

81a49bcc84f27245d11c5b151d41b2026a5a6602
 tests/indexed-types/should_compile/all.T |    2 +-
 tests/typecheck/should_fail/all.T        |    2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/tests/indexed-types/should_compile/all.T b/tests/indexed-types/should_compile/all.T
index 2b25bfb..66e30b2 100644
--- a/tests/indexed-types/should_compile/all.T
+++ b/tests/indexed-types/should_compile/all.T
@@ -206,7 +206,7 @@ test('T7156', normal, compile, [''])
 test('T5591a', normal, compile, [''])
 test('T5591b', normal, compile, [''])
 test('T7280', normal, compile, [''])
-test('T7474', when(compiler_debugged(), expect_broken(8553)), compile, [''])
+test('T7474', normal, compile, [''])
 test('T7489', normal, compile, [''])
 test('T7585', normal, compile, [''])
 test('T7282', normal, compile, [''])
diff --git a/tests/typecheck/should_fail/all.T b/tests/typecheck/should_fail/all.T
index 4776b56..0050d65 100644
--- a/tests/typecheck/should_fail/all.T
+++ b/tests/typecheck/should_fail/all.T
@@ -252,7 +252,7 @@ test('FailDueToGivenOverlapping', normal, compile_fail, [''])
 test('LongWayOverlapping', normal, compile_fail, [''])
 test('T5051', normal, compile_fail, [''])
 test('T5236',normal,compile_fail,[''])
-test('T5246',when(compiler_debugged(), expect_broken(8553)),compile_fail,[''])
+test('T5246',normal,compile_fail,[''])
 test('T5300',normal,compile_fail,[''])
 test('T5095',normal,compile_fail,[''])
 test('T1897a',normal,compile_fail,[''])



More information about the ghc-commits mailing list