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 /compiler/Language | |
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 'compiler/Language')
-rw-r--r-- | compiler/Language/Haskell/Syntax/Expr.hs | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/compiler/Language/Haskell/Syntax/Expr.hs b/compiler/Language/Haskell/Syntax/Expr.hs index 12fdfffe48..dd3e8b4545 100644 --- a/compiler/Language/Haskell/Syntax/Expr.hs +++ b/compiler/Language/Haskell/Syntax/Expr.hs @@ -593,7 +593,7 @@ data HsExpr p -- 'GHC.Parser.Annotation.AnnClose','GHC.Parser.Annotation.AnnCloseQ' -- For details on above see Note [exact print annotations] in GHC.Parser.Annotation - | HsBracket (XBracket p) (HsBracketBody p) + | HsBracket (XBracket p) (HsBracket p) -- | - 'GHC.Parser.Annotation.AnnKeywordId' : 'GHC.Parser.Annotation.AnnOpen', -- 'GHC.Parser.Annotation.AnnClose' @@ -636,9 +636,6 @@ data HsExpr p -- we paper it over with this new extension point. type family HsDoRn p --- TODO: Temporary fix for HsBracket GhcTc body should be HsBracket GhcRn -type family HsBracketBody p - -- --------------------------------------------------------------------- data DotFieldOcc p |