From: brobecke <brobecke>
Date: Sat, 27 May 2006 17:39:28 +0000 (+0000)
Subject:         From Peter Schauer <peterschauer@gmx.net>
X-Git-Url: http://git.osdn.net/view?a=commitdiff_plain;h=2e957c92968c3752abffd6a41b9c8dc83d8e9c7b;p=pf3gnuchains%2Fpf3gnuchains3x.git

    From Peter Schauer <peterschauer@gmx.net>
        * m2-typeprint.c (m2_record_fields): Move variable declarations
        to the begining of the block.
---

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 675d1fa788..1cc0b6f6fc 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,9 @@
+2006-05-27  Joel Brobecker  <brobecker@adacore.com>
+
+	From Peter Schauer <peterschauer@gmx.net>
+	* m2-typeprint.c (m2_record_fields): Move variable declarations
+	to the begining of the block.
+        
 2006-05-23  Mark Mitchell  <mark@codesourcery.com>
 
 	* mt-tdep.c (mt_register_name): Correct out-of-range logic to
diff --git a/gdb/m2-typeprint.c b/gdb/m2-typeprint.c
index 160305c786..e057b65ce3 100644
--- a/gdb/m2-typeprint.c
+++ b/gdb/m2-typeprint.c
@@ -504,13 +504,14 @@ m2_record_fields (struct type *type, struct ui_file *stream, int show,
     }
   else if (show > 0)
     {
+      int i;
+      int len = TYPE_NFIELDS (type);
+
       if (TYPE_CODE (type) == TYPE_CODE_STRUCT)
 	fprintf_filtered (stream, "RECORD\n");
       else if (TYPE_CODE (type) == TYPE_CODE_UNION)
 	/* i18n: Do not translate "CASE" and "OF" */
 	fprintf_filtered (stream, _("CASE <variant> OF\n"));
-      int i;
-      int len = TYPE_NFIELDS (type);
 
       for (i = TYPE_N_BASECLASSES (type); i < len; i++)
 	{