diff options
Diffstat (limited to 'utils/check-ppr/Main.hs')
| -rw-r--r-- | utils/check-ppr/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/check-ppr/Main.hs b/utils/check-ppr/Main.hs index 227e47d0b5..c5561a8567 100644 --- a/utils/check-ppr/Main.hs +++ b/utils/check-ppr/Main.hs @@ -91,7 +91,7 @@ getPragmas anns = pragmaStr tokComment (L _ (AnnLineComment s)) = s tokComment _ = "" - comments = map tokComment $ sortLocated $ apiAnnRogueComments anns + comments = map tokComment $ sortRealLocated $ apiAnnRogueComments anns pragmas = filter (\c -> isPrefixOf "{-#" c ) comments pragmaStr = intercalate "\n" pragmas |