Ticket #2 (new defect)
Socket related IO cannot be be interrupted on Windows
|Reported by:||igloo||Owned by:|
Originally reported here: http://hackage.haskell.org/trac/ghc/ticket/2943
While playing with socket communication, I noticed that socket IO cannot be interrupted or killed. The attached program simply hangs, irregardless whether is was complied using the -threaded flag or not.
import Network import Control.Concurrent main = withSocketsDo $ do tid <- forkIO $ do s <- listenOn (PortNumber 1234) accept s return () threadDelay 2000000 killThread tid