Factor out struct and union printing code from c_val_print

gdb/ChangeLog:

	* c-valprint.c (c_val_print): Factor out struct and union
	printing code to ...
	(c_val_print_struct): ... this new function ...
	(c_val_print_union): ... and this new function.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 54f73743884eb7d31ff6a363df9e0bb819b3d7ad..34adebe6c61e2c927c688666884e8bbb604a9d7e 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,10 @@
+2015-07-09  Simon Marchi  <simon.marchi@ericsson.com>
+
+       * c-valprint.c (c_val_print): Factor out struct and union
+       printing code to ...
+       (c_val_print_struct): ... this new function ...
+       (c_val_print_union): ... and this new function.
+
 2015-07-09  Simon Marchi  <simon.marchi@ericsson.com>
 
        * c-valprint.c (c_val_print): Factor out pointer printing code

diff --git a/gdb/c-valprint.c b/gdb/c-valprint.c
index 48535759c6db30129cf90100d5b4872a6caf047d..a22a9d3d1d167d908d8f17156af28004c30ea68b 100644 (file)
--- a/gdb/c-valprint.c
+++ b/gdb/c-valprint.c
@@ -370,6 +370,58 @@ c_val_print_ptr (struct type *type, const gdb_byte *valaddr,
     }
 }
 
+/* c_val_print helper for TYPE_CODE_STRUCT.  */
+
+static void
+c_val_print_struct (struct type *type, const gdb_byte *valaddr,
+                   int embedded_offset, CORE_ADDR address,
+                   struct ui_file *stream, int recurse,
+                   const struct value *original_value,
+                   const struct value_print_options *options)
+{
+  if (options->vtblprint && cp_is_vtbl_ptr_type (type))
+    {
+      /* Print the unmangled name if desired.  */
+      /* Print vtable entry - we only get here if NOT using
+        -fvtable_thunks.  (Otherwise, look under
+        TYPE_CODE_PTR.)  */
+      struct gdbarch *gdbarch = get_type_arch (type);
+      int offset = (embedded_offset
+                   + TYPE_FIELD_BITPOS (type,
+                                        VTBL_FNADDR_OFFSET) / 8);
+      struct type *field_type = TYPE_FIELD_TYPE (type, VTBL_FNADDR_OFFSET);
+      CORE_ADDR addr = extract_typed_address (valaddr + offset, field_type);
+
+      print_function_pointer_address (options, gdbarch, addr, stream);
+    }
+  else
+    cp_print_value_fields_rtti (type, valaddr,
+                               embedded_offset, address,
+                               stream, recurse,
+                               original_value, options,
+                               NULL, 0);
+}
+
+/* c_val_print helper for TYPE_CODE_UNION.  */
+
+static void
+c_val_print_union (struct type *type, const gdb_byte *valaddr,
+                  int embedded_offset, CORE_ADDR address,
+                  struct ui_file *stream, int recurse,
+                  const struct value *original_value,
+                  const struct value_print_options *options)
+{
+  if (recurse && !options->unionprint)
+    {
+      fprintf_filtered (stream, "{...}");
+     }
+  else
+    {
+      c_val_print_struct (type, valaddr, embedded_offset, address, stream,
+                         recurse, original_value, options);
+    }
+}
+
 /* See val_print for a description of the various parameters of this
    function; they are identical.  */
 
@@ -380,7 +432,6 @@ c_val_print (struct type *type, const gdb_byte *valaddr,
             const struct value *original_value,
             const struct value_print_options *options)
 {
-  struct gdbarch *gdbarch = get_type_arch (type);
   struct type *unresolved_type = type;
 
   CHECK_TYPEDEF (type);
@@ -401,36 +452,13 @@ c_val_print (struct type *type, const gdb_byte *valaddr,
       break;
 
     case TYPE_CODE_UNION:
-      if (recurse && !options->unionprint)
-       {
-         fprintf_filtered (stream, "{...}");
-         break;
-       }
-      /* Fall through.  */
+      c_val_print_union (type, valaddr, embedded_offset, address, stream,
+                        recurse, original_value, options);
+      break;
+
     case TYPE_CODE_STRUCT:
-      /*FIXME: Abstract this away.  */
-      if (options->vtblprint && cp_is_vtbl_ptr_type (type))
-       {
-         /* Print the unmangled name if desired.  */
-         /* Print vtable entry - we only get here if NOT using
-            -fvtable_thunks.  (Otherwise, look under
-            TYPE_CODE_PTR.)  */
-         int offset = (embedded_offset
-                       + TYPE_FIELD_BITPOS (type,
-                                            VTBL_FNADDR_OFFSET) / 8);
-         struct type *field_type = TYPE_FIELD_TYPE (type,
-                                                    VTBL_FNADDR_OFFSET);
-         CORE_ADDR addr
-           = extract_typed_address (valaddr + offset, field_type);
-
-         print_function_pointer_address (options, gdbarch, addr, stream);
-       }
-      else
-       cp_print_value_fields_rtti (type, valaddr,
-                                   embedded_offset, address,
-                                   stream, recurse,
-                                   original_value, options,
-                                   NULL, 0);
+      c_val_print_struct (type, valaddr, embedded_offset, address, stream,
+                         recurse, original_value, options);
       break;
 
     case TYPE_CODE_INT: