program fails with "Segmentation fault/access violation in generated code"
I have the following program:
module Main where import Control.Concurrent.Chan import Control.Concurrent import Control.Monad main = forever $ do c <- newChan mapM_ (\ix -> writeChan c "test") [1..500000] mapM_ (\ix -> writeChan c "test") [1..500000] c <- newChan forkIO $ mapM_ (\ix -> writeChan c "test") [1..500000] mapM_ (\ix -> readChan c) [1..500000]
Compiling and running I get this behaviour:
I:\haskell>ghc -O error.hs [1 of 1] Compiling Main ( error.hs, error.o ) Linking error.exe ... I:\haskell>error Segmentation fault/access violation in generated code
If the program doesn't crash after about 30seconds you may have to cancel and restart it, as it sometimes seems to run forever without crashing.
I have tested the binary on another Windows machine and got the same crash, so a hardware problem seems unlikely.