diff options
| author | Kostis Sagonas <[email protected]> | 2014-02-26 00:06:11 +0100 |
|---|---|---|
| committer | Kostis Sagonas <[email protected]> | 2014-02-26 00:06:11 +0100 |
| commit | c82da93ca6408eff459c379234ca7f0789160c27 (patch) | |
| tree | 591dd3d667582af840c5dec28695564ccfede5a8 /lib/hipe/regalloc/hipe_optimistic_regalloc.erl | |
| parent | 98776a40609d1fa80292d2959708a8697f8cb756 (diff) | |
| download | otp-c82da93ca6408eff459c379234ca7f0789160c27.tar.gz otp-c82da93ca6408eff459c379234ca7f0789160c27.tar.bz2 otp-c82da93ca6408eff459c379234ca7f0789160c27.zip | |
Substitude uses of lists:reverse(L1) ++ L2 with lists:reverse(L1, L2)
Diffstat (limited to 'lib/hipe/regalloc/hipe_optimistic_regalloc.erl')
| -rw-r--r-- | lib/hipe/regalloc/hipe_optimistic_regalloc.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/hipe/regalloc/hipe_optimistic_regalloc.erl b/lib/hipe/regalloc/hipe_optimistic_regalloc.erl index 5bad31ade9..0278a896d2 100644 --- a/lib/hipe/regalloc/hipe_optimistic_regalloc.erl +++ b/lib/hipe/regalloc/hipe_optimistic_regalloc.erl @@ -958,9 +958,9 @@ splits_2({Cols, NonCols, OldSpillCost}, L, SpillCost) -> %% Merge two ordered sub-splits into one. spillCostOrderedMerge(Spl1, [], Spl) -> - lists:reverse(Spl) ++ Spl1; + lists:reverse(Spl, Spl1); spillCostOrderedMerge([], Spl2, Spl) -> - lists:reverse(Spl) ++ Spl2; + lists:reverse(Spl, Spl2); spillCostOrderedMerge(Spl1, Spl2, Spl) -> {_, _, SpillCost1} = hd(Spl1), {_, _, SpillCost2} = hd(Spl2), |