diff options
author | romes <rodrigo.m.mesquita@gmail.com> | 2022-03-09 01:33:29 +0000 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2022-03-18 05:10:58 -0400 |
commit | 19163397000ae3ce9886a75bef900d35774d864e (patch) | |
tree | 3d02356f95ef57a65e96e5eed9368883603ef232 /utils | |
parent | 8561c1afdbbda73a31cb8f8f1e80d1f403673e9b (diff) | |
download | haskell-19163397000ae3ce9886a75bef900d35774d864e.tar.gz |
Type-checking untyped brackets
When HsExpr GhcTc, the HsBracket constructor should hold a HsBracket
GhcRn, rather than an HsBracket GhcTc.
We make use of the HsBracket p extension constructor (XBracket
(XXBracket p)) to hold an HsBracket GhcRn when the pass is GhcTc
See !4782 https://gitlab.haskell.org/ghc/ghc/-/merge_requests/4782
Diffstat (limited to 'utils')
-rw-r--r-- | utils/check-exact/ExactPrint.hs | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/utils/check-exact/ExactPrint.hs b/utils/check-exact/ExactPrint.hs index 2c96ff49ea..ee8130df3a 100644 --- a/utils/check-exact/ExactPrint.hs +++ b/utils/check-exact/ExactPrint.hs @@ -1846,8 +1846,6 @@ instance ExactPrint (HsExpr GhcPs) where getAnnotationEntry (ExprWithTySig an _ _) = fromAnn an getAnnotationEntry (ArithSeq an _ _) = fromAnn an getAnnotationEntry (HsBracket an _) = fromAnn an - getAnnotationEntry (HsRnBracketOut{}) = NoEntryVal - getAnnotationEntry (HsTcBracketOut{}) = NoEntryVal getAnnotationEntry (HsSpliceE an _) = fromAnn an getAnnotationEntry (HsProc an _ _) = fromAnn an getAnnotationEntry (HsStatic an _) = fromAnn an |