diff options
| author | romes <rodrigo.m.mesquita@gmail.com> | 2022-03-19 13:14:54 +0000 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2022-06-01 07:44:44 -0400 |
| commit | 392ce3fca5d33688add52309a05914efa163e6f6 (patch) | |
| tree | ff44e98cc1b7e6027034b97f24c03aa94896f5f0 /compiler/GHC/Hs | |
| parent | a720322f417547f85ae22b1930721e8cab8de281 (diff) | |
| download | haskell-392ce3fca5d33688add52309a05914efa163e6f6.tar.gz | |
Move UntypedSpliceFlavour from L.H.S to GHC.Hs
UntypedSpliceFlavour was only used in the client-specific `GHC.Hs.Expr`
but was defined in the client-independent L.H.S.Expr.
Diffstat (limited to 'compiler/GHC/Hs')
| -rw-r--r-- | compiler/GHC/Hs/Expr.hs | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/compiler/GHC/Hs/Expr.hs b/compiler/GHC/Hs/Expr.hs index 6f57eb5304..274b5dfcb3 100644 --- a/compiler/GHC/Hs/Expr.hs +++ b/compiler/GHC/Hs/Expr.hs @@ -1721,6 +1721,13 @@ instance Data DelayedSplice where -- See Note [Pending Splices] type SplicePointName = Name +data UntypedSpliceFlavour + = UntypedExpSplice + | UntypedPatSplice + | UntypedTypeSplice + | UntypedDeclSplice + deriving Data + -- | Pending Renamer Splice data PendingRnSplice = PendingRnSplice UntypedSpliceFlavour SplicePointName (LHsExpr GhcRn) |