[GHC] #9470: forkProcess breaks in multiple ways with GHC 7.6

[GHC]

#9470: forkProcess breaks in multiple ways with GHC 7.6
-------------------------------------+-------------------------------------
              Reporter:  nh2         |            Owner:  simonmar
                  Type:  bug         |           Status:  new
              Priority:  normal      |        Milestone:
             Component:  Runtime     |          Version:  7.8.3
  System                             |         Keywords:
            Resolution:              |     Architecture:  Unknown/Multiple
      Operating System:  Linux       |       Difficulty:  Unknown
       Type of failure:  Runtime     |       Blocked By:
  crash                              |  Related Tickets:  #9468
             Test Case:              |
              Blocking:              |
Differential Revisions:              |
-------------------------------------+-------------------------------------

Comment (by nh2):

 It seems that issue 4 can be worked around by restricting to 1 fork at a
 time (suggesed by carter):

 {{{#!hs
 main :: IO ()
 main = do

   let _FORKS = 8

   withLock <- do
     m <- newMVar ()
     return $ \f -> withMVar m (\() -> f)

   forM_ [1.._FORKS :: Int] $ \i -> forkIO $
     forever $ withLock $ forkJobProcess ("Job" ++ show i)

   _ <- getLine
   return ()
 }}}

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