diff options
author | Magnus Lång <[email protected]> | 2016-06-16 15:29:39 +0200 |
---|---|---|
committer | Magnus Lång <[email protected]> | 2016-08-30 17:21:20 +0200 |
commit | 265b7f707273ad4dc73dd9d44007d417fc828774 (patch) | |
tree | a840b29f70e31f7118dcf8339db1a760e87e0535 /lib/hipe/ppc/hipe_ppc_ra_ls.erl | |
parent | d9b091472f9afb216fe9f0c763053baf89390a6c (diff) | |
download | otp-265b7f707273ad4dc73dd9d44007d417fc828774.tar.gz otp-265b7f707273ad4dc73dd9d44007d417fc828774.tar.bz2 otp-265b7f707273ad4dc73dd9d44007d417fc828774.zip |
hipe_ppc: Minimise CFG<->linear conversions
Now, there will only ever be a single Linear->CFG conversion, just after
lowering from RTL, and only ever a single CFG->Linear conversion, just
before the finalise pass. Both of these now happen in hipe_ppc_main.
Diffstat (limited to 'lib/hipe/ppc/hipe_ppc_ra_ls.erl')
-rw-r--r-- | lib/hipe/ppc/hipe_ppc_ra_ls.erl | 15 |
1 files changed, 6 insertions, 9 deletions
diff --git a/lib/hipe/ppc/hipe_ppc_ra_ls.erl b/lib/hipe/ppc/hipe_ppc_ra_ls.erl index 58d9f70b1f..52562fc321 100644 --- a/lib/hipe/ppc/hipe_ppc_ra_ls.erl +++ b/lib/hipe/ppc/hipe_ppc_ra_ls.erl @@ -23,14 +23,11 @@ -module(hipe_ppc_ra_ls). -export([ra/3]). -ra(Defun, SpillIndex, Options) -> - NewDefun = Defun, %% hipe_${ARCH}_ra_rename:rename(Defun,Options), - CFG = hipe_ppc_cfg:init(NewDefun), +ra(CFG, SpillIndex, Options) -> SpillLimit = hipe_ppc_specific:number_of_temporaries(CFG), - alloc(NewDefun, SpillIndex, SpillLimit, Options). + alloc(CFG, SpillIndex, SpillLimit, Options). -alloc(Defun, SpillIndex, SpillLimit, Options) -> - CFG = hipe_ppc_cfg:init(Defun), +alloc(CFG, SpillIndex, SpillLimit, Options) -> {Coloring, _NewSpillIndex, Liveness} = regalloc( CFG, @@ -41,16 +38,16 @@ alloc(Defun, SpillIndex, SpillLimit, Options) -> [hipe_ppc_cfg:start_label(CFG)], SpillIndex, SpillLimit, Options, hipe_ppc_specific), - {NewDefun, _DidSpill} = + {NewCFG, _DidSpill} = hipe_ppc_ra_postconditions:check_and_rewrite( - Defun, Coloring, 'linearscan'), + CFG, Coloring, 'linearscan'), TempMap = hipe_temp_map:cols2tuple(Coloring, hipe_ppc_specific), {TempMap2,_NewSpillIndex2} = hipe_spillmin:stackalloc(CFG, Liveness, [], SpillIndex, Options, hipe_ppc_specific, TempMap), Coloring2 = hipe_spillmin:mapmerge(hipe_temp_map:to_substlist(TempMap), TempMap2), - {NewDefun, Coloring2}. + {NewCFG, Coloring2}. regalloc(CFG, PhysRegs, Entrypoints, SpillIndex, DontSpill, Options, Target) -> hipe_ls_regalloc:regalloc( |