aboutsummaryrefslogtreecommitdiff
path: root/gcc/config
diff options
context:
space:
mode:
authorJohn David Anglin <dave.anglin@nrc-cnrc.gc.ca>2008-10-27 01:16:13 +0000
committerJohn David Anglin <danglin@gcc.gnu.org>2008-10-27 01:16:13 +0000
commitc3e39a4729808963ecc5426ce563628568c2c4ba (patch)
tree541af0fd2a2ae0e907f4c46a871c14947f066ffa /gcc/config
parent0c3c56b780a44c8f23da4e224fca3690f465ea3a (diff)
downloadgcc-c3e39a4729808963ecc5426ce563628568c2c4ba.zip
gcc-c3e39a4729808963ecc5426ce563628568c2c4ba.tar.gz
gcc-c3e39a4729808963ecc5426ce563628568c2c4ba.tar.bz2
re PR middle-end/37316 (Small structs are not passed correctly on hppa64-*-*)
2008-10-26 John David Anglin <dave.anglin@nrc-cnrc.gc.ca> PR middle-end/37316 * pa.c (function_arg_padding): Pad complex and vector types upward in 64-bit runtime. (function_arg): Use BLKmode for PARALLEL in 64-bit runtime. From-SVN: r141380
Diffstat (limited to 'gcc/config')
-rw-r--r--gcc/config/pa/pa.c8
1 files changed, 6 insertions, 2 deletions
diff --git a/gcc/config/pa/pa.c b/gcc/config/pa/pa.c
index 3d3c96d..e06a2ec 100644
--- a/gcc/config/pa/pa.c
+++ b/gcc/config/pa/pa.c
@@ -5888,7 +5888,11 @@ enum direction
function_arg_padding (enum machine_mode mode, const_tree type)
{
if (mode == BLKmode
- || (TARGET_64BIT && type && AGGREGATE_TYPE_P (type)))
+ || (TARGET_64BIT
+ && type
+ && (AGGREGATE_TYPE_P (type)
+ || TREE_CODE (type) == COMPLEX_TYPE
+ || TREE_CODE (type) == VECTOR_TYPE)))
{
/* Return none if justification is not required. */
if (type
@@ -9277,7 +9281,7 @@ function_arg (CUMULATIVE_ARGS *cum, enum machine_mode mode, tree type,
offset += 8;
}
- return gen_rtx_PARALLEL (mode, gen_rtvec_v (ub, loc));
+ return gen_rtx_PARALLEL (BLKmode, gen_rtvec_v (ub, loc));
}
}
else