From 0107f3568d060b4c979aa3740465c4f6ca4c2bba Mon Sep 17 00:00:00 2001 From: Luite Stegeman Date: Sun, 24 Jan 2021 14:16:16 +0100 Subject: rename Tickish to CoreTickish --- compiler/Language/Haskell/Syntax/Binds.hs | 4 ++-- compiler/Language/Haskell/Syntax/Expr.hs | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) (limited to 'compiler/Language') 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 -- cgit v1.2.1