[commit: ghc] master: Testsuite: comment out `setnumcapabilities001` (#10860) (23a301a)

[git at git.haskell.org]

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

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

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

commit 23a301ac36bb7e62bcf91bbcf0eb9e0e37498664
Author: Thomas Miedema <thomasmiedema at gmail.com>
Date:   Wed Sep 9 13:56:53 2015 +0200

    Testsuite: comment out `setnumcapabilities001` (#10860)
    
    Don't mark it expect_broken, because it fails only sometimes.


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

23a301ac36bb7e62bcf91bbcf0eb9e0e37498664
 testsuite/tests/concurrent/should_run/all.T | 14 ++++++++------
 1 file changed, 8 insertions(+), 6 deletions(-)

diff --git a/testsuite/tests/concurrent/should_run/all.T b/testsuite/tests/concurrent/should_run/all.T
index 58c3bd1..1ef566d 100644
--- a/testsuite/tests/concurrent/should_run/all.T
+++ b/testsuite/tests/concurrent/should_run/all.T
@@ -249,12 +249,14 @@ if (ghc_with_smp == 0):
 else:
    skip_if_not_smp = normal
 
-test('setnumcapabilities001',
-     [ only_ways(['threaded1','threaded2']),
-       extra_run_opts('4 12 2000'),
-       reqlib('parallel'),
-       skip_if_not_smp ],
-     compile_and_run, [''])
+# Commented out, instead of marked expect_broken, because it fails only
+# sometimes. See #10860.
+#test('setnumcapabilities001',
+#     [ only_ways(['threaded1','threaded2']),
+#       extra_run_opts('4 12 2000'),
+#       reqlib('parallel'),
+#       skip_if_not_smp ],
+#     compile_and_run, [''])
 
 # omit ghci, which can't handle unboxed tuples:
 test('compareAndSwap', [omit_ways(['ghci','hpc']), reqlib('primitive')], compile_and_run, [''])