#4927: pattern match failure if compiled with -threaded
-------------------------+--------------------------------------------------
    Reporter:  helgikrs  |       Owner:                
        Type:  bug       |      Status:  new           
    Priority:  normal    |   Component:  libraries/base
     Version:  7.0.1     |    Keywords:                
    Testcase:            |   Blockedby:                
          Os:  Linux     |    Blocking:                
Architecture:  x86       |     Failure:  Runtime crash 
-------------------------+--------------------------------------------------
 Always reproducible with the following program, compiled with ghc -rtsopts
 -threaded test.hs.

 {{{
 import Network (listenOn, PortID(PortNumber))
 import Network.Socket (accept, sClose)
 import Control.Monad (forever)
 import Control.Concurrent (forkIO)

 main = listenOn (PortNumber 3333) >>= \s ->
     forever $ accept s >>= forkIO . sClose . fst
 }}}

 {{{
 $ ./test +RTS -N2
 user error (Pattern match failure in do expression at
 libraries/base/System/Event/Thread.hs:63:3-10
 }}}

 base-4.3.0.0

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

_______________________________________________
Glasgow-haskell-bugs mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/glasgow-haskell-bugs

Reply via email to