[GHC] #3310: `show BlockedIndefinitely` should not equal `show BlockedOnDeadMVar`

[GHC]

#3310: `show BlockedIndefinitely` should not equal `show BlockedOnDeadMVar`
-----------------------------+----------------------------------------------
Reporter:  enolan            |          Owner:                  
    Type:  feature request   |         Status:  new             
Priority:  normal            |      Component:  libraries/base  
 Version:  6.10.3            |       Severity:  normal          
Keywords:                    |       Testcase:                  
      Os:  Unknown/Multiple  |   Architecture:  Unknown/Multiple
-----------------------------+----------------------------------------------
 `show BlockedIndefinitely` and `show BlockedOnDeadMVar` should, IMO,
 evaluate to inequal strings that reflect the difference in cause of the
 exception. Them being equal is confusing for programmers trying to find
 the source of their crashes when the exception is printed to console.

-- 
Ticket URL: <http://hackage.haskell.org/trac/ghc/ticket/3310>
GHC <http://www.haskell.org/ghc/>
The Glasgow Haskell Compiler