The killThread is not able to kill threads accepting socket connections on Windows. Run attached file either in GHCi: ``` runghc.exe ListenOn.hs ``` or compile threaded: ``` ghc --make -threaded ListenOn.hs ``` Resulting binary hangs. Expected behavior: should finish without problems. Non-threaded runtime produces expected behavior. Seems to work correctly on Linux. Affected: ghc-6.10.4 and ghc-6.12.1. <details><summary>Trac metadata</summary> | Trac field | Value | | ---------------------- | -------------- | | Version | 6.12.1 | | Type | Bug | | TypeOfFailure | OtherFailure | | Priority | normal | | Resolution | Unresolved | | Component | Runtime System | | Test case | | | Differential revisions | | | BlockedBy | | | Related | | | Blocking | | | CC | | | Operating system | | | Architecture | | </details> <!-- {"blocked_by":[],"summary":"Cannot killThread in listen/accept on Windows threaded runtime","status":"New","operating_system":"","component":"Runtime System","related":[],"milestone":"","resolution":"Unresolved","owner":{"tag":"Unowned"},"version":"6.12.1","keywords":[],"differentials":[],"test_case":"","architecture":"","cc":[""],"type":"Bug","description":"The killThread is not able to kill threads accepting socket connections on Windows.\r\n\r\nRun attached file either in GHCi:\r\n\r\n{{{\r\nrunghc.exe ListenOn.hs\r\n}}}\r\n\r\n\r\nor compile threaded:\r\n\r\n\r\n{{{\r\nghc --make -threaded ListenOn.hs\r\n}}}\r\n\r\n\r\nResulting binary hangs.\r\n\r\nExpected behavior: should finish without problems.\r\n\r\nNon-threaded runtime produces expected behavior. Seems to work correctly on Linux.\r\n\r\nAffected: ghc-6.10.4 and ghc-6.12.1.\r\n\r\n","type_of_failure":"OtherFailure","blocking":[]} -->