diff options
| author | Alan Zimmerman <alan.zimm@gmail.com> | 2015-05-11 17:57:05 +0200 |
|---|---|---|
| committer | Alan Zimmerman <alan.zimm@gmail.com> | 2015-05-11 17:57:05 +0200 |
| commit | ecc3d6be218b1c7a36ee3f2f36c4f3ac4f45c34f (patch) | |
| tree | 6ee3b29a729dfdb047d4b7768ed67384037c74dd /mk | |
| parent | fe38195eb783fc2f2f2d5ef50fb665b06fd15e82 (diff) | |
| download | haskell-ecc3d6be218b1c7a36ee3f2f36c4f3ac4f45c34f.tar.gz | |
ApiAnnotations : PatBind gives wrong SrcSpan for the pattern.
Summary:
The production for decl_no_th starts
decl_no_th :: { Located (OrdList (LHsDecl RdrName)) }
: sigdecl { $1 }
| '!' aexp rhs {% do { let { e = sLL $1 $> (SectionR (sL1 $1 (HsVar bang_RDR)) $2) };
pat <- checkPattern empty e;
...
The e value should be just the pattern, excluding the rhs, but the span
created includes the rhs.
Test Plan: ./validate
Reviewers: hvr, austin
Reviewed By: austin
Subscribers: bgamari, thomie, mpickering
Differential Revision: https://phabricator.haskell.org/D873
GHC Trac Issues: #10358
Diffstat (limited to 'mk')
0 files changed, 0 insertions, 0 deletions