diff options
| author | Alan Zimmerman <alan.zimm@gmail.com> | 2015-04-14 01:17:58 -0500 |
|---|---|---|
| committer | Austin Seipp <austin@well-typed.com> | 2015-04-14 01:20:06 -0500 |
| commit | 919b51174163907d2bc3bb41aadf56aa8bb42e9b (patch) | |
| tree | 1c905ca6cd84cda9ff99ce26bf7c5dd385e2d35c /testsuite/tests/ghc-api/annotations/exampleTest.stdout | |
| parent | 9eab6feed44ad8beb6703d2e27ce47a8f79d0f49 (diff) | |
| download | haskell-919b51174163907d2bc3bb41aadf56aa8bb42e9b.tar.gz | |
parser : the API annotation on opt_sig is being discarded
The opt_sig production is defined as
opt_sig :: { ([AddAnn],Maybe (LHsType RdrName)) }
: {- empty -} { ([],Nothing) }
| '::' sigtype { ([mj AnnDcolon $1],Just $2) }
It is used in the alt and decl_no_th productions, but neither of them
add the returned annotations.
This commit captures the annotations in the calling productions.
Reviewed By: austin
Differential Revision: https://phabricator.haskell.org/D822
GHC Trac Issues: #10254
Diffstat (limited to 'testsuite/tests/ghc-api/annotations/exampleTest.stdout')
| -rw-r--r-- | testsuite/tests/ghc-api/annotations/exampleTest.stdout | 12 |
1 files changed, 9 insertions, 3 deletions
diff --git a/testsuite/tests/ghc-api/annotations/exampleTest.stdout b/testsuite/tests/ghc-api/annotations/exampleTest.stdout index 1c3eed51d8..128b70a598 100644 --- a/testsuite/tests/ghc-api/annotations/exampleTest.stdout +++ b/testsuite/tests/ghc-api/annotations/exampleTest.stdout @@ -2,12 +2,12 @@ [ (AK AnnotationTuple.hs:14:39 AnnComma = [AnnotationTuple.hs:14:39]) -(AK <no location info> AnnEofPos = [AnnotationTuple.hs:30:1]) +(AK <no location info> AnnEofPos = [AnnotationTuple.hs:32:1]) ] -------------------------------- [ -(AK AnnotationTuple.hs:1:1 AnnCloseC = [AnnotationTuple.hs:25:1]) +(AK AnnotationTuple.hs:1:1 AnnCloseC = [AnnotationTuple.hs:27:1]) (AK AnnotationTuple.hs:1:1 AnnModule = [AnnotationTuple.hs:3:1-6]) @@ -133,6 +133,8 @@ (AK AnnotationTuple.hs:(20,1)-(24,14) AnnFunId = [AnnotationTuple.hs:20:1-5]) +(AK AnnotationTuple.hs:(20,1)-(24,14) AnnSemi = [AnnotationTuple.hs:25:1]) + (AK AnnotationTuple.hs:(21,7)-(24,14) AnnEqual = [AnnotationTuple.hs:24:7]) (AK AnnotationTuple.hs:(21,7)-(24,14) AnnVbar = [AnnotationTuple.hs:21:7]) @@ -147,6 +149,10 @@ (AK AnnotationTuple.hs:23:9-24 AnnLarrow = [AnnotationTuple.hs:23:16-17]) -(AK <no location info> AnnEofPos = [AnnotationTuple.hs:30:1]) +(AK AnnotationTuple.hs:26:1-14 AnnDcolon = [AnnotationTuple.hs:26:5-6]) + +(AK AnnotationTuple.hs:26:1-14 AnnEqual = [AnnotationTuple.hs:26:12]) + +(AK <no location info> AnnEofPos = [AnnotationTuple.hs:32:1]) ] |