diff options
author | Alan Zimmerman <alan.zimm@gmail.com> | 2022-12-11 13:34:24 +0000 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2022-12-13 22:19:50 -0500 |
commit | 9f3011896aa3dc8cc14bd61ccb68ab09e17c330e (patch) | |
tree | 12e8b2c5799784928ef1b183870b8f653dc02d12 /testsuite/tests/ghc-api | |
parent | 884790e2f3480dfcd73b1c094123555956eac6e0 (diff) | |
download | haskell-9f3011896aa3dc8cc14bd61ccb68ab09e17c330e.tar.gz |
EPA: When splitting out header comments, keep ones for first decl
Any comments immediately preceding the first declaration are no longer
kept as header comments, but attach to the first declaration instead.
Diffstat (limited to 'testsuite/tests/ghc-api')
-rw-r--r-- | testsuite/tests/ghc-api/exactprint/Test20239.stderr | 17 |
1 files changed, 9 insertions, 8 deletions
diff --git a/testsuite/tests/ghc-api/exactprint/Test20239.stderr b/testsuite/tests/ghc-api/exactprint/Test20239.stderr index 2bac5ab532..bcbb818b05 100644 --- a/testsuite/tests/ghc-api/exactprint/Test20239.stderr +++ b/testsuite/tests/ghc-api/exactprint/Test20239.stderr @@ -19,14 +19,7 @@ [] [])) (EpaCommentsBalanced - [(L - (Anchor - { Test20239.hs:3:1-28 } - (UnchangedAnchor)) - (EpaComment - (EpaLineComment - "-- | Leading Haddock Comment") - { Test20239.hs:1:18-22 }))] + [] [(L (Anchor { Test20239.hs:8:1 } @@ -54,6 +47,14 @@ (EpaComments [(L (Anchor + { Test20239.hs:3:1-28 } + (UnchangedAnchor)) + (EpaComment + (EpaLineComment + "-- | Leading Haddock Comment") + { Test20239.hs:1:18-22 })) + ,(L + (Anchor { Test20239.hs:7:34-63 } (UnchangedAnchor)) (EpaComment |