[GHC] #13973: NamedFieldPuns fails for qualified imports if field name is already in scope

[GHC]

#13973: NamedFieldPuns fails for qualified imports if field name is already in
scope
-------------------------------------+-------------------------------------
        Reporter:  sergv             |                Owner:  (none)
            Type:  bug               |               Status:  closed
        Priority:  normal            |            Milestone:
       Component:  Compiler          |              Version:  8.0.2
      Resolution:  duplicate         |             Keywords:
Operating System:  Unknown/Multiple  |         Architecture:
 Type of failure:  Poor/confusing    |  Unknown/Multiple
  error message                      |            Test Case:
      Blocked By:                    |             Blocking:
 Related Tickets:  #13644            |  Differential Rev(s):
       Wiki Page:                    |
-------------------------------------+-------------------------------------
Changes (by RyanGlScott):

 * status:  new => closed
 * resolution:   => duplicate
 * related:   => #13644


Comment:

 Closing as a duplicate of #13644.

 Note that you don't need `NamedFieldPuns` to trigger the panic - this also
 suffices:

 {{{#!hs
 module Test (foo) where

 import qualified Record as Rec

 -- The culprit
 field2 :: ()
 field2 = ()

 foo :: Rec.Record -> Int
 foo Rec.Record{field2 = field2} = field2
 }}}

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