[commit: ghc] master: Testsuite: T10245 is passing for WAY=ghci (#10245) (aee19d0)

[git at git.haskell.org]

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

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

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

commit aee19d08ec36b0ec5d0ed4fab2b63c78a80dbc23
Author: Thomas Miedema <thomasmiedema at gmail.com>
Date:   Fri Jul 31 01:08:09 2015 +0200

    Testsuite: T10245 is passing for WAY=ghci (#10245)
    
    Needed to get closer to passing `validate --slow`.


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

aee19d08ec36b0ec5d0ed4fab2b63c78a80dbc23
 testsuite/tests/codeGen/should_run/all.T | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/testsuite/tests/codeGen/should_run/all.T b/testsuite/tests/codeGen/should_run/all.T
index 7fb2853..f9e0e0e 100644
--- a/testsuite/tests/codeGen/should_run/all.T
+++ b/testsuite/tests/codeGen/should_run/all.T
@@ -131,7 +131,8 @@ test('T9013', omit_ways(['ghci']),  # ghci doesn't support unboxed tuples
 test('T9340', normal, compile_and_run, [''])
 test('cgrun074', normal, compile_and_run, [''])
 test('CmmSwitchTest', when(fast(), skip), compile_and_run, [''])
-test('T10245', expect_broken(10246), compile_and_run, [''])
+# Skipping WAY=ghci, because it is not broken.
+test('T10245', [omit_ways(['ghci']), expect_broken(10246)], compile_and_run, [''])
 test('T10246', expect_broken(10246), compile_and_run, [''])
 test('T10414', [only_ways(['threaded2']), extra_ways(['threaded2'])],
      compile_and_run, ['-feager-blackholing'])