aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--gdb/ChangeLog3
-rw-r--r--gdb/m68k-tdep.c24
2 files changed, 21 insertions, 6 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 8ea18b3..914910e 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,5 +1,8 @@
2005-08-17 Mark Kettenis <kettenis@gnu.org>
+ * m68k-tdep.c (m68k_return_value): Properly return contents of
+ structures passed in memory.
+
* infcmd.c (print_return_value): Move CHECK_TYPEDEF up. Deal with
RETURN_VALUE_ABI_PRESERVED_ADDRESS.
diff --git a/gdb/m68k-tdep.c b/gdb/m68k-tdep.c
index 31ac09c..ebbe494 100644
--- a/gdb/m68k-tdep.c
+++ b/gdb/m68k-tdep.c
@@ -333,13 +333,25 @@ m68k_return_value (struct gdbarch *gdbarch, struct type *type,
{
enum type_code code = TYPE_CODE (type);
- if ((code == TYPE_CODE_STRUCT || code == TYPE_CODE_UNION)
- && !m68k_reg_struct_return_p (gdbarch, type))
- return RETURN_VALUE_STRUCT_CONVENTION;
+ /* GCC returns a `long double' in memory too. */
+ if (((code == TYPE_CODE_STRUCT || code == TYPE_CODE_UNION)
+ && !m68k_reg_struct_return_p (gdbarch, type))
+ || (code == TYPE_CODE_FLT && TYPE_LENGTH (type) == 12))
+ {
+ /* The default on m68k is to return structures in static memory.
+ Consequently a function must return the address where we can
+ find the return value. */
+
+ if (readbuf)
+ {
+ ULONGEST addr;
+
+ regcache_raw_read_unsigned (regcache, M68K_D0_REGNUM, &addr);
+ read_memory (addr, readbuf, TYPE_LENGTH (type));
+ }
- /* GCC returns a `long double' in memory. */
- if (code == TYPE_CODE_FLT && TYPE_LENGTH (type) == 12)
- return RETURN_VALUE_STRUCT_CONVENTION;
+ return RETURN_VALUE_ABI_RETURNS_ADDRESS;
+ }
if (readbuf)
m68k_extract_return_value (type, regcache, readbuf);