* m2-typeprint.c (m2_print_bounds, m2_is_long_set_of_type): Remove

	redundant check for NULL TYPE_TARGET_TYPE.
	* m2-valprint.c (m2_print_long_set): Likewise.
	* p-valprint.c (pascal_type_print_base): Likewise.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 4fb5695bfdb839cc4df0b567cf766a3ac59f020b..935a29f5906a601a611caa33ef34c8dd2f581c05 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,10 @@
+2009-07-02  Ulrich Weigand  <uweigand@de.ibm.com>
+
+       * m2-typeprint.c (m2_print_bounds, m2_is_long_set_of_type): Remove
+       redundant check for NULL TYPE_TARGET_TYPE.
+       * m2-valprint.c (m2_print_long_set): Likewise.
+       * p-valprint.c (pascal_type_print_base): Likewise.
+
 2009-07-02  Ulrich Weigand  <uweigand@de.ibm.com>
 
        * printcmd.c (next_gdbarch): New static variable.

diff --git a/gdb/m2-typeprint.c b/gdb/m2-typeprint.c
index 162ef9fbcdcc603d06175e47358dd2d054d9e12f..8c5d6b4c592b12b5f4645f173bc0fbdd3f2d1974 100644 (file)
--- a/gdb/m2-typeprint.c
+++ b/gdb/m2-typeprint.c
@@ -307,9 +307,6 @@ m2_print_bounds (struct type *type,
 {
   struct type *target = TYPE_TARGET_TYPE (type);
 
-  if (target == NULL)
-    target = builtin_type_int32;
-
   if (TYPE_NFIELDS(type) == 0)
     return;
 
@@ -414,8 +411,6 @@ m2_is_long_set_of_type (struct type *type, struct type **of_type)
        return 0;
       range = TYPE_INDEX_TYPE (TYPE_FIELD_TYPE (type, i));
       target = TYPE_TARGET_TYPE (range);
-      if (target == NULL)
-       target = builtin_type_int32;
 
       l1 = TYPE_LOW_BOUND (TYPE_INDEX_TYPE (TYPE_FIELD_TYPE (type, i)));
       h1 = TYPE_HIGH_BOUND (TYPE_INDEX_TYPE (TYPE_FIELD_TYPE (type, len-1)));

diff --git a/gdb/m2-valprint.c b/gdb/m2-valprint.c
index 41fb8fe692443a47c27e46461a9d57afeaa1b0eb..27b0e8a0bc8a9c8b8648cf06d8621c6ed1fa1545 100644 (file)
--- a/gdb/m2-valprint.c
+++ b/gdb/m2-valprint.c
@@ -119,8 +119,6 @@ m2_print_long_set (struct type *type, const gdb_byte *valaddr,
     }
 
   target = TYPE_TARGET_TYPE (range);
-  if (target == NULL)
-    target = builtin_type_int32;
 
   if (get_discrete_bounds (range, &field_low, &field_high) >= 0)
     {
@@ -165,8 +163,6 @@ m2_print_long_set (struct type *type, const gdb_byte *valaddr,
              if (get_discrete_bounds (range, &field_low, &field_high) < 0)
                break;
              target = TYPE_TARGET_TYPE (range);
-             if (target == NULL)
-               target = builtin_type_int32;
            }
        }
       if (element_seen)

diff --git a/gdb/p-typeprint.c b/gdb/p-typeprint.c
index 5085fb410eb5641626d9f658b298e56be4024864..62f4511f09e6fa2034111fc7dafbefea2a30995f 100644 (file)
--- a/gdb/p-typeprint.c
+++ b/gdb/p-typeprint.c
@@ -768,8 +768,6 @@ pascal_type_print_base (struct type *type, struct ui_file *stream, int show,
     case TYPE_CODE_RANGE:
       {
        struct type *target = TYPE_TARGET_TYPE (type);
-       if (target == NULL)
-         target = builtin_type_int32;
        print_type_scalar (target, TYPE_LOW_BOUND (type), stream);
        fputs_filtered ("..", stream);
        print_type_scalar (target, TYPE_HIGH_BOUND (type), stream);