aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJan Kratochvil <jan.kratochvil@redhat.com>2010-11-04 18:52:11 +0000
committerJan Kratochvil <jan.kratochvil@redhat.com>2010-11-04 18:52:11 +0000
commit03eb1c79d47c095c3777ad8c382723b3b720b733 (patch)
tree80d6822b8bdf7b63f18c311bfb80cd8e29a49aa8
parent21d790b94321db1f489df1e51b97e0a7377e7b24 (diff)
downloadgdb-03eb1c79d47c095c3777ad8c382723b3b720b733.zip
gdb-03eb1c79d47c095c3777ad8c382723b3b720b733.tar.gz
gdb-03eb1c79d47c095c3777ad8c382723b3b720b733.tar.bz2
gdb/testsuite/
* gdb.ada/null_array.exp (print my_table): Call get_compiler_info and check test_compiler_info.
-rw-r--r--gdb/testsuite/ChangeLog6
-rw-r--r--gdb/testsuite/gdb.ada/null_array.exp9
2 files changed, 15 insertions, 0 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index cc60e46..914d044 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 45bc967..4d46b4c 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"