[GHC] #8776: Displaying pattern synonym for a GADT

[GHC]

#8776: Displaying pattern synonym for a GADT
-------------------------------------+------------------------------------
        Reporter:  monoidal          |            Owner:
            Type:  bug               |           Status:  new
        Priority:  normal            |        Milestone:
       Component:  Compiler          |          Version:  7.7
      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 cactus):

 Using `-dppr-debug` shows that the two type variables are distinct and
 correct:

 {{{
 pattern
 (base:GHC.Num.Num{tc 2b} t{tv aQa} [sk],
  ghc-prim:GHC.Classes.Eq{tc 23} t{tv aQb} [sk]) =>
 main:Main.P{d rs2} :: main:Main.A{tc rpC} t{tv aQa} [sk] t1{tv aQb} [sk]
 }}}

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