[GHC] #11034: ghc 7.10.2 testsuite: "T367(normal)" test compilation fails

[GHC]

#11034: ghc 7.10.2 testsuite: "T367(normal)" test compilation fails
----------------------------------------+---------------------------------
           Reporter:  dtonhofer         |             Owner:
               Type:  bug               |            Status:  new
           Priority:  normal            |         Milestone:
          Component:  Test Suite        |           Version:  7.10.2
           Keywords:                    |  Operating System:  Linux
       Architecture:  Unknown/Multiple  |   Type of failure:  None/Unknown
          Test Case:                    |        Blocked By:
           Blocking:                    |   Related Tickets:
Differential Rev(s):                    |         Wiki Page:
----------------------------------------+---------------------------------
 {{{
 =====> T367(normal) 39 of 4142 [0, 1, 0]
 cd ./concurrent/should_run &&  "/usr/local/bin/ghc" -o T367 T367.hs
 -fforce-recomp -dcore-lint -dcmm-lint -dno-debug-output -no-user-package-
 db -rtsopts -fno-warn-tabs -fno-ghci-history  -O2 -fno-omit-yields >
 T367.comp.stderr 2>&1
 Compile failed (status 256) errors were:
 [1 of 1] Compiling Main             ( T367.hs, T367.o )
 *** Core Lint errors : in result of Simplifier ***
 <no location info>: Warning:
     In the expression: seq
                          @ (Id Int)
                          @ (# State# RealWorld, () #)
                          (foldlM'
                             @ Int
                             @ Int
                             @ Id
                             @ Vector
                             $fMonadId
                             ($fNumInt_$c+
                              `cast` (<Int>_R -> <Int>_R -> Sym (NTCo:Id[0]
 <Int>_R)
                                      :: (Int -> Int -> Int) ~R# (Int ->
 Int -> Id Int)))
                             z_a2UZ
                             (enumFromTo_int @ Id @ Vector $fMonadId (I# 1)
 (I# 1000000000)))
                          (# eta_B1, () #)
     Kinds don't match in type application:
     Type variable: b_13 :: *
     Arg type: (# State# RealWorld, () #) :: #
     xx #

 (.... offending program attached ...)

 *** End of Offense ***


 <no location info>:
 Compilation had errors



 *** unexpected failure for T367(normal)
 }}}

--
Ticket URL: <http://ghc.haskell.org/trac/ghc/ticket/11034>
GHC <http://www.haskell.org/ghc/>
The Glasgow Haskell Compiler