[commit: ghc] ghc-8.0: Skip TEST=TcCoercibleFail when compiler_debugged (7b18551)

git at git.haskell.org git at git.haskell.org
Wed Apr 6 13:54:03 UTC 2016


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

On branch  : ghc-8.0
Link       : http://ghc.haskell.org/trac/ghc/changeset/7b185518cc68da12abb803fe7993f6f08f686dda/ghc

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

commit 7b185518cc68da12abb803fe7993f6f08f686dda
Author: Thomas Miedema <thomasmiedema at gmail.com>
Date:   Mon Feb 29 13:59:48 2016 +0100

    Skip TEST=TcCoercibleFail when compiler_debugged
    
    (cherry picked from commit 49c55e68aae9841c166430ae566b0d9bdc03c99d)


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

7b185518cc68da12abb803fe7993f6f08f686dda
 testsuite/tests/typecheck/should_fail/all.T | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/testsuite/tests/typecheck/should_fail/all.T b/testsuite/tests/typecheck/should_fail/all.T
index dd0c427..f2b5331 100644
--- a/testsuite/tests/typecheck/should_fail/all.T
+++ b/testsuite/tests/typecheck/should_fail/all.T
@@ -327,9 +327,13 @@ test('T7989', normal, compile_fail, [''])
 test('T8034', normal, compile_fail, [''])
 test('T8142', normal, compile_fail, [''])
 test('T8262', normal, compile_fail, [''])
-test('TcCoercibleFail', when(compiler_lt('ghc', '7.7'), skip), compile_fail, [''])
-test('TcCoercibleFail2', when(compiler_lt('ghc', '7.7'), skip), compile_fail, [''])
-test('TcCoercibleFail3', when(compiler_lt('ghc', '7.7'), skip), compile_fail, [''])
+
+# TcCoercibleFail times out with the compiler is compiled with -DDEBUG.
+# This is expected (see comment in source file).
+test('TcCoercibleFail', [when(compiler_debugged(), skip)], compile_fail, [''])
+
+test('TcCoercibleFail2', [], compile_fail, [''])
+test('TcCoercibleFail3', [], compile_fail, [''])
 test('T8306', normal, compile_fail, [''])
 test('T8392a', normal, compile_fail, [''])
 test('T8428', normal, compile_fail, [''])



More information about the ghc-commits mailing list