This is the mail archive of the
gdb-patches@sourceware.org
mailing list for the GDB project.
Re: [PATCH] Fix passing double float complex arguments in sparc64
- From: jose dot marchesi at oracle dot com (Jose E. Marchesi)
- To: Mark Kettenis <mark dot kettenis at xs4all dot nl>
- Cc: gdb-patches at sourceware dot org
- Date: Tue, 10 Dec 2013 19:48:38 +0100
- Subject: Re: [PATCH] Fix passing double float complex arguments in sparc64
- Authentication-results: sourceware.org; auth=none
- References: <87ob6qo7bs dot fsf at oracle dot com> <201310231958 dot r9NJwEje005359 at glazunov dot sibelius dot xs4all dot nl>
> 2013-10-15 Jose E. Marchesi <jose.marchesi@oracle.com>
>
> * sparc64-tdep.c (sparc64_store_arguments): Do not align complex
> double float arguments to 16-byte.
Hi Jose,
A bit of digging around seems to confirm that we shouldn't align
double complex variables. However, I think that with your diff we're
still not storing things in the right registers.
Aye. Fixed in the amended patch below.
2013-10-15 Jose E. Marchesi <jose.marchesi@oracle.com>
* sparc64-tdep.c (sparc64_store_arguments): Do not align complex
double float arguments to 16-byte in the argument slots.
diff --git a/gdb/sparc64-tdep.c b/gdb/sparc64-tdep.c
index 8bcf418..9767bbe 100644
--- a/gdb/sparc64-tdep.c
+++ b/gdb/sparc64-tdep.c
@@ -831,7 +831,7 @@ sparc64_store_arguments (struct regcache *regcache, int nargs,
quad-aligned, and thus a hole might be introduced
into the parameter array to force alignment." Skip
an element if necessary. */
- if (num_elements % 2)
+ if ((num_elements % 2) && sparc64_16_byte_align_p (type))
num_elements++;
}
else
@@ -890,7 +890,7 @@ sparc64_store_arguments (struct regcache *regcache, int nargs,
if (sparc64_structure_or_union_p (type)
|| (sparc64_complex_floating_p (type) && len == 32))
{
- /* Structure or Union arguments. */
+ /* Structure, Union or long double Complex arguments. */
gdb_assert (len <= 16);
memset (buf, 0, sizeof (buf));
valbuf = memcpy (buf, valbuf, len);
@@ -908,7 +908,13 @@ sparc64_store_arguments (struct regcache *regcache, int nargs,
if (element < 16)
sparc64_store_floating_fields (regcache, type, valbuf, element, 0);
}
- else if (sparc64_floating_p (type) || sparc64_complex_floating_p (type))
+ else if (sparc64_complex_floating_p (type))
+ {
+ /* Float Complex or double Complex arguments. */
+ if (element < 16)
+ regnum = SPARC64_D0_REGNUM + element;
+ }
+ else if (sparc64_floating_p (type))
{
/* Floating arguments. */
if (len == 16)
@@ -950,6 +956,10 @@ sparc64_store_arguments (struct regcache *regcache, int nargs,
if (regnum != -1)
{
regcache_cooked_write (regcache, regnum, valbuf);
+ if (sparc64_complex_floating_p (type)
+ && (len == 16)
+ && (regnum < SPARC64_D10_REGNUM))
+ regcache_cooked_write (regcache, regnum + 1, valbuf + 8);
/* If we're storing the value in a floating-point register,
also store it in the corresponding %0 register(s). */