diff options
| author | Alan Zimmerman <alan.zimm@gmail.com> | 2021-03-25 21:38:13 +0000 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-03-31 11:13:28 -0400 |
| commit | d03005e642710d0f1f78757292e0fe65287e5f0a (patch) | |
| tree | 2bd2c11a00577649ac19ddc6aa9705efa19bc8e5 /compiler/GHC/Hs/Type.hs | |
| parent | 0fe5175ac537c0ce2afe969ec82a0d1c73a4ae38 (diff) | |
| download | haskell-d03005e642710d0f1f78757292e0fe65287e5f0a.tar.gz | |
EPA : rename 'api annotations' to 'exact print annotations'
In comments, and notes.
Follow-up from !2418, see #19579
Diffstat (limited to 'compiler/GHC/Hs/Type.hs')
| -rw-r--r-- | compiler/GHC/Hs/Type.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/GHC/Hs/Type.hs b/compiler/GHC/Hs/Type.hs index ba07ad35b7..9c494d6aa7 100644 --- a/compiler/GHC/Hs/Type.hs +++ b/compiler/GHC/Hs/Type.hs @@ -483,12 +483,12 @@ splitHsFunType ty = go ty = let (anns, cs, args, res) = splitHsFunType ty anns' = anns ++ annParen2AddEpAnn an - cs' = cs S.<> apiAnnComments (ann l) S.<> apiAnnComments an + cs' = cs S.<> epAnnComments (ann l) S.<> epAnnComments an in (anns', cs', args, res) go (L ll (HsFunTy (EpAnn _ an cs) mult x y)) | (anns, csy, args, res) <- splitHsFunType y - = (anns, csy S.<> apiAnnComments (ann ll), HsScaled mult x':args, res) + = (anns, csy S.<> epAnnComments (ann ll), HsScaled mult x':args, res) where (L (SrcSpanAnn a l) t) = x an' = addTrailingAnnToA l an cs a |