daily update

[deliverable/binutils-gdb.git] / gdb / p-typeprint.c

diff --git a/gdb/p-typeprint.c b/gdb/p-typeprint.c
index fb3f3a14b1b44d4be968550cf752ce011a431aa7..54a761d464a0bb1bf6443f7de477802d483e4e4b 100644 (file)
--- a/gdb/p-typeprint.c
+++ b/gdb/p-typeprint.c
@@ -156,18 +156,18 @@ void
 pascal_type_print_method_args (char *physname, char *methodname,
                               struct ui_file *stream)
 {
-  fputs_filtered (methodname, stream);
+  int is_constructor = (strncmp (physname, "__ct__", 6) == 0);
+  int is_destructor = (strncmp (physname, "__dt__", 6) == 0);
 
-  if (physname && (*physname != 0))
+  if (is_constructor || is_destructor)
     {
-      int is_constructor = (strncmp (physname, "__ct__", 6) == 0);
-      int is_destructor = (strncmp (physname, "__dt__", 6) == 0);
+      physname += 6;
+    }
 
-      if (is_constructor || is_destructor)
-       {
-         physname += 6;
-       }
+  fputs_filtered (methodname, stream);
 
+  if (physname && (*physname != 0))
+    {
       fputs_filtered (" (", stream);
       /* We must demangle this.  */
       while (isdigit (physname[0]))