#8402: throwTo segfaults under -prof -threaded -with-rtsopts=N2
----------------------------------+----------------------------------
Reporter: akio | Owner:
Type: bug | Status: new
Priority: normal | Milestone:
Component: Compiler | Version: 7.7
Keywords: | Operating System: Linux
Architecture: x86_64 (amd64) | Type of failure: Runtime crash
Difficulty: Unknown | Test Case:
Blocked By: | Blocking:
Related Tickets: |
----------------------------------+----------------------------------
Save the following module as {{{throwto.hs}}}
{{{
import Control.Concurrent
import Control.Exception
import Control.Monad
main = do
tid <- mask_ $ forkIO $ void $
(try $ threadDelay 100000 :: IO (Either SomeException ()))
killThread tid
}}}
Then compile it with HEAD and run it:
{{{
ghc-stage2 throwto.hs -prof -threaded -fforce-recomp
./throwto +RTS -N2
# segfaults
}}}
--
Ticket URL: <http://ghc.haskell.org/trac/ghc/ticket/8402>
GHC <http://www.haskell.org/ghc/>
The Glasgow Haskell Compiler
_______________________________________________
ghc-tickets mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/ghc-tickets
