sparc.c (function_arg_slotno): Use FLOAT_TYPE_P to detect FP fields in structures.

* config/sparc/sparc.c (function_arg_slotno): Use
	FLOAT_TYPE_P to detect FP fields in structures.
	(function_arg_record_value_1): Likewise.
	(function_arg_record_value_2): Likewise.

From-SVN: r76346
This commit is contained in:
Eric Botcazou 2004-01-22 12:15:37 +01:00 committed by Eric Botcazou
parent 0de456a50f
commit 8a98812c68
2 changed files with 16 additions and 16 deletions

View File

@ -1,3 +1,10 @@
2004-01-22 Eric Botcazou <ebotcazou@libertysurf.fr>
* config/sparc/sparc.c (function_arg_slotno): Use
FLOAT_TYPE_P to detect FP fields in structures.
(function_arg_record_value_1): Likewise.
(function_arg_record_value_2): Likewise.
2004-01-22 Jan Hubicka <jh@suse.cz>
* function.c (allocate_struct_function): Do not initialize expr, emit

View File

@ -4928,8 +4928,7 @@ function_arg_slotno (const struct sparc_args *cum, enum machine_mode mode,
{
if (TREE_CODE (field) == FIELD_DECL)
{
if (TREE_CODE (TREE_TYPE (field)) == REAL_TYPE
&& TARGET_FPU)
if (FLOAT_TYPE_P (TREE_TYPE (field)) && TARGET_FPU)
fpregs_p = 1;
else
intregs_p = 1;
@ -5029,13 +5028,10 @@ function_arg_record_value_1 (tree type, HOST_WIDE_INT startbitpos,
bitpos,
parms,
packed_p);
else if ((TREE_CODE (TREE_TYPE (field)) == REAL_TYPE
|| (TREE_CODE (TREE_TYPE (field)) == COMPLEX_TYPE
&& (TREE_CODE (TREE_TYPE (TREE_TYPE (field)))
== REAL_TYPE)))
&& TARGET_FPU
&& ! packed_p
&& parms->named)
else if (FLOAT_TYPE_P (TREE_TYPE (field))
&& TARGET_FPU
&& parms->named
&& ! packed_p)
{
if (parms->intoffset != -1)
{
@ -5170,13 +5166,10 @@ function_arg_record_value_2 (tree type, HOST_WIDE_INT startbitpos,
bitpos,
parms,
packed_p);
else if ((TREE_CODE (TREE_TYPE (field)) == REAL_TYPE
|| (TREE_CODE (TREE_TYPE (field)) == COMPLEX_TYPE
&& (TREE_CODE (TREE_TYPE (TREE_TYPE (field)))
== REAL_TYPE)))
&& TARGET_FPU
&& ! packed_p
&& parms->named)
else if (FLOAT_TYPE_P (TREE_TYPE (field))
&& TARGET_FPU
&& parms->named
&& ! packed_p)
{
int this_slotno = parms->slotno + bitpos / BITS_PER_WORD;
int regno;