summaryrefslogtreecommitdiff
path: root/lib/hipe/ppc/hipe_ppc_ra.erl
diff options
context:
space:
mode:
authorJohn Högberg <john@erlang.org>2020-11-05 12:31:08 +0100
committerJohn Högberg <john@erlang.org>2020-11-09 10:00:39 +0100
commite6d9d0da048513552bacbac80356e1d962431062 (patch)
tree10a8b86f3ab04e35aac9217f5857f9d59bcbf1f9 /lib/hipe/ppc/hipe_ppc_ra.erl
parent18e25cb97a4eddda8f9a440141e8b122e6430873 (diff)
downloaderlang-e6d9d0da048513552bacbac80356e1d962431062.tar.gz
otp: Remove HiPE and HiPE-related accessories
Diffstat (limited to 'lib/hipe/ppc/hipe_ppc_ra.erl')
-rw-r--r--lib/hipe/ppc/hipe_ppc_ra.erl54
1 files changed, 0 insertions, 54 deletions
diff --git a/lib/hipe/ppc/hipe_ppc_ra.erl b/lib/hipe/ppc/hipe_ppc_ra.erl
deleted file mode 100644
index b8daf72cef..0000000000
--- a/lib/hipe/ppc/hipe_ppc_ra.erl
+++ /dev/null
@@ -1,54 +0,0 @@
-%% -*- erlang-indent-level: 2 -*-
-%%
-%% Licensed under the Apache License, Version 2.0 (the "License");
-%% you may not use this file except in compliance with the License.
-%% You may obtain a copy of the License at
-%%
-%% http://www.apache.org/licenses/LICENSE-2.0
-%%
-%% Unless required by applicable law or agreed to in writing, software
-%% distributed under the License is distributed on an "AS IS" BASIS,
-%% WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-%% See the License for the specific language governing permissions and
-%% limitations under the License.
-
--module(hipe_ppc_ra).
--export([ra/2]).
-
-ra(CFG0, Options) ->
- %% hipe_ppc_pp:pp(hipe_ppc_cfg:linearise(CFG0)),
- {CFG1, _FPLiveness1, Coloring_fp, SpillIndex}
- = case proplists:get_bool(inline_fp, Options) of
- true ->
- FPLiveness0 = hipe_ppc_specific_fp:analyze(CFG0, no_context),
- hipe_regalloc_loop:ra_fp(CFG0, FPLiveness0, Options,
- hipe_coalescing_regalloc,
- hipe_ppc_specific_fp, no_context);
- false ->
- {CFG0,undefined,[],0}
- end,
- %% hipe_ppc_pp:pp(hipe_ppc_cfg:linearise(CFG1)),
- GPLiveness1 = hipe_ppc_specific:analyze(CFG1, no_context),
- {CFG2, _GPLiveness2, Coloring}
- = case proplists:get_value(regalloc, Options, coalescing) of
- coalescing ->
- ra(CFG1, GPLiveness1, SpillIndex, Options, hipe_coalescing_regalloc);
- optimistic ->
- ra(CFG1, GPLiveness1, SpillIndex, Options, hipe_optimistic_regalloc);
- graph_color ->
- ra(CFG1, GPLiveness1, SpillIndex, Options,
- hipe_graph_coloring_regalloc);
- linear_scan ->
- hipe_ppc_ra_ls:ra(CFG1, GPLiveness1, SpillIndex, Options);
- naive ->
- hipe_ppc_ra_naive:ra(CFG1, GPLiveness1, Coloring_fp, Options);
- _ ->
- exit({unknown_regalloc_compiler_option,
- proplists:get_value(regalloc,Options)})
- end,
- %% hipe_ppc_pp:pp(hipe_ppc_cfg:linearise(CFG2)),
- hipe_ppc_ra_finalise:finalise(CFG2, Coloring, Coloring_fp).
-
-ra(CFG, Liveness, SpillIndex, Options, RegAllocMod) ->
- hipe_regalloc_loop:ra(CFG, Liveness, SpillIndex, Options, RegAllocMod,
- hipe_ppc_specific, no_context).