diff options
| author | Matthew Pickering <matthewtpickering@gmail.com> | 2016-08-03 14:22:21 +0100 |
|---|---|---|
| committer | Matthew Pickering <matthewtpickering@gmail.com> | 2016-08-03 15:58:52 +0100 |
| commit | 7a8ef01920731f0afa45f3589fcb4a89d5eb125c (patch) | |
| tree | 05822c7510392f02fc552f077b17942a8953c73f /compiler/vectorise | |
| parent | 7a06b220447ecaf603e3c9d420ecb34b9d5609f1 (diff) | |
| download | haskell-7a8ef01920731f0afa45f3589fcb4a89d5eb125c.tar.gz | |
Remove `setUnfoldingInfoLazily`
The definition of `setUnfoldingInfoLazily` is exactly the same as
`setUnfoldingInfo` and is only used in one place, `TcIface`.
They were made equivalent in 2010 in
2ff2497dc374175b8ed81446258baf208d1f3e6e with the commit message.
{{{
commit 2ff2497dc374175b8ed81446258baf208d1f3e6e
Author: Ian Lynagh <igloo@earth.li> Wed Oct 20 15:37:10 2010
Committer: Ian Lynagh <igloo@earth.li> Wed Oct 20 15:37:10 2010
Original File: compiler/basicTypes/IdInfo.lhs
Don't seq unfoldings
We generate intermediate unfoldings which are just thrown away, so
evaluating them is a waste of time.
}}}
Closes #12453
Diffstat (limited to 'compiler/vectorise')
| -rw-r--r-- | compiler/vectorise/Vectorise.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/vectorise/Vectorise.hs b/compiler/vectorise/Vectorise.hs index 77561ffcd8..b78db7c6da 100644 --- a/compiler/vectorise/Vectorise.hs +++ b/compiler/vectorise/Vectorise.hs @@ -315,7 +315,7 @@ vectTopBinder var inline expr (text "Inferred type" <+> ppr vdty) } -- Make the vectorised version of binding's name, and set the unfolding used for inlining - ; var' <- liftM (`setIdUnfoldingLazily` unfolding) + ; var' <- liftM (`setIdUnfolding` unfolding) $ mkVectId var vty -- Add the mapping between the plain and vectorised name to the state. |