From: Kung Hsu <kung@cygnus>
Date: Tue, 22 Nov 1994 18:31:18 +0000 (+0000)
Subject:         * a29k-tdep.c (examine_tag): Fix a bug in stack frame size.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=48855ed5ceb1b4a592517293488a35c7e6ce79f4;p=binutils-gdb.git

    * a29k-tdep.c (examine_tag): Fix a bug in stack frame size.
---

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 625e5969dc9..ad22eeffee6 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,7 @@
+Tue Nov 22 10:25:59 1994  Kung Hsu  (kung@mexican.cygnus.com)
+
+	* a29k-tdep.c (examine_tag): Fix a bug in stack frame size.
+
 Sat Nov 19 03:10:51 1994  Peter Schauer  (pes@regent.e-technik.tu-muenchen.de)
 
 	* config/i386/i386sol2.mh:  Reenable core file support.
diff --git a/gdb/a29k-tdep.c b/gdb/a29k-tdep.c
index 432f8166a76..e3a855fca75 100644
--- a/gdb/a29k-tdep.c
+++ b/gdb/a29k-tdep.c
@@ -355,9 +355,9 @@ examine_tag (p, is_trans, argcount, msize, mfp_used)
     return 0;
   if (tag1 & (1<<23)) 			/* A two word tag */
     {
-       tag2 = read_memory_integer (p+4, 4);
+       tag2 = read_memory_integer (p-4, 4);
        if (msize)
-	 *msize = tag2;
+	 *msize = tag2 * 2;
     }
   else					/* A one word tag */
     {