summaryrefslogtreecommitdiff
path: root/testsuite/tests/parser/should_compile/DumpParsedAst.stderr
diff options
context:
space:
mode:
authorAlan Zimmerman <alan.zimm@gmail.com>2021-05-11 18:06:05 +0100
committerMarge Bot <ben+marge-bot@smart-cactus.org>2021-05-12 21:42:21 -0400
commitc34f4c0cf55ac5c81b6600daab2a66e0adf89f50 (patch)
treef910e2f97e105e2cd4705421d8195206418e2a64 /testsuite/tests/parser/should_compile/DumpParsedAst.stderr
parent67a5a91ef5e61f3b3c84481d8a396ed48cd5d96e (diff)
downloadhaskell-c34f4c0cf55ac5c81b6600daab2a66e0adf89f50.tar.gz
EPA: Fix incorrect SrcSpan for FamDecl
The SrcSpan for a type family declaration did not include the family equations. Closes #19821
Diffstat (limited to 'testsuite/tests/parser/should_compile/DumpParsedAst.stderr')
-rw-r--r--testsuite/tests/parser/should_compile/DumpParsedAst.stderr12
1 files changed, 6 insertions, 6 deletions
diff --git a/testsuite/tests/parser/should_compile/DumpParsedAst.stderr b/testsuite/tests/parser/should_compile/DumpParsedAst.stderr
index d4956a81e4..106851f2e8 100644
--- a/testsuite/tests/parser/should_compile/DumpParsedAst.stderr
+++ b/testsuite/tests/parser/should_compile/DumpParsedAst.stderr
@@ -173,12 +173,12 @@
,(L
(SrcSpanAnn (EpAnn
(Anchor
- { DumpParsedAst.hs:10:1-39 }
+ { DumpParsedAst.hs:(10,1)-(12,24) }
(UnchangedAnchor))
(AnnListItem
[])
(EpaComments
- [])) { DumpParsedAst.hs:10:1-39 })
+ [])) { DumpParsedAst.hs:(10,1)-(12,24) })
(TyClD
(NoExtField)
(FamDecl
@@ -186,7 +186,7 @@
(FamilyDecl
(EpAnn
(Anchor
- { DumpParsedAst.hs:10:1-45 }
+ { DumpParsedAst.hs:(10,1)-(12,24) }
(UnchangedAnchor))
[(AddEpAnn AnnType (EpaSpan { DumpParsedAst.hs:10:1-4 }))
,(AddEpAnn AnnFamily (EpaSpan { DumpParsedAst.hs:10:6-11 }))
@@ -619,12 +619,12 @@
,(L
(SrcSpanAnn (EpAnn
(Anchor
- { DumpParsedAst.hs:17:1-48 }
+ { DumpParsedAst.hs:(17,1)-(18,30) }
(UnchangedAnchor))
(AnnListItem
[])
(EpaComments
- [])) { DumpParsedAst.hs:17:1-48 })
+ [])) { DumpParsedAst.hs:(17,1)-(18,30) })
(TyClD
(NoExtField)
(FamDecl
@@ -632,7 +632,7 @@
(FamilyDecl
(EpAnn
(Anchor
- { DumpParsedAst.hs:17:1-54 }
+ { DumpParsedAst.hs:(17,1)-(18,30) }
(UnchangedAnchor))
[(AddEpAnn AnnType (EpaSpan { DumpParsedAst.hs:17:1-4 }))
,(AddEpAnn AnnFamily (EpaSpan { DumpParsedAst.hs:17:6-11 }))