void
fma_node::rename (fma_forest *forest)
{
int cur_parity, target_parity;
/* This is alternate root of a chain and thus has no children. It will be
renamed when processing the canonical root for that chain. */
if (!this->m_head)
return;
target_parity = forest->get_target_parity ();
if (this->m_parent)
target_parity = this->m_parent->get_parity ();
cur_parity = this->get_parity ();
/* Rename if parity differs. */
if (cur_parity != target_parity)
{
rtx_insn *insn = this->m_insn;
HARD_REG_SET unavailable;
enum machine_mode mode;
int reg;
if (dump_file)
{
unsigned cur_dest_reg = this->m_head->regno;
fprintf (dump_file, "FMA or FMUL at insn %d but destination "
"register (%s) has different parity from expected to "
"maximize FPU pipeline utilization\n", INSN_UID (insn),
reg_names[cur_dest_reg]);
}
/* Don't clobber traceback for noreturn functions. */
CLEAR_HARD_REG_SET (unavailable);
if (frame_pointer_needed)
{
add_to_hard_reg_set (&unavailable, Pmode, FRAME_POINTER_REGNUM);
add_to_hard_reg_set (&unavailable, Pmode, HARD_FRAME_POINTER_REGNUM);
}
/* Exclude registers with wrong parity. */
mode = GET_MODE (SET_DEST (PATTERN (insn)));
for (reg = cur_parity; reg < FIRST_PSEUDO_REGISTER; reg += 2)
add_to_hard_reg_set (&unavailable, mode, reg);
if (!rename_single_chain (this->m_head, &unavailable))
{
if (dump_file)
fprintf (dump_file, "Destination register of insn %d could not be "
"renamed. Dependent FMA insns will use this parity from "
"there on.\n", INSN_UID (insn));
}
else
cur_parity = target_parity;
}
forest->get_globals ()->update_balance (cur_parity);
}
/* Return true if INSN requires the stack frame to be set up.
PROLOGUE_USED contains the hard registers used in the function
prologue. SET_UP_BY_PROLOGUE is the set of registers we expect the
prologue to set up for the function. */
bool
requires_stack_frame_p (rtx_insn *insn, HARD_REG_SET prologue_used,
HARD_REG_SET set_up_by_prologue)
{
df_ref def, use;
HARD_REG_SET hardregs;
unsigned regno;
if (CALL_P (insn))
return !SIBLING_CALL_P (insn);
/* We need a frame to get the unique CFA expected by the unwinder. */
if (cfun->can_throw_non_call_exceptions && can_throw_internal (insn))
return true;
CLEAR_HARD_REG_SET (hardregs);
FOR_EACH_INSN_DEF (def, insn)
{
rtx dreg = DF_REF_REG (def);
if (!REG_P (dreg))
continue;
add_to_hard_reg_set (&hardregs, GET_MODE (dreg),
REGNO (dreg));
}
static void
reg_becomes_live (rtx reg, const_rtx setter ATTRIBUTE_UNUSED, void *live)
{
int regno;
if (GET_CODE (reg) == SUBREG)
reg = SUBREG_REG (reg);
if (!REG_P (reg))
return;
regno = REGNO (reg);
if (regno < FIRST_PSEUDO_REGISTER)
add_to_hard_reg_set ((HARD_REG_SET *) live, GET_MODE (reg), regno);
}
