contrib/gcc/reg-stack.c

927 swap_to_top (rtx insn, stack regstack, rtx src1, rtx src2)
935   regno = get_hard_regnum (&temp_stack, src1);
1251   rtx *src1, *src2;
1254   src1 = get_true_reg (&XEXP (pat_src, 0));
1259   if ((! STACK_REG_P (*src1)
1269       src1 = get_true_reg (&XEXP (pat_src, 0));
1277   src1_note = find_regno_note (insn, REG_DEAD, REGNO (*src1));
1284   emit_swap_insn (insn, regstack, *src1);
1286   replace_reg (src1, FIRST_STACK_REG);
1302       && ! (STACK_REG_P (*src1) && STACK_REG_P (*src2)
1303 	    && REGNO (*src1) == REGNO (*src2)))
1307 	 we have already popped src1, "next to top of stack" is really
1420 	rtx *src1 = (rtx *) 0, *src2;
1460 	    src1 = src;
1473 	    if (src1 == 0)
1474 	      src1 = get_true_reg (&XEXP (pat_src, 0));
1476 	    emit_swap_insn (insn, regstack, *src1);
1478 	    src1_note = find_regno_note (insn, REG_DEAD, REGNO (*src1));
1487 		CLEAR_HARD_REG_BIT (regstack->reg_set, REGNO (*src1));
1490 	    replace_reg (src1, FIRST_STACK_REG);
1505 	    src1 = get_true_reg (&XEXP (pat_src, 0));
1510 	    if (STACK_REG_P (*src1))
1511 	      src1_note = find_regno_note (insn, REG_DEAD, REGNO (*src1));
1522 	    if (! STACK_REG_P (*src1) || ! STACK_REG_P (*src2))
1532 		src1_hard_regnum = get_hard_regnum (regstack, *src1);
1542 	    if (STACK_REG_P (*src1))
1543 	      replace_reg (src1, get_hard_regnum (regstack, *src1));
1610 		&& REG_P (*src1) && REG_P (*src2)
1611 		&& REGNO (*src1) != REGNO (*dest))
1613 		int tmp = REGNO (*src1);
1614 		replace_reg (src1, REGNO (*src2));
1629 		src1 = get_true_reg (&XVECEXP (pat_src, 0, 0));
1630 		emit_swap_insn (insn, regstack, *src1);
1632 		src1_note = find_regno_note (insn, REG_DEAD, REGNO (*src1));
1641 		    CLEAR_HARD_REG_BIT (regstack->reg_set, REGNO (*src1));
1644 		replace_reg (src1, FIRST_STACK_REG);
1659 		src1 = get_true_reg (&XVECEXP (pat_src, 0, 0));
1661 		emit_swap_insn (insn, regstack, *src1);
1665 		src1_note = find_regno_note (insn, REG_DEAD, REGNO (*src1));
1671 		replace_reg (src1, FIRST_STACK_REG);
1679 		src1 = get_true_reg (&XVECEXP (pat_src, 0, 0));
1682 		src1_note = find_regno_note (insn, REG_DEAD, REGNO (*src1));
1685 		swap_to_top (insn, regstack, *src1, *src2);
1687 		replace_reg (src1, FIRST_STACK_REG);
1714 		src1 = get_true_reg (&XVECEXP (pat_src, 0, 0));
1717 		src1_note = find_regno_note (insn, REG_DEAD, REGNO (*src1));
1725 		swap_to_top (insn, regstack, *src1, *src2);
1735 		replace_reg (src1, FIRST_STACK_REG);
1745 		src1 = get_true_reg (&XVECEXP (pat_src, 0, 0));
1748 		src1_note = find_regno_note (insn, REG_DEAD, REGNO (*src1));
1756 		swap_to_top (insn, regstack, *src1, *src2);
1766 		replace_reg (src1, FIRST_STACK_REG);
1776 		src1 = get_true_reg (&XVECEXP (pat_src, 0, 0));
1778 		emit_swap_insn (insn, regstack, *src1);
1782 		src1_note = find_regno_note (insn, REG_DEAD, REGNO (*src1));
1793 		replace_reg (src1, FIRST_STACK_REG);
1802 		src1 = get_true_reg (&XVECEXP (pat_src, 0, 0));
1804 		emit_swap_insn (insn, regstack, *src1);
1808 		src1_note = find_regno_note (insn, REG_DEAD, REGNO (*src1));
1821 		replace_reg (src1, FIRST_STACK_REG);
1852 	    src1 = get_true_reg (&XEXP (pat_src, 1));
1855 	    src1_note = find_regno_note (insn, REG_DEAD, REGNO (*src1));
1869 		if ((REGNO (*src1) == regstack->reg[regstack->top]
1874 		    int idx1 = (get_hard_regnum (regstack, *src1)
1882 		    regstack->reg[regstack->top - idx2] = REGNO (*src1);
1901 	      if (STACK_REG_P (*src1))
1902 		replace_reg (src1, get_hard_regnum (regstack, *src1));