From: Pierre Muller <muller@sourceware.org>
Date: Fri, 15 Oct 2010 23:08:04 +0000 (+0000)
Subject: 	* p-typeprint.c (pascal_type_print_method_args): Fix problem in
X-Git-Tag: binutils-2_21-branchpoint~197
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=3a9d7214ad8cf9b43b5cc52e3f4adba8ead032cc;p=platform%2Fupstream%2Fbinutils.git

	* p-typeprint.c (pascal_type_print_method_args): Fix problem in
	display of type of method arguments.
---

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 203dc3c..c23a749 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,8 @@
+2010-10-16  Pierre Muller  <muller@ics.u-strasbg.fr>
+
+	* p-typeprint.c (pascal_type_print_method_args): Fix problem in
+	display of type of method arguments.
+
 2010-10-15  Tom Tromey  <tromey@redhat.com>
 
 	PR python/11948:
diff --git a/gdb/p-typeprint.c b/gdb/p-typeprint.c
index c0752b7..0d476ce 100644
--- a/gdb/p-typeprint.c
+++ b/gdb/p-typeprint.c
@@ -165,14 +165,15 @@ pascal_type_print_method_args (char *physname, char *methodname,
 
   if (physname && (*physname != 0))
     {
-      int i = 0;
-      int len = 0;
-      char storec;
-      char *argname;
       fputs_filtered (" (", stream);
       /* we must demangle this */
       while (isdigit (physname[0]))
 	{
+	  int len = 0;
+	  int i;
+	  char storec;
+	  char *argname;
+
 	  while (isdigit (physname[len]))
 	    {
 	      len++;