[commit: ghc] master: Testsuite: mark enum01-enum03 expect_broken(#9399) on Windows (37081ac)

[git at git.haskell.org]

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

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

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

commit 37081acc74b9820b284161c95b16ff878fc5830f
Author: Thomas Miedema <thomasmiedema at gmail.com>
Date:   Sat Sep 12 19:34:16 2015 +0200

    Testsuite: mark enum01-enum03 expect_broken(#9399) on Windows


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

37081acc74b9820b284161c95b16ff878fc5830f
 libraries/base/tests/all.T | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/libraries/base/tests/all.T b/libraries/base/tests/all.T
index 7021c2d..96cb551 100644
--- a/libraries/base/tests/all.T
+++ b/libraries/base/tests/all.T
@@ -77,10 +77,13 @@ test('dynamic002',      normal, compile_and_run, [''])
 test('dynamic003',      extra_run_opts('+RTS -K32m -RTS'), compile_and_run, [''])
 test('dynamic004',      omit_ways(['normal', 'threaded1', 'ghci']), compile_and_run, [''])
 test('dynamic005',      normal, compile_and_run, [''])
-test('enum01',          when(fast(), skip), compile_and_run, [''])
-test('enum02',          when(fast(), skip), compile_and_run, [''])
-test('enum03',          when(fast(), skip), compile_and_run, [''])
-test('enum04', 		normal, compile_and_run, [''])
+
+enum_setups = [when(fast(), skip), when(opsys('mingw32'), expect_broken(9399))]
+test('enum01',          enum_setups, compile_and_run, [''])
+test('enum02',          enum_setups, compile_and_run, [''])
+test('enum03',          enum_setups, compile_and_run, [''])
+test('enum04',          normal, compile_and_run, [''])
+
 test('exceptionsrun001', expect_broken_for(10712, opt_ways), compile_and_run, [''])
 test('exceptionsrun002', 	normal, compile_and_run, [''])
 test('foldableArray',   normal, compile_and_run, [''])