From: Jim Blandy <jimb@codesourcery.com>
Date: Thu, 29 Nov 2001 05:02:37 +0000 (+0000)
Subject: * s390-tdep.c (s390_frame_saved_pc_nofix): If the prologue didn't
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=d0ad30c93c6b96af423bf0958360f88701f998fc;p=binutils-gdb.git

* s390-tdep.c (s390_frame_saved_pc_nofix): If the prologue didn't
save the return address register, assume that the return address
is still in there.
---

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 884d17df0bf..2d12545c118 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,9 @@
+2001-11-29  Jim Blandy  <jimb@redhat.com>
+
+	* s390-tdep.c (s390_frame_saved_pc_nofix): If the prologue didn't
+	save the return address register, assume that the return address
+	is still in there.
+
 2001-11-27  Andrew Cagney  <ac131313@redhat.com>
 
 	* MAINTAINERS: Clarify obvious fix a little (as suggested by Eli
diff --git a/gdb/s390-tdep.c b/gdb/s390-tdep.c
index 61f4ae8939a..465780f04f3 100644
--- a/gdb/s390-tdep.c
+++ b/gdb/s390-tdep.c
@@ -901,6 +901,8 @@ s390_frame_saved_pc_nofix (struct frame_info *fi)
 					(fi->saved_regs[S390_RETADDR_REGNUM],
 					 S390_GPR_SIZE)));
 	    }
+          else
+            return read_register (S390_RETADDR_REGNUM);
 	}
     }
   return 0;