[GHC] #9078: Segfault with makeStableName

[GHC]

#9078: Segfault with makeStableName
-------------------------------------+------------------------------------
        Reporter:  robertce          |            Owner:
            Type:  bug               |           Status:  new
        Priority:  normal            |        Milestone:
       Component:  Compiler          |          Version:  7.8.2
      Resolution:                    |         Keywords:
Operating System:  Unknown/Multiple  |     Architecture:  Unknown/Multiple
 Type of failure:  None/Unknown      |       Difficulty:  Unknown
       Test Case:                    |       Blocked By:
        Blocking:                    |  Related Tickets:
-------------------------------------+------------------------------------

Comment (by ezyang):

 Reproduced; when run with the debug build we get an assert failure:

 {{{
 Starting program: /home/ezyang/test +RTS -DS -C0 -V0
 [Thread debugging using libthread_db enabled]
 Using host libthread_db library "/lib/x86_64-linux-gnu/libthread_db.so.1".
 cap 0: initialised
 test: internal error: ASSERTION FAILED: file rts/Stable.c, line 337

     (GHC version 7.9.20140410 for x86_64_unknown_linux)
     Please report this as a GHC bug:
 http://www.haskell.org/ghc/reportabug

 Program received signal SIGABRT, Aborted.
 0x00007ffff6eaef79 in __GI_raise (sig=sig at entry=6) at
 ../nptl/sysdeps/unix/sysv/linux/raise.c:56
 56      ../nptl/sysdeps/unix/sysv/linux/raise.c: No such file or
 directory.
 (gdb) bt
 #0  0x00007ffff6eaef79 in __GI_raise (sig=sig at entry=6) at
 ../nptl/sysdeps/unix/sysv/linux/raise.c:56
 #1  0x00007ffff6eb2388 in __GI_abort () at abort.c:89
 #2  0x000000000067edef in rtsFatalInternalErrorFn (s=0x6e63c0 "ASSERTION
 FAILED: file %s, line %u\n", ap=0x7fffffff9878) at rts/RtsMessages.c:170
 #3  0x000000000067ea27 in barf (s=0x6e63c0 "ASSERTION FAILED: file %s,
 line %u\n") at rts/RtsMessages.c:42
 #4  0x000000000067ea8a in _assertFail (filename=0x6e6d44 "rts/Stable.c",
 linenum=337) at rts/RtsMessages.c:57
 #5  0x0000000000682c03 in lookupStableName (p=0x9076b0) at
 rts/Stable.c:337
 #6  0x00000000006a2f46 in stg_makeStableNamezh ()
 #7  0x0000000000000000 in ?? ()
 (gdb) f 5
 #5  0x0000000000682c03 in lookupStableName (p=0x9076b0) at
 rts/Stable.c:337
 337         ASSERT(stable_name_table[sn].addr == p);
 }}}

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