diff options
| author | Kostis Sagonas <[email protected]> | 2016-05-27 21:20:57 +0200 |
|---|---|---|
| committer | Sverker Eriksson <[email protected]> | 2016-05-31 12:19:59 +0200 |
| commit | a23ae5013964fc82e705e65f9d57f051387070f9 (patch) | |
| tree | ca135587aa19851d627532a89556b34c1be04dc5 /lib/hipe/rtl/hipe_rtl_lcm.erl | |
| parent | 694cd826c34c1ae0f5a7aed79459edb102971934 (diff) | |
| download | otp-a23ae5013964fc82e705e65f9d57f051387070f9.tar.gz otp-a23ae5013964fc82e705e65f9d57f051387070f9.tar.bz2 otp-a23ae5013964fc82e705e65f9d57f051387070f9.zip | |
Code rewrites to avoid exported vars compiler warnings
Diffstat (limited to 'lib/hipe/rtl/hipe_rtl_lcm.erl')
| -rw-r--r-- | lib/hipe/rtl/hipe_rtl_lcm.erl | 19 |
1 files changed, 10 insertions, 9 deletions
diff --git a/lib/hipe/rtl/hipe_rtl_lcm.erl b/lib/hipe/rtl/hipe_rtl_lcm.erl index 5d5668434e..71bd06c0df 100644 --- a/lib/hipe/rtl/hipe_rtl_lcm.erl +++ b/lib/hipe/rtl/hipe_rtl_lcm.erl @@ -941,15 +941,16 @@ calc_insert_edge(NodeInfo, EdgeInfo, From, To) -> calc_delete(_, NodeInfo, []) -> NodeInfo; calc_delete(CFG, NodeInfo, [Label|Labels]) -> - case Label =:= hipe_rtl_cfg:start_label(CFG) of - true -> - NewNodeInfo = set_delete(NodeInfo, Label, ?SETS:new()); - false -> - UpExp = up_exp(NodeInfo, Label), - LaterIn = later_in(NodeInfo, Label), - Delete = ?SETS:subtract(UpExp, LaterIn), - NewNodeInfo = set_delete(NodeInfo, Label, Delete) - end, + NewNodeInfo = + case Label =:= hipe_rtl_cfg:start_label(CFG) of + true -> + set_delete(NodeInfo, Label, ?SETS:new()); + false -> + UpExp = up_exp(NodeInfo, Label), + LaterIn = later_in(NodeInfo, Label), + Delete = ?SETS:subtract(UpExp, LaterIn), + set_delete(NodeInfo, Label, Delete) + end, calc_delete(CFG, NewNodeInfo, Labels). %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |