diff options
| author | Andrea Condoluci <andrea.condoluci@tweag.io> | 2021-09-27 09:47:29 +0000 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-09-30 00:57:09 -0400 |
| commit | 205f0f921590a6365ed1c36d34f557a1e387bfa2 (patch) | |
| tree | d6b85511dc4f1163f22cfeb91fceb39d890a9ddc /compiler/Language/Haskell | |
| parent | c261f2207cf85c8770dc46fcfc46e9b1ddb49589 (diff) | |
| download | haskell-205f0f921590a6365ed1c36d34f557a1e387bfa2.tar.gz | |
Trees That Grow refactor for HsTick and HsBinTick
Move HsTick and HsBinTick to XExpr, the extension tree of HsExpr.
Part of #16830 .
Diffstat (limited to 'compiler/Language/Haskell')
| -rw-r--r-- | compiler/Language/Haskell/Syntax/Expr.hs | 15 |
1 files changed, 0 insertions, 15 deletions
diff --git a/compiler/Language/Haskell/Syntax/Expr.hs b/compiler/Language/Haskell/Syntax/Expr.hs index 29769b6e93..563505e373 100644 --- a/compiler/Language/Haskell/Syntax/Expr.hs +++ b/compiler/Language/Haskell/Syntax/Expr.hs @@ -40,7 +40,6 @@ import GHC.Types.Basic import GHC.Types.Fixity import GHC.Types.SourceText import GHC.Types.SrcLoc -import GHC.Types.Tickish import GHC.Unit.Module (ModuleName) import GHC.Utils.Outputable import GHC.Utils.Panic @@ -638,20 +637,6 @@ data HsExpr p (LHsExpr p) -- Body --------------------------------------- - -- Haskell program coverage (Hpc) Support - - | HsTick - (XTick p) - CoreTickish - (LHsExpr p) -- sub-expression - - | HsBinTick - (XBinTick p) - Int -- module-local tick number for True - Int -- module-local tick number for False - (LHsExpr p) -- sub-expression - - --------------------------------------- -- Expressions annotated with pragmas, written as {-# ... #-} | HsPragE (XPragE p) (HsPragE p) (LHsExpr p) |