mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-02-21 04:49:13 +08:00
Code Issues Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source 
From-SVN: r171
This commit is contained in:
Richard Kenner 1992-01-08 06:09:52 -05:00
parent c54f9cf994
commit 7d0e3dd45e
1 changed files with 27 additions and 26 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

53
gcc/reg-stack.c
View File

@ -145,8 +145,7 @@ static HARD_REG_SET *block_out_reg_set;
static short *block_number;
/* This is the register file for all register after conversion */
static rtx SFmode_reg[FIRST_PSEUDO_REGISTER];
static rtx DFmode_reg[FIRST_PSEUDO_REGISTER];
static rtx FP_mode_reg[FIRST_PSEUDO_REGISTER][(int) MAX_MACHINE_MODE];
/* ??? set of register to delete after ASM_OPERAND */
HARD_REG_SET asm_regs;
@ -165,8 +164,6 @@ extern rtx find_regno_note ();
extern rtx emit_jump_insn_before ();
extern rtx emit_label_after ();
extern rtx dconst0_rtx;
/* Forward declarations */
static void find_blocks ();
@ -225,15 +222,15 @@ reg_to_stack (first, file)
register rtx insn;
register int i;
int stack_reg_seen = 0;
enum machine_mode mode;
current_function_returns_real
= TREE_CODE (TREE_TYPE (DECL_RESULT (current_function_decl))) == REAL_TYPE;
for (i = 0; i < FIRST_PSEUDO_REGISTER; i++)
{
SFmode_reg[i] = gen_rtx (REG, SFmode, i);
DFmode_reg[i] = gen_rtx (REG, DFmode, i);
}
for (mode = GET_CLASS_NARROWEST_MODE (MODE_FLOAT); mode != VOIDmode;
mode = GET_MODE_WIDER_MODE (mode))
for (i = 0; i < FIRST_PSEUDO_REGISTER; i++)
FP_mode_reg[i][(int) mode] = gen_rtx (REG, mode, i);
/* Count the basic blocks. Also find maximum insn uid. */
{
@ -599,7 +596,8 @@ record_reg_life (insn, block, regstack)
cannot be used on these insns, because they do not appear in
block_number[]. */
pat = gen_rtx (SET, VOIDmode, DFmode_reg[reg], dconst0_rtx);
pat = gen_rtx (SET, VOIDmode, FP_mode_reg[reg][(int) DFmode],
CONST0_RTX (DFmode));
init = emit_insn_after (pat, insn);
PUT_MODE (init, QImode);
@ -839,7 +837,8 @@ stack_reg_life_analysis (first)
{
rtx init_rtx;
init_rtx = gen_rtx (SET, VOIDmode, DFmode_reg[reg], dconst0_rtx);
init_rtx = gen_rtx (SET, VOIDmode, FP_mode_reg[reg][(int) DFmode],
CONST0_RTX (DFmode));
block_begin[0] = emit_insn_after (init_rtx, first);
PUT_MODE (block_begin[0], QImode);
@ -867,12 +866,10 @@ replace_reg (reg, regno)
|| ! STACK_REG_P (*reg))
abort ();
if (GET_MODE (*reg) == DFmode)
*reg = DFmode_reg[regno];
else if (GET_MODE (*reg) == SFmode)
*reg = SFmode_reg[regno];
else
abort ();
if (GET_MODE_CLASS (GET_MODE (*reg)) != MODE_FLOAT)
abort;
*reg = FP_mode_reg[regno][(int) GET_MODE (*reg)];
}
/* Remove a note of type NOTE, which must be found, for register
@ -957,14 +954,14 @@ emit_pop_insn (insn, regstack, reg, when)
if (hard_regno < FIRST_STACK_REG)
abort ();
pop_rtx = gen_rtx (SET, VOIDmode, DFmode_reg[hard_regno],
DFmode_reg[FIRST_STACK_REG]);
pop_rtx = gen_rtx (SET, VOIDmode, FP_mode_reg[hard_regno][(int) DFmode],
FP_mode_reg[FIRST_STACK_REG][(int) DFmode]);
pop_insn = (*when) (pop_rtx, insn);
PUT_MODE (pop_insn, VOIDmode);
REG_NOTES (pop_insn) = gen_rtx (EXPR_LIST,
REG_DEAD, DFmode_reg[FIRST_STACK_REG],
REG_NOTES (pop_insn) = gen_rtx (EXPR_LIST, REG_DEAD,
FP_mode_reg[FIRST_STACK_REG][(int) DFmode],
REG_NOTES (pop_insn));
regstack->reg[regstack->top - (hard_regno - FIRST_STACK_REG)]
@ -997,7 +994,8 @@ emit_hard_swap_insn (insn, regstack, hard_regno, when)
if (hard_regno == FIRST_STACK_REG)
return;
swap_rtx = gen_swapdf (DFmode_reg[hard_regno], DFmode_reg[FIRST_STACK_REG]);
swap_rtx = gen_swapdf (FP_mode_reg[hard_regno][(int) DFmode],
FP_mode_reg[FIRST_STACK_REG][(int) DFmode]);
swap_insn = (*when) (swap_rtx, insn);
PUT_MODE (swap_insn, VOIDmode);
@ -1526,7 +1524,7 @@ change_stack (insn, old, new)
for (reg = old->top; reg >= 0; reg--)
if (! TEST_HARD_REG_BIT (new->reg_set, old->reg[reg]))
emit_pop_insn (insn, old, DFmode_reg[old->reg[reg]],
emit_pop_insn (insn, old, FP_mode_reg[old->reg[reg]][(int) DFmode],
emit_insn_before);
if (new->top == -2)
@ -1575,7 +1573,8 @@ change_stack (insn, old, new)
if (reg == -1)
abort ();
emit_swap_insn (insn, old, DFmode_reg[old->reg[reg]],
emit_swap_insn (insn, old,
FP_mode_reg[old->reg[reg]][(int) DFmode],
emit_insn_before);
}
@ -1586,7 +1585,8 @@ change_stack (insn, old, new)
for (reg = new->top; reg >= 0; reg--)
if (new->reg[reg] != old->reg[reg])
{
emit_swap_insn (insn, old, DFmode_reg[old->reg[reg]],
emit_swap_insn (insn, old,
FP_mode_reg[old->reg[reg]][(int) DFmode],
emit_insn_before);
break;
}
@ -1791,7 +1791,8 @@ convert_regs ()
for (reg = regstack.top; reg >= 0; reg--)
if (! current_function_returns_real
|| regstack.reg[reg] != FIRST_STACK_REG)
insn = emit_pop_insn (insn, &regstack, DFmode_reg[regstack.reg[reg]],
insn = emit_pop_insn (insn, &regstack,
FP_mode_reg[regstack.reg[reg]][(int) DFmode],
emit_insn_after);
}