[GHC] #10207: parser: ParStmt has incorrect SrcSpan

[GHC]

#10207: parser: ParStmt has incorrect SrcSpan
-------------------------------------+-------------------------------------
              Reporter:  alanz       |             Owner:  alanz
                  Type:  bug         |            Status:  new
              Priority:  normal      |         Milestone:
             Component:  Compiler    |           Version:  7.10.1
  (Parser)                           |  Operating System:  Unknown/Multiple
              Keywords:              |   Type of failure:  Other
  ApiAnnotations                     |        Blocked By:
          Architecture:              |   Related Tickets:
  Unknown/Multiple                   |
             Test Case:              |
              Blocking:              |
Differential Revisions:              |
-------------------------------------+-------------------------------------
 The production for pquals is

 {{{#!hs
 pquals :: { Located [[LStmt RdrName (LHsExpr RdrName)]] }
     : squals '|' pquals
                      {% addAnnotation (gl $ last $ unLoc $1) AnnVbar (gl
 $2) >>
                         return (L (getLoc $2) (reverse (unLoc $1) : unLoc
 $3)) }
     | squals         { L (getLoc $1) [reverse (unLoc $1)] }
 }}}

 This assigns the location of the '|' to the entire returned value.

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