Toolchain/binutils-gdb
1
0
Fork 0
forked from Imagelibrary/binutils-gdb
Code Pull Requests Activity

Delete redundant variable in ada_template_to_fixed_record_type_1.

Browse Source 
gdb/ChangeLog:

        * ada-lang.c (ada_template_to_fixed_record_type_1): Delete bit_incr.
This commit is contained in:
Joel Brobecker
2010-11-23 01:12:05 +00:00
parent 96dbd2c132
commit d94e4f4f7c
2 changed files with 10 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
gdb/ChangeLog
View File

@@ -1,3 +1,7 @@
2010-11-22 Joel Brobecker <brobecker@adacore.com>
* ada-lang.c (ada_template_to_fixed_record_type_1): Delete bit_incr.
2010-11-22 Joel Brobecker <brobecker@adacore.com> 2010-11-22 Joel Brobecker <brobecker@adacore.com>
* ada-lang.c (ada_to_fixed_type): Expand function documentation. * ada-lang.c (ada_to_fixed_type): Expand function documentation.

12
gdb/ada-lang.c
View File

@@ -7030,7 +7030,7 @@ ada_template_to_fixed_record_type_1 (struct type *type,
int nfields, bit_len; int nfields, bit_len;
int variant_field; int variant_field;
long off; long off;
int fld_bit_len, bit_incr; int fld_bit_len;
int f; int f;
/* Compute the number of fields in this record type that are going /* Compute the number of fields in this record type that are going
@@ -7072,7 +7072,7 @@ ada_template_to_fixed_record_type_1 (struct type *type,
if (ada_is_variant_part (type, f)) if (ada_is_variant_part (type, f))
{ {
variant_field = f; variant_field = f;
fld_bit_len = bit_incr = 0; fld_bit_len = 0;
} }
else if (is_dynamic_field (type, f)) else if (is_dynamic_field (type, f))
{ {
@@ -7139,7 +7139,7 @@ ada_template_to_fixed_record_type_1 (struct type *type,
an overflow should not happen in practice. So rather than an overflow should not happen in practice. So rather than
adding overflow recovery code to this already complex code, adding overflow recovery code to this already complex code,
we just assume that it's not going to happen. */ we just assume that it's not going to happen. */
bit_incr = fld_bit_len = fld_bit_len =
TYPE_LENGTH (TYPE_FIELD_TYPE (rtype, f)) * TARGET_CHAR_BIT; TYPE_LENGTH (TYPE_FIELD_TYPE (rtype, f)) * TARGET_CHAR_BIT;
} }
else else
@@ -7149,15 +7149,15 @@ ada_template_to_fixed_record_type_1 (struct type *type,
TYPE_FIELD_TYPE (rtype, f) = field_type; TYPE_FIELD_TYPE (rtype, f) = field_type;
TYPE_FIELD_NAME (rtype, f) = TYPE_FIELD_NAME (type, f); TYPE_FIELD_NAME (rtype, f) = TYPE_FIELD_NAME (type, f);
if (TYPE_FIELD_BITSIZE (type, f) > 0) if (TYPE_FIELD_BITSIZE (type, f) > 0)
bit_incr = fld_bit_len = fld_bit_len =
TYPE_FIELD_BITSIZE (rtype, f) = TYPE_FIELD_BITSIZE (type, f); TYPE_FIELD_BITSIZE (rtype, f) = TYPE_FIELD_BITSIZE (type, f);
else else
bit_incr = fld_bit_len = fld_bit_len =
TYPE_LENGTH (ada_check_typedef (field_type)) * TARGET_CHAR_BIT; TYPE_LENGTH (ada_check_typedef (field_type)) * TARGET_CHAR_BIT;
} }
if (off + fld_bit_len > bit_len) if (off + fld_bit_len > bit_len)
bit_len = off + fld_bit_len; bit_len = off + fld_bit_len;
off += bit_incr; off += fld_bit_len;
TYPE_LENGTH (rtype) = TYPE_LENGTH (rtype) =
align_value (bit_len, TARGET_CHAR_BIT) / TARGET_CHAR_BIT; align_value (bit_len, TARGET_CHAR_BIT) / TARGET_CHAR_BIT;
} }