diff options
| author | romes <rodrigo.m.mesquita@gmail.com> | 2022-03-16 22:51:14 +0000 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2022-03-18 05:10:58 -0400 |
| commit | ac3b2e7deb0e2987ae3f27d62c03716de46ebc79 (patch) | |
| tree | 2870ede7f20e7980e867c49c05a570015f334ead /compiler/GHC/Iface/Ext/Ast.hs | |
| parent | b056adc8062b4fe015450a21eb70e32dcf7023f5 (diff) | |
| download | haskell-ac3b2e7deb0e2987ae3f27d62c03716de46ebc79.tar.gz | |
TTG: TH brackets finishing touches
Rewrite the critical notes and fix outdated ones,
use `HsQuote GhcRn` (in `HsBracketTc`) for desugaring regardless of the
bracket being typed or untyped,
remove unused `EpAnn` from `Hs*Bracket GhcRn`,
zonkExpr factor out common brackets code,
ppr_expr factor out common brackets code,
and fix tests,
to finish MR https://gitlab.haskell.org/ghc/ghc/-/merge_requests/4782.
-------------------------
Metric Decrease:
hard_hole_fits
-------------------------
Diffstat (limited to 'compiler/GHC/Iface/Ext/Ast.hs')
| -rw-r--r-- | compiler/GHC/Iface/Ext/Ast.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/GHC/Iface/Ext/Ast.hs b/compiler/GHC/Iface/Ext/Ast.hs index 9ce99f3fdb..60885ae7ee 100644 --- a/compiler/GHC/Iface/Ext/Ast.hs +++ b/compiler/GHC/Iface/Ext/Ast.hs @@ -1192,9 +1192,9 @@ instance HiePass p => ToHie (LocatedA (HsExpr (GhcPass p))) where , toHie p ] HsUntypedBracket xbracket b -> case hiePass @p of - HieRn | (_, p) <- xbracket -> + HieRn -> [ toHie b - , toHie p + , toHie xbracket ] HieTc | HsBracketTc _ _ _ p <- xbracket -> [ toHie b |