[GHC] #11066: Inacessible branch should be warning - otherwise breaks type soundness?

[GHC]

#11066: Inacessible branch should be warning - otherwise breaks type soundness?
-------------------------------------+-------------------------------------
        Reporter:  rrnewton          |                Owner:  (none)
            Type:  bug               |               Status:  new
        Priority:  high              |            Milestone:  8.6.1
       Component:  Compiler          |              Version:  7.10.2
      Resolution:                    |             Keywords:
Operating System:  Unknown/Multiple  |         Architecture:
 Type of failure:  Incorrect         |  Unknown/Multiple
  warning at compile-time            |            Test Case:
      Blocked By:                    |             Blocking:
 Related Tickets:  #8128, #8740      |  Differential Rev(s):  Phab:D1454
       Wiki Page:                    |
-------------------------------------+-------------------------------------

Comment (by simonpj):

 > But that doesn't seem right.

 It seems fine to me, arguably.  The equality `a~b` is not needed; running
 `unsafe3` will never seg-fault.

 It's not worth losing sleep over this.

 BTW, if it's now a warning do we have a flag to control whether the
 warning is enabled?  We should.

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