diff options
author | John David Anglin <dave.anglin@nrc-cnrc.gc.ca> | 2008-10-27 01:16:13 +0000 |
---|---|---|
committer | John David Anglin <danglin@gcc.gnu.org> | 2008-10-27 01:16:13 +0000 |
commit | c3e39a4729808963ecc5426ce563628568c2c4ba (patch) | |
tree | 541af0fd2a2ae0e907f4c46a871c14947f066ffa /gcc/config/pa | |
parent | 0c3c56b780a44c8f23da4e224fca3690f465ea3a (diff) | |
download | gcc-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/pa')
-rw-r--r-- | gcc/config/pa/pa.c | 8 |
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 |