From ac8bc93ea6f5d34237316f60004dd336f6a2b817 Mon Sep 17 00:00:00 2001 From: Pranav Bhandarkar Date: Mon, 10 Dec 2007 01:01:03 +0000 Subject: [PATCH] caller-save.c (insert_one_insn): If inserting before a call_insn then the registers containing the arguments of... * caller-save.c (insert_one_insn): If inserting before a call_insn then the registers containing the arguments of the call are live_throughout in the new insn. Co-Authored-By: Hans-Peter Nilsson From-SVN: r130733 --- gcc/ChangeLog | 7 +++++++ gcc/caller-save.c | 32 ++++++++++++++++++++++++++++++++ 2 files changed, 39 insertions(+) diff --git a/gcc/ChangeLog b/gcc/ChangeLog index b3bb96efc08..11088fdc8f0 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,10 @@ +2007-12-10 Pranav Bhandarkar + Hans-Peter Nilsson + + * caller-save.c (insert_one_insn): If inserting before a call_insn + then the registers containing the arguments of the call are + live_throughout in the new insn. + 2007-12-09 John David Anglin PR middle-end/32889 diff --git a/gcc/caller-save.c b/gcc/caller-save.c index 26ac50eadd1..7976fd5fd75 100644 --- a/gcc/caller-save.c +++ b/gcc/caller-save.c @@ -850,6 +850,38 @@ insert_one_insn (struct insn_chain *chain, int before_p, int code, rtx pat) SET_REGNO_REG_SET (&new->live_throughout, regno + i); } } + + /* If CHAIN->INSN is a call, then the registers which contain + the arguments to the function are live in the new insn. */ + if (CALL_P (chain->insn)) + { + for (link = CALL_INSN_FUNCTION_USAGE (chain->insn); + link != NULL_RTX; + link = XEXP (link, 1)) + { + rtx arg = XEXP (link, 0); + + if (GET_CODE (arg) == USE) + { + rtx reg = XEXP (arg, 0); + + if (REG_P (reg)) + { + int i, regno = REGNO (reg); + + /* Registers in CALL_INSN_FUNCTION_USAGE are always + hard registers. */ + gcc_assert (regno < FIRST_PSEUDO_REGISTER); + + for (i = hard_regno_nregs[regno][GET_MODE (reg)] - 1; + i >= 0; i--) + SET_REGNO_REG_SET (&new->live_throughout, regno + i); + } + } + } + + } + CLEAR_REG_SET (&new->dead_or_set); if (chain->insn == BB_HEAD (BASIC_BLOCK (chain->block))) BB_HEAD (BASIC_BLOCK (chain->block)) = new->insn; -- 2.30.2