[GHC] #2293: Multiple declaration error shown multiple times

[GHC]

#2293: Multiple declaration error shown multiple times
-----------------------------+----------------------------------------------
    Reporter:  NeilMitchell  |       Owner:          
        Type:  bug           |      Status:  new     
    Priority:  normal        |   Component:  Compiler
     Version:  6.8.2         |    Severity:  minor   
    Keywords:                |    Testcase:          
Architecture:  Unknown       |          Os:  Unknown 
-----------------------------+----------------------------------------------
 Given the file:

 {{{
 foo = 1
 a = ()
 foo = 1
 b = ()
 foo = 1
 }}}

 You get the error message:

 {{{
 Uniplate.hs:3:0:
     Multiple declarations of `Main.foo'
     Declared at: Uniplate.hs:1:0
                  Uniplate.hs:3:0

 Uniplate.hs:5:0:
     Multiple declarations of `Main.foo'
     Declared at: Uniplate.hs:1:0
                  Uniplate.hs:5:0
 }}}

 Instead of the much simpler:

 {{{
 Uniplate.hs:5:0:
     Multiple declarations of `Main.foo'
     Declared at: Uniplate.hs:1:0
                  Uniplate.hs:3:0
                  Uniplate.hs:5:0
 }}}

 This also happens with multiple class definitions, but if you give
 multiple type signatures then the error message is properly merged.

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