[GHC] #8402: throwTo segfaults under -prof -threaded -with-rtsopts=N2

[GHC]

#8402: throwTo segfaults under -prof -threaded -with-rtsopts=N2
----------------------------------+----------------------------------
        Reporter:  akio           |            Owner:
            Type:  bug            |           Status:  new
        Priority:  normal         |        Milestone:
       Component:  Compiler       |          Version:  7.7
      Resolution:                 |         Keywords:
Operating System:  Linux          |     Architecture:  x86_64 (amd64)
 Type of failure:  Runtime crash  |       Difficulty:  Unknown
       Test Case:                 |       Blocked By:
        Blocking:                 |  Related Tickets:
----------------------------------+----------------------------------

Comment (by akio):

 I see many different stack traces from this program, here is one of them:

 {{{
 Program received signal SIGSEGV, Segmentation fault.
 [Switching to Thread 0x7ffff56fe700 (LWP 14605)]
 0x00000000008382d4 in overwritingClosure (p=0x7ffff6007a38) at
 includes/rts/storage/ClosureMacros.h:500
 500             ((StgThunk *)(p))->payload[i] = 0;
 (gdb) bt
 #0  0x00000000008382d4 in overwritingClosure (p=0x7ffff6007a38) at
 includes/rts/storage/ClosureMacros.h:500
 #1  0x0000000000830eb4 in doneWithMsgThrowTo (m=0x7ffff6007a38) at
 rts/Messages.h:25
 #2  0x0000000000831a52 in maybePerformBlockedException (cap=0xbbc0c0,
 tso=0x7ffff60079b0) at rts/RaiseAsync.c:539
 #3  0x000000000083aa9f in threadPaused (cap=0xbbc0c0, tso=0x7ffff60079b0)
 at rts/ThreadPaused.c:209
 #4  0x0000000000852dc5 in stg_returnToSchedButFirst ()
 #5  0x0000000000000000 in ?? ()
 }}}

-- 
Ticket URL: <http://ghc.haskell.org/trac/ghc/ticket/8402#comment:1>
GHC <http://www.haskell.org/ghc/>
The Glasgow Haskell Compiler