diff options
| author | Jan Kratochvil <jan.kratochvil@redhat.com> | 2010-11-04 18:52:11 +0000 |
|---|---|---|
| committer | Jan Kratochvil <jan.kratochvil@redhat.com> | 2010-11-04 18:52:11 +0000 |
| commit | 03eb1c79d47c095c3777ad8c382723b3b720b733 (patch) | |
| tree | 80d6822b8bdf7b63f18c311bfb80cd8e29a49aa8 | |
| parent | 21d790b94321db1f489df1e51b97e0a7377e7b24 (diff) | |
| download | binutils-gdb-03eb1c79d47c095c3777ad8c382723b3b720b733.tar.gz | |
gdb/testsuite/
* gdb.ada/null_array.exp (print my_table): Call get_compiler_info and
check test_compiler_info.
| -rw-r--r-- | gdb/testsuite/ChangeLog | 6 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.ada/null_array.exp | 9 |
2 files changed, 15 insertions, 0 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index cc60e462090..914d0449dab 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -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. diff --git a/gdb/testsuite/gdb.ada/null_array.exp b/gdb/testsuite/gdb.ada/null_array.exp index 45bc9679a26..4d46b4ce018 100644 --- a/gdb/testsuite/gdb.ada/null_array.exp +++ b/gdb/testsuite/gdb.ada/null_array.exp @@ -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" |