fail -> broken

testsuite/driver/testlib.py

@@ -150,7 +150,7 @@ def _expect_fail_if_compiler_type( opts, compiler_type ):
     if config.compiler_type == compiler_type:
 	opts.expect = 'fail'
 
-def expect_broken_if_compiler_type( compiler_type ):
+def expect_broken_if_compiler_type( bug, compiler_type ):
    return lambda opts, b=bug, c=compiler_type: _expect_broken_if_compiler_type(opts, b, c)
 
 def _expect_broken_if_compiler_type( opts, bug, compiler_type ):

testsuite/tests/ghc-regress/typecheck/should_compile/all.T

@@ -211,7 +211,7 @@ test('tc195', only_compiler_types(['ghc']), compile, [''])
 test('tc196', normal, compile, [''])
 test('tc197', normal, compile, [''])
 test('tc198', normal, compile, [''])
-test('tc199', expect_fail_if_compiler_type('ghc'), compile, [''])
+test('tc199', expect_broken_if_compiler_type(1061, 'ghc'), compile, [''])
 test('tc200', normal, compile, [''])
 test('tc201', normal, compile, [''])
 test('tc202', normal, compile, [''])