aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJeff Law <law@redhat.com>1997-02-12 00:48:47 +0000
committerJeff Law <law@redhat.com>1997-02-12 00:48:47 +0000
commitd601a41faa7be5a1b3a27222713f61ea0bb11ecd (patch)
treef5a8b8e4303489191e3d7a38ccbee0d02adcbd46
parent380c32d50df2dba5393429b52effd51b1a3c0f0f (diff)
downloadgdb-d601a41faa7be5a1b3a27222713f61ea0bb11ecd.zip
gdb-d601a41faa7be5a1b3a27222713f61ea0bb11ecd.tar.gz
gdb-d601a41faa7be5a1b3a27222713f61ea0bb11ecd.tar.bz2
* config/mn10200/tm-mn10200.h (STORE_STRUCT_RETURN): Fix.
* mn10200-tdep.c (mn10200_store_struct_return): New function. (REG_STRUCT_HAS_ADDR): Tweak. Fixes most of the structs.exp tests.
-rw-r--r--gdb/ChangeLog4
-rw-r--r--gdb/config/mn10200/tm-mn10200.h8
-rw-r--r--gdb/mn10200-tdep.c24
3 files changed, 32 insertions, 4 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 150358c..5fa7f4c 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -8,6 +8,10 @@ Tue Feb 11 15:36:31 1997 Doug Evans <dje@canuck.cygnus.com>
end-sanitize-m32r
Tue Feb 11 12:28:09 1997 Jeffrey A Law (law@cygnus.com)
+ * config/mn10200/tm-mn10200.h (STORE_STRUCT_RETURN): Fix.
+ * mn10200-tdep.c (mn10200_store_struct_return): New function.
+ (REG_STRUCT_HAS_ADDR): Tweak.
+
* config/mn10200/tm-mn10200.h (EXTRACT_RETURN_VALUE): Fix case when
extracting a return value from a register pair.
diff --git a/gdb/config/mn10200/tm-mn10200.h b/gdb/config/mn10200/tm-mn10200.h
index aed0a6e..ac3c498 100644
--- a/gdb/config/mn10200/tm-mn10200.h
+++ b/gdb/config/mn10200/tm-mn10200.h
@@ -154,8 +154,8 @@ extern CORE_ADDR mn10200_frame_saved_pc PARAMS ((struct frame_info *));
} \
}
-#define STORE_STRUCT_RETURN(STRUCT_ADDR, SP) write_register (0, STRUCT_ADDR);
-
+#define STORE_STRUCT_RETURN(STRUCT_ADDR, SP) \
+ (SP) = mn10200_store_struct_return (STRUCT_ADDR, SP)
extern CORE_ADDR mn10200_skip_prologue PARAMS ((CORE_ADDR));
#define SKIP_PROLOGUE(pc) pc = mn10200_skip_prologue (pc)
@@ -190,8 +190,8 @@ mn10200_push_arguments PARAMS ((int, struct value **, CORE_ADDR,
#define PC_IN_CALL_DUMMY(PC, SP, FP) generic_pc_in_call_dummy (PC, SP)
-#define REG_STRUCT_HAS_ADDR(gcc_p,type) \
- (TYPE_LENGTH (type) > 8)
+#define REG_STRUCT_HAS_ADDR(gcc_p,TYPE) \
+ (TYPE_NFIELDS (TYPE) > 1 || TYPE_LENGTH (TYPE) > 8)
#define USE_STRUCT_CONVENTION(GCC_P, TYPE) \
(TYPE_NFIELDS (TYPE) > 1 || TYPE_LENGTH (TYPE) > 8)
diff --git a/gdb/mn10200-tdep.c b/gdb/mn10200-tdep.c
index 8c3812d..d25c430 100644
--- a/gdb/mn10200-tdep.c
+++ b/gdb/mn10200-tdep.c
@@ -594,6 +594,30 @@ mn10200_push_return_address (pc, sp)
write_memory (sp - 4, buf, 4);
return sp - 4;
}
+
+/* Function: store_struct_return (addr,sp)
+ Store the structure value return address for an inferior function
+ call. */
+
+CORE_ADDR
+mn10200_store_struct_return (addr, sp)
+ CORE_ADDR addr;
+ CORE_ADDR sp;
+{
+ unsigned char buf1[4];
+ unsigned char buf2[4];
+
+ /* Get the saved PC and hold onto it. */
+ target_read_memory (sp, buf1, 4);
+
+ /* Now push the structure value address. */
+ store_unsigned_integer (buf2, 4, addr);
+ write_memory (sp, buf2, 4);
+
+ /* Now push the saved PC back onto the stack. */
+ target_write_memory (sp - 4, buf1, 4);
+ return sp - 4;
+}
/* Function: frame_saved_pc
Find the caller of this frame. We do this by seeing if RP_REGNUM