diff options
| author | Luite Stegeman <stegeman@gmail.com> | 2021-01-24 14:16:16 +0100 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-03-20 07:49:15 -0400 |
| commit | 0107f3568d060b4c979aa3740465c4f6ca4c2bba (patch) | |
| tree | f17a570bedb397e1211b69cf03cd1cb05e3148cf /compiler/Language | |
| parent | 26328a688183e3af49b5ac315b27afc2691bbc46 (diff) | |
| download | haskell-0107f3568d060b4c979aa3740465c4f6ca4c2bba.tar.gz | |
rename Tickish to CoreTickish
Diffstat (limited to 'compiler/Language')
| -rw-r--r-- | compiler/Language/Haskell/Syntax/Binds.hs | 4 | ||||
| -rw-r--r-- | compiler/Language/Haskell/Syntax/Expr.hs | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/compiler/Language/Haskell/Syntax/Binds.hs b/compiler/Language/Haskell/Syntax/Binds.hs index 6f7283be86..ebd93d3ecd 100644 --- a/compiler/Language/Haskell/Syntax/Binds.hs +++ b/compiler/Language/Haskell/Syntax/Binds.hs @@ -227,7 +227,7 @@ data HsBindLR idL idR fun_matches :: MatchGroup idR (LHsExpr idR), -- ^ The payload - fun_tick :: [Tickish Id] -- ^ Ticks to put on the rhs, if any + fun_tick :: [CoreTickish] -- ^ Ticks to put on the rhs, if any } -- | Pattern Binding @@ -247,7 +247,7 @@ data HsBindLR idL idR pat_ext :: XPatBind idL idR, -- ^ See Note [Bind free vars] pat_lhs :: LPat idL, pat_rhs :: GRHSs idR (LHsExpr idR), - pat_ticks :: ([Tickish Id], [[Tickish Id]]) + pat_ticks :: ([CoreTickish], [[CoreTickish]]) -- ^ Ticks to put on the rhs, if any, and ticks to put on -- the bound variables. } diff --git a/compiler/Language/Haskell/Syntax/Expr.hs b/compiler/Language/Haskell/Syntax/Expr.hs index cb84d25489..5e8714faf4 100644 --- a/compiler/Language/Haskell/Syntax/Expr.hs +++ b/compiler/Language/Haskell/Syntax/Expr.hs @@ -595,7 +595,7 @@ data HsExpr p | HsTick (XTick p) - (Tickish (IdP p)) + CoreTickish (LHsExpr p) -- sub-expression | HsBinTick |