diff options
| author | Tom Tromey <tom@tromey.com> | 2017-06-02 06:54:06 -0600 |
|---|---|---|
| committer | Tom Tromey <tom@tromey.com> | 2017-06-12 15:04:58 -0600 |
| commit | 973e9aab63a70311dffa2993dac52bd63ea461ec (patch) | |
| tree | 065a45d1385dd68e91f0b182d9746ad54175c631 | |
| parent | f12f6bad7d4e8de1d1f4c9c1811757571149c8f1 (diff) | |
| download | gdb-973e9aab63a70311dffa2993dac52bd63ea461ec.zip gdb-973e9aab63a70311dffa2993dac52bd63ea461ec.tar.gz gdb-973e9aab63a70311dffa2993dac52bd63ea461ec.tar.bz2 | |
Add some 128-bit integer tests
This adds some tests for printing 128-bit integers.
2017-06-12 Tom Tromey <tom@tromey.com>
* gdb.dwarf2/formdata16.exp: Add tests.
| -rw-r--r-- | gdb/testsuite/ChangeLog | 4 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.dwarf2/formdata16.exp | 31 |
2 files changed, 33 insertions, 2 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 340a824..5f6adc5 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,5 +1,9 @@ 2017-06-12 Tom Tromey <tom@tromey.com> + * gdb.dwarf2/formdata16.exp: Add tests. + +2017-06-12 Tom Tromey <tom@tromey.com> + * gdb.arch/altivec-regs.exp: Expect decimal results for uint128. 2017-06-12 Tom Tromey <tom@tromey.com> diff --git a/gdb/testsuite/gdb.dwarf2/formdata16.exp b/gdb/testsuite/gdb.dwarf2/formdata16.exp index bba2015..a3ccbd3 100644 --- a/gdb/testsuite/gdb.dwarf2/formdata16.exp +++ b/gdb/testsuite/gdb.dwarf2/formdata16.exp @@ -41,18 +41,22 @@ set high "0x123456789abcdef0" set low "0x0fedcba987654321" if { $endianness == "big" } { set pair $high,$low + set pair2 0x0,$low + set negative 0xffffffffffffffff,$low } else { set pair $low,$high + set pair2 $low,0x0 + set negative $low,0xffffffffffffffff } # Make some DWARF for the test. set asm_file [standard_output_file $srcfile2] Dwarf::assemble $asm_file { - global pair + global pair pair2 negative cu { addr_size 4 } { compile_unit {} { - declare_labels int_label + declare_labels int_label sint_label int_label: DW_TAG_base_type { {DW_AT_byte_size 16 DW_FORM_udata} @@ -60,11 +64,29 @@ Dwarf::assemble $asm_file { {DW_AT_name "__uint128"} } + sint_label: DW_TAG_base_type { + {DW_AT_byte_size 16 DW_FORM_udata} + {DW_AT_encoding @DW_ATE_signed} + {DW_AT_name "__int128"} + } + DW_TAG_variable { {name xxx} {type :$int_label} {const_value $pair DW_FORM_data16} } + + DW_TAG_variable { + {name yyy} + {type :$int_label} + {const_value $pair2 DW_FORM_data16} + } + + DW_TAG_variable { + {name sss} + {type :$sint_label} + {const_value $negative DW_FORM_data16} + } } } } @@ -75,3 +97,8 @@ if { [prepare_for_testing "failed to prepare" ${testfile} \ } gdb_test "p/x xxx" " = 0x123456789abcdef00fedcba987654321" +gdb_test "p xxx" "= 24197857203266734864629346612071973665" +gdb_test "p/x yyy" " = 0xfedcba987654321" +gdb_test "p yyy" "= 1147797409030816545" +gdb_test "p/x sss" " = 0xffffffffffffffff0fedcba987654321" +gdb_test "p sss" "= -17298946664678735071" |