diff options
author | Magnus Lång <[email protected]> | 2016-06-16 16:50:46 +0200 |
---|---|---|
committer | Magnus Lång <[email protected]> | 2016-08-30 17:21:20 +0200 |
commit | a19e3f0e1e82b793d58f9ef0db907ba637793fb6 (patch) | |
tree | c71d9bb46da12e8ce9182969caa0e8d65bb0eacb /lib/hipe/sparc/hipe_sparc_ra_ls.erl | |
parent | 265b7f707273ad4dc73dd9d44007d417fc828774 (diff) | |
download | otp-a19e3f0e1e82b793d58f9ef0db907ba637793fb6.tar.gz otp-a19e3f0e1e82b793d58f9ef0db907ba637793fb6.tar.bz2 otp-a19e3f0e1e82b793d58f9ef0db907ba637793fb6.zip |
hipe_sparc: 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_sparc_main.
Diffstat (limited to 'lib/hipe/sparc/hipe_sparc_ra_ls.erl')
-rw-r--r-- | lib/hipe/sparc/hipe_sparc_ra_ls.erl | 15 |
1 files changed, 6 insertions, 9 deletions
diff --git a/lib/hipe/sparc/hipe_sparc_ra_ls.erl b/lib/hipe/sparc/hipe_sparc_ra_ls.erl index f2bceb8f2c..ced9addd31 100644 --- a/lib/hipe/sparc/hipe_sparc_ra_ls.erl +++ b/lib/hipe/sparc/hipe_sparc_ra_ls.erl @@ -23,14 +23,11 @@ -module(hipe_sparc_ra_ls). -export([ra/3]). -ra(Defun, SpillIndex, Options) -> - NewDefun = Defun, %% hipe_${ARCH}_ra_rename:rename(Defun,Options), - CFG = hipe_sparc_cfg:init(NewDefun), +ra(CFG, SpillIndex, Options) -> SpillLimit = hipe_sparc_specific:number_of_temporaries(CFG), - alloc(NewDefun, SpillIndex, SpillLimit, Options). + alloc(CFG, SpillIndex, SpillLimit, Options). -alloc(Defun, SpillIndex, SpillLimit, Options) -> - CFG = hipe_sparc_cfg:init(Defun), +alloc(CFG, SpillIndex, SpillLimit, Options) -> {Coloring, _NewSpillIndex, Liveness} = regalloc( CFG, @@ -41,16 +38,16 @@ alloc(Defun, SpillIndex, SpillLimit, Options) -> [hipe_sparc_cfg:start_label(CFG)], SpillIndex, SpillLimit, Options, hipe_sparc_specific), - {NewDefun, _DidSpill} = + {NewCFG, _DidSpill} = hipe_sparc_ra_postconditions:check_and_rewrite( - Defun, Coloring, 'linearscan'), + CFG, Coloring, 'linearscan'), TempMap = hipe_temp_map:cols2tuple(Coloring, hipe_sparc_specific), {TempMap2,_NewSpillIndex2} = hipe_spillmin:stackalloc(CFG, Liveness, [], SpillIndex, Options, hipe_sparc_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( |