Skip to content

Commit 5ec337c

Browse files
Always run inlineCleanup after collapseRHSNoops (#3054)
Downstream projects fail to compile without it.
1 parent 87f2254 commit 5ec337c

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

clash-lib/src/Clash/Normalize.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -385,7 +385,7 @@ flattenCallTree (CBranch (nm,(Binding nm' sp inl pr tm r)) used) = do
385385
-- See [Note] relation `collapseRHSNoops` and `inlineCleanup`
386386
-- Note that we do this as the very last step, after all constant propagation
387387
-- has been done to avoid #3036.
388-
topdownSucR (apply "collapseRHSNoops" collapseRHSNoops) !->
388+
topdownSucR (apply "collapseRHSNoops" collapseRHSNoops) >->
389389
topdownSucR (apply "inlineCleanup" inlineCleanup)
390390

391391
goCheap c@(CLeaf (nm2,(Binding _ _ inl2 _ e _)))

0 commit comments

Comments
 (0)