Simon Peyton Jones pushed to branch wip/T20264 at Glasgow Haskell Compiler / GHC
Commits:
-
384b62be
by Simon Peyton Jones at 2025-04-22T20:20:55+01:00
1 changed file:
Changes:
... | ... | @@ -656,7 +656,7 @@ stableUnfoldingFVs unf |
656 | 656 | | otherwise = Nothing
|
657 | 657 | |
658 | 658 | unfoldingFVs :: Unfolding -> FV
|
659 | -unfoldingFVs (CoreUnfolding { uf_tmpl = rhs, uf_src = src })
|
|
659 | +unfoldingFVs (CoreUnfolding { uf_tmpl = rhs })
|
|
660 | 660 | = exprFVs rhs
|
661 | 661 | unfoldingFVs (DFunUnfolding { df_bndrs = bndrs, df_args = args })
|
662 | 662 | = FV.delFVs (mkVarSet bndrs) $ exprsFVs args
|