gdb/testsuite/
* gdb.ada/null_array.exp (print my_table): Call get_compiler_info and check test_compiler_info.
This commit is contained in:
parent
21d790b943
commit
03eb1c79d4
2 changed files with 15 additions and 0 deletions
|
@ -1,3 +1,9 @@
|
|||
2010-11-04 Jan Kratochvil <jan.kratochvil@redhat.com>
|
||||
Joel Brobecker <brobecker@adacore.com>
|
||||
|
||||
* gdb.ada/null_array.exp (print my_table): Call get_compiler_info and
|
||||
check test_compiler_info.
|
||||
|
||||
2010-11-03 Ken Werner <ken.werner@de.ibm.com>
|
||||
|
||||
* gdb.base/gnu_vector.exp: Adjust expect messages.
|
||||
|
|
|
@ -37,6 +37,15 @@ gdb_load ${binfile}
|
|||
set bp_location [gdb_get_line_number "START" ${testdir}/foo.adb]
|
||||
runto "foo.adb:$bp_location"
|
||||
|
||||
if [get_compiler_info ${binfile}] {
|
||||
return -1;
|
||||
}
|
||||
|
||||
if {[test_compiler_info {gcc-[0-3]-*}]
|
||||
|| [test_compiler_info {gcc-4-[0-4]-*}]} {
|
||||
# Ada array bounds are missing in older GCCs.
|
||||
setup_xfail *-*-*
|
||||
}
|
||||
gdb_test "print my_table" \
|
||||
"= \\(\\)" \
|
||||
"print my_table"
|
||||
|
|
Loading…
Reference in a new issue