diff options
Diffstat (limited to 'gdb/testsuite/gdb.dwarf2/subrange.exp')
| -rw-r--r-- | gdb/testsuite/gdb.dwarf2/subrange.exp | 58 |
1 files changed, 30 insertions, 28 deletions
diff --git a/gdb/testsuite/gdb.dwarf2/subrange.exp b/gdb/testsuite/gdb.dwarf2/subrange.exp index 2cc7472..3e0326f 100644 --- a/gdb/testsuite/gdb.dwarf2/subrange.exp +++ b/gdb/testsuite/gdb.dwarf2/subrange.exp @@ -25,35 +25,37 @@ standard_testfile method-ptr.cc -dw.S set asm_file [standard_output_file $srcfile2] Dwarf::assemble $asm_file { cu {} { - compile_unit {{language @DW_LANG_Pascal83}} { + compile_unit { + DW_AT_language @DW_LANG_Pascal83 + } { declare_labels byte_label typedef_label array_label # A subrange's underlying type that is a typedef. byte_label: base_type { - {name byte} - {encoding @DW_ATE_unsigned} - {byte_size 1 DW_FORM_sdata} + DW_AT_name byte + DW_AT_encoding @DW_ATE_unsigned + DW_AT_byte_size 1 DW_FORM_sdata } typedef_label: typedef { - {name byte_typedef} - {type :$byte_label} + DW_AT_name byte_typedef + DW_AT_type :$byte_label } array_label: array_type { - {type :$byte_label} + DW_AT_type :$byte_label } { subrange_type { - {lower_bound 0 DW_FORM_sdata} - {upper_bound 191 DW_FORM_sdata} - {byte_stride 2 DW_FORM_sdata} - {type :$typedef_label} + DW_AT_lower_bound 0 DW_FORM_sdata + DW_AT_upper_bound 191 DW_FORM_sdata + DW_AT_byte_stride 2 DW_FORM_sdata + DW_AT_type :$typedef_label } } typedef { - {name TByteArray} - {type :$array_label} + DW_AT_name TByteArray + DW_AT_type :$array_label } # This subrange's underlying type is signed, but the bounds are @@ -61,21 +63,21 @@ Dwarf::assemble $asm_file { declare_labels signed_byte_label subrange_with_buggy_negative_bounds_label signed_byte_label: base_type { - {name signed_byte} - {encoding @DW_ATE_signed} - {byte_size 1 DW_FORM_sdata} + DW_AT_name signed_byte + DW_AT_encoding @DW_ATE_signed + DW_AT_byte_size 1 DW_FORM_sdata } # The bounds mean -16 to -12. subrange_with_buggy_negative_bounds_label: subrange_type { - {lower_bound 0xf0 DW_FORM_udata} - {upper_bound 0xf4 DW_FORM_udata} - {type :$signed_byte_label} + DW_AT_lower_bound 0xf0 DW_FORM_udata + DW_AT_upper_bound 0xf4 DW_FORM_udata + DW_AT_type :$signed_byte_label } DW_TAG_variable { - {name subrange_with_buggy_negative_bounds_variable} - {type :$subrange_with_buggy_negative_bounds_label} + DW_AT_name subrange_with_buggy_negative_bounds_variable + DW_AT_type :$subrange_with_buggy_negative_bounds_label } # This subrange's base type is 16-bytes long (although the bounds fit in @@ -83,19 +85,19 @@ Dwarf::assemble $asm_file { declare_labels a_16_byte_integer_label a_16_byte_subrange_label a_16_byte_integer_label: base_type { - {byte_size 16 udata} - {encoding @DW_ATE_signed} + DW_AT_byte_size 16 udata + DW_AT_encoding @DW_ATE_signed } a_16_byte_subrange_label: subrange_type { - {lower_bound -9223372036854775808 DW_FORM_sdata} - {upper_bound 9223372036854775807 DW_FORM_sdata} - {type :$a_16_byte_integer_label} + DW_AT_lower_bound -9223372036854775808 DW_FORM_sdata + DW_AT_upper_bound 9223372036854775807 DW_FORM_sdata + DW_AT_type :$a_16_byte_integer_label } DW_TAG_variable { - {name a_16_byte_subrange_variable} - {type :$a_16_byte_subrange_label} + DW_AT_name a_16_byte_subrange_variable + DW_AT_type :$a_16_byte_subrange_label } } } |