diff options
Diffstat (limited to 'utils/check-api-annotations/Main.hs')
-rw-r--r-- | utils/check-api-annotations/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/check-api-annotations/Main.hs b/utils/check-api-annotations/Main.hs index 51d389ce13..83568c573f 100644 --- a/utils/check-api-annotations/Main.hs +++ b/utils/check-api-annotations/Main.hs @@ -82,7 +82,7 @@ testOneFile libdir fileName = do getAllSrcSpans ast = everything (++) ([] `mkQ` getSrcSpan) ast where getSrcSpan :: SrcSpan -> [RealSrcSpan] - getSrcSpan (RealSrcSpan ss) = [ss] + getSrcSpan (RealSrcSpan ss _) = [ss] getSrcSpan (UnhelpfulSpan _) = [] |