From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 1224 invoked by alias); 29 Nov 2001 17:39:45 -0000 Mailing-List: contact gdb-patches-help@sourceware.cygnus.com; run by ezmlm Precedence: bulk List-Subscribe: List-Archive: List-Post: List-Help: , Sender: gdb-patches-owner@sources.redhat.com Received: (qmail 1185 invoked from network); 29 Nov 2001 17:39:42 -0000 Received: from unknown (HELO zwingli.cygnus.com) (208.245.165.35) by hostedprojects.ges.redhat.com with SMTP; 29 Nov 2001 17:39:42 -0000 Received: by zwingli.cygnus.com (Postfix, from userid 442) id 2B0D45E9D8; Thu, 29 Nov 2001 12:40:54 -0500 (EST) To: gdb-patches@sources.redhat.com Subject: PATCH: S/390: get return address properly when still in register From: Jim Blandy Date: Mon, 19 Nov 2001 13:30:00 -0000 Message-ID: X-Mailer: Gnus v5.3/Emacs 19.34 X-SW-Source: 2001-11/txt/msg00346.txt.bz2 2001-11-29 Jim Blandy * 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. Index: gdb/s390-tdep.c =================================================================== RCS file: /cvs/cvsfiles/devo/gdb/s390-tdep.c,v retrieving revision 2.21 diff -c -r2.21 s390-tdep.c *** gdb/s390-tdep.c 2001/11/28 03:41:53 2.21 --- gdb/s390-tdep.c 2001/11/29 04:59:51 *************** *** 901,906 **** --- 901,908 ---- (fi->saved_regs[S390_RETADDR_REGNUM], S390_GPR_SIZE))); } + else + return read_register (S390_RETADDR_REGNUM); } } return 0; From mboxrd@z Thu Jan 1 00:00:00 1970 From: Jim Blandy To: gdb-patches@sources.redhat.com Subject: PATCH: S/390: get return address properly when still in register Date: Thu, 29 Nov 2001 09:39:00 -0000 Message-ID: X-SW-Source: 2001-11/msg00561.html Message-ID: <20011129093900.mcEDK7bg0qJHGPAuFRfeWLZroR-UH_fldqn3GqSUESc@z> 2001-11-29 Jim Blandy * 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. Index: gdb/s390-tdep.c =================================================================== RCS file: /cvs/cvsfiles/devo/gdb/s390-tdep.c,v retrieving revision 2.21 diff -c -r2.21 s390-tdep.c *** gdb/s390-tdep.c 2001/11/28 03:41:53 2.21 --- gdb/s390-tdep.c 2001/11/29 04:59:51 *************** *** 901,906 **** --- 901,908 ---- (fi->saved_regs[S390_RETADDR_REGNUM], S390_GPR_SIZE))); } + else + return read_register (S390_RETADDR_REGNUM); } } return 0;