OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

s390.c (s390_call_saved_register_used, [...]): Adjust the way CALL_EXPR arguments are accessed to the new scheme. 

2007-02-19  Andreas Krebbel  <krebbel1@de.ibm.com>

	* config/s390/s390.c (s390_call_saved_register_used,
	s390_function_ok_for_sibcall): Adjust the way CALL_EXPR arguments are
	accessed to the new scheme.

From-SVN: r122129
This commit is contained in:
Andreas Krebbel 2007-02-19 14:35:10 +00:00 committed by Andreas Krebbel
parent 991c42ace3
commit 9a6f71b45c
2 changed files with 12 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/ChangeLog
View File

@ -1,3 +1,9 @@
2007-02-19 Andreas Krebbel <krebbel1@de.ibm.com>
* config/s390/s390.c (s390_call_saved_register_used,
s390_function_ok_for_sibcall): Adjust the way CALL_EXPR arguments are
accessed to the new scheme.
2007-02-19 Jan-Benedict Glaw <jbglaw@lug-owl.de>
* config/cris/cris.c (cris_movem_load_rest_p, cris_store_multiple_op_p)

18
gcc/config/s390/s390.c
View File

@ -8703,28 +8703,26 @@ s390_valid_pointer_mode (enum machine_mode mode)
return (mode == SImode || (TARGET_64BIT && mode == DImode));
}
/* Checks whether the given ARGUMENT_LIST would use a caller
/* Checks whether the given CALL_EXPR would use a caller
saved register. This is used to decide whether sibling call
optimization could be performed on the respective function
call. */
static bool
s390_call_saved_register_used (tree argument_list)
s390_call_saved_register_used (tree call_expr)
{
CUMULATIVE_ARGS cum;
tree parameter;
enum machine_mode mode;
tree type;
rtx parm_rtx;
int reg;
int reg, i;
INIT_CUMULATIVE_ARGS (cum, NULL, NULL, 0, 0);
while (argument_list)
for (i = 0; i < call_expr_nargs (call_expr); i++)
{
parameter = TREE_VALUE (argument_list);
argument_list = TREE_CHAIN (argument_list);
parameter = CALL_EXPR_ARG (call_expr, i);
gcc_assert (parameter);
/* For an undeclared variable passed as parameter we will get
@ -8780,11 +8778,7 @@ s390_function_ok_for_sibcall (tree decl, tree exp)
/* Register 6 on s390 is available as an argument register but unfortunately
"caller saved". This makes functions needing this register for arguments
not suitable for sibcalls. */
if (TREE_OPERAND (exp, 1)
&& s390_call_saved_register_used (TREE_OPERAND (exp, 1)))
return false;
return true;
return !s390_call_saved_register_used (exp);
}
/* Return the fixed registers used for condition codes. */