diff options
Diffstat (limited to 'Optimiser.hs')
| -rw-r--r-- | Optimiser.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/Optimiser.hs b/Optimiser.hs index a349803..a6c5e10 100644 --- a/Optimiser.hs +++ b/Optimiser.hs @@ -14,6 +14,7 @@ optimise :: IRProgram -> IRProgram optimise (IRProgram bbs gfds datas) = let optf = foldl (.) id [ tailCallIntro + , deadBBElim gfds, mergeRets , deadStoreElim, deadBBElim gfds , map propAssigns , mergeRets, mergeBlocks] |