diff options
| author | Alan Zimmerman <alan.zimm@gmail.com> | 2021-03-25 22:54:15 +0000 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-03-31 11:13:28 -0400 |
| commit | 798d8f80e1562891e4bbd8e4d8f42926cecf32b3 (patch) | |
| tree | 927e558a1849636d6fb5e4924adf56fdb283b128 /compiler/GHC/Parser.y | |
| parent | 49bc1e9ec854e571dfa78ac43565073586579f31 (diff) | |
| download | haskell-798d8f80e1562891e4bbd8e4d8f42926cecf32b3.tar.gz | |
EPA : Rename AnnComment to EpaComment
Follow-up from !2418, see #19579
Diffstat (limited to 'compiler/GHC/Parser.y')
| -rw-r--r-- | compiler/GHC/Parser.y | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/GHC/Parser.y b/compiler/GHC/Parser.y index c30665837c..356a728b23 100644 --- a/compiler/GHC/Parser.y +++ b/compiler/GHC/Parser.y @@ -4223,8 +4223,8 @@ acsFinal a = do csf <- getFinalCommentsFor l meof <- getEofPos let ce = case meof of - Nothing -> AnnComments [] - Just (pos, gap) -> AnnCommentsBalanced [] [L (realSpanAsAnchor pos) (AnnComment AnnEofComment gap)] + Nothing -> EpaComments [] + Just (pos, gap) -> EpaCommentsBalanced [] [L (realSpanAsAnchor pos) (EpaComment EpaEofComment gap)] return (a (cs Semi.<> csf Semi.<> ce)) acsa :: MonadP m => (EpAnnComments -> LocatedAn t a) -> m (LocatedAn t a) |