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/GHC/Core/FVs.hs | |
| parent | 26328a688183e3af49b5ac315b27afc2691bbc46 (diff) | |
| download | haskell-0107f3568d060b4c979aa3740465c4f6ca4c2bba.tar.gz | |
rename Tickish to CoreTickish
Diffstat (limited to 'compiler/GHC/Core/FVs.hs')
| -rw-r--r-- | compiler/GHC/Core/FVs.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Core/FVs.hs b/compiler/GHC/Core/FVs.hs index 8baa5f26f8..c1b4a49bbb 100644 --- a/compiler/GHC/Core/FVs.hs +++ b/compiler/GHC/Core/FVs.hs @@ -290,7 +290,7 @@ rhs_fvs (bndr, rhs) = expr_fvs rhs `unionFV` exprs_fvs :: [CoreExpr] -> FV exprs_fvs exprs = mapUnionFV expr_fvs exprs -tickish_fvs :: Tickish -> FV +tickish_fvs :: CoreTickish -> FV tickish_fvs (Breakpoint _ _ ids) = FV.mkFVs ids tickish_fvs _ = emptyFV |