[commit: ghc] master, wip/deploy-docs, wip/packaging-fail, wip/run-nofib, wip/windows-32bit: testsuite: Mark T10672 as broken (88a6e9a)

git at git.haskell.org git at git.haskell.org
Thu Mar 21 17:00:19 UTC 2019


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

On branches: master,wip/deploy-docs,wip/packaging-fail,wip/run-nofib,wip/windows-32bit
Link       : http://ghc.haskell.org/trac/ghc/changeset/88a6e9a4e596d22d1dd8b983a15781183050f51a/ghc

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

commit 88a6e9a4e596d22d1dd8b983a15781183050f51a
Author: Ben Gamari <ben at smart-cactus.org>
Date:   Mon Mar 4 19:16:09 2019 -0500

    testsuite: Mark T10672 as broken
    
    This test, which is only run on Windows, seems to be reliably timing
    out.
    
    See #16390.


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

88a6e9a4e596d22d1dd8b983a15781183050f51a
 testsuite/tests/rts/T10672/all.T | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/testsuite/tests/rts/T10672/all.T b/testsuite/tests/rts/T10672/all.T
index 1e04f1b..5e0c43c 100644
--- a/testsuite/tests/rts/T10672/all.T
+++ b/testsuite/tests/rts/T10672/all.T
@@ -1,9 +1,11 @@
 test('T10672_x64',
      [extra_files(['Main.hs', 'Printf.hs', 'cxxy.cpp']),
-      [unless(opsys('mingw32'), skip), unless(arch('x86_64'), skip)]],
+      unless(opsys('mingw32'), skip), unless(arch('x86_64'), skip),
+      when(opsys('mingw32'), expect_broken(16390))],
      makefile_test, ['T10672_x64'])
 
 test('T10672_x86',
      [extra_files(['Main.hs', 'Printf.hs', 'cxxy.cpp']),
-      [unless(opsys('mingw32'), skip), unless(arch('i386'), skip)]],
+      unless(opsys('mingw32'), skip), unless(arch('i386'), skip),
+      when(opsys('mingw32'), expect_broken(16390))],
      makefile_test, ['T10672_x86'])



More information about the ghc-commits mailing list