Ticket #4238: threadWaitRead-segfault.hs

File threadWaitRead-segfault.hs, 101 bytes (added by tnarg, 4 years ago)
Line 
1module Main where
2
3import GHC.Conc ( threadWaitRead )
4
5main = threadWaitRead (-1) >> putStrLn "done!"