[GHC] #12117: Thread by forkIO freezes (while read :: Int if error appears) when compiled with -threaded option

[GHC]

#12117: Thread by forkIO freezes (while read :: Int if error appears) when compiled
with -threaded option
-----------------------------------------+---------------------------------
           Reporter:  wapxmas            |             Owner:
               Type:  bug                |            Status:  new
           Priority:  normal             |         Milestone:
          Component:  Compiler           |           Version:  7.10.3
           Keywords:  -threaded, freeze  |  Operating System:  Windows
       Architecture:  x86_64 (amd64)     |   Type of failure:  None/Unknown
          Test Case:                     |        Blocked By:
           Blocking:                     |   Related Tickets:
Differential Rev(s):                     |         Wiki Page:
-----------------------------------------+---------------------------------
 I attached program to reproduce bug.

 While running you need type "abc" then "1":
 1. if build with "ghc -threaded concbug.hs" - code after "threadDelay_ t"
 on 29 is never run.
 2. if build as "ghc concbug.hs" - program work as expected

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