In local.glasgow-haskell-bugs, you wrote:
I think it should be:
killThread tid = throwTo tid (AsyncException ThreadKilled)
Yes, that's right.
I just noticed that 'killThread' in fact isn't implemented by
means of 'throwTo', but uses the 'killThread#' primop...wouldn't
it be
Following example causes 'Segentation fault' under
Linux (Mandrake). Under Windows it works well.
---
module Main where
import Control.Concurrent.MVar
import System.IO.Unsafe
main = cfun main
foreign export ccall hfun :: IO ()
foreign import