diff options
| author | Tom Tromey <tromey@adacore.com> | 2022-10-17 13:16:59 -0600 |
|---|---|---|
| committer | Tom Tromey <tromey@adacore.com> | 2022-10-17 13:20:00 -0600 |
| commit | 239e440d30998da4af74095c75bdb501d3a3987d (patch) | |
| tree | cad83d74aded2d5c6218c0d7c0db769fe063df44 | |
| parent | 069355439fca1702c2440678663d1d0d40bbb735 (diff) | |
| download | binutils-239e440d30998da4af74095c75bdb501d3a3987d.zip binutils-239e440d30998da4af74095c75bdb501d3a3987d.tar.gz binutils-239e440d30998da4af74095c75bdb501d3a3987d.tar.bz2 | |
kfail an Ada test for GCC < 12
I noticed one particular Ada test was failing on Fedora 34, but works
when I switch to GCC 12. This patch arranges to kfail the test when
an older compiler is used.
I tested this with GCC 11, 12, and 13. I'm going to check it in.
| -rw-r--r-- | gdb/testsuite/gdb.ada/packed_array_assign.exp | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/gdb/testsuite/gdb.ada/packed_array_assign.exp b/gdb/testsuite/gdb.ada/packed_array_assign.exp index eef0d39..a0240fc 100644 --- a/gdb/testsuite/gdb.ada/packed_array_assign.exp +++ b/gdb/testsuite/gdb.ada/packed_array_assign.exp @@ -52,6 +52,12 @@ set re \ "\\(packed_array_assign_w => 23," \ "packed_array_assign_x => 7," \ "packed_array_assign_y => 1\\)\\)"] + +# GNAT >= 12.0 has the needed fix here. +set zeros_expected [expr {![test_compiler_info {gcc-1[2-9]-*}]}] +set all_zeros \ + [string_to_regexp "((packed_array_assign_w => 0, packed_array_assign_x => 0, packed_array_assign_y => 0), (packed_array_assign_w => 0, packed_array_assign_x => 0, packed_array_assign_y => 0), (packed_array_assign_w => 0, packed_array_assign_x => 0, packed_array_assign_y => 0))"] + set re [join $re] gdb_test_multiple $cmd "value of pra" { -re -wrap $re { @@ -60,6 +66,12 @@ gdb_test_multiple $cmd "value of pra" { -re -wrap $kfail_int128support_re { kfail gdb/20991 $gdb_test_name } + -re -wrap $all_zeros { + if {$zeros_expected} { + setup_kfail "GCC 12 needed" *-*-* + } + fail $gdb_test_name + } } set cmd "print pra(1) := pr" |