aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorUlrich Weigand <uweigand@de.ibm.com>2009-07-02 12:16:56 +0000
committerUlrich Weigand <uweigand@de.ibm.com>2009-07-02 12:16:56 +0000
commitd5c831bd769fa23e1f0d6c7e9ac9efbad0f84a6d (patch)
tree8b48b915f4e099da3f415ce11419d4e19b069cd1
parent5d3729b5d11ada0b369a965d4dcb40ace00e8d84 (diff)
downloadgdb-d5c831bd769fa23e1f0d6c7e9ac9efbad0f84a6d.zip
gdb-d5c831bd769fa23e1f0d6c7e9ac9efbad0f84a6d.tar.gz
gdb-d5c831bd769fa23e1f0d6c7e9ac9efbad0f84a6d.tar.bz2
* 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.
-rw-r--r--gdb/ChangeLog7
-rw-r--r--gdb/m2-typeprint.c5
-rw-r--r--gdb/m2-valprint.c4
-rw-r--r--gdb/p-typeprint.c2
4 files changed, 7 insertions, 11 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 4fb5695..935a29f 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,5 +1,12 @@
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.
(set_next_address, do_examine, x_command): Set it.
(decode_format): Use 'a' size to indicate width of an address.
diff --git a/gdb/m2-typeprint.c b/gdb/m2-typeprint.c
index 162ef9f..8c5d6b4 100644
--- 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 41fb8fe..27b0e8a 100644
--- 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 5085fb4..62f4511 100644
--- 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);