aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/gdb.ada/info_exc.exp
diff options
context:
space:
mode:
authorJoel Brobecker <brobecker@adacore.com>2013-11-15 20:34:09 +0400
committerJoel Brobecker <brobecker@adacore.com>2013-11-15 20:41:06 +0400
commit391d3400084c6a2d805cd0efd925f29347fa7a18 (patch)
tree40e49500f39cd25592686bfc83392d6dac0be3e8 /gdb/testsuite/gdb.ada/info_exc.exp
parent19a1b230f33dbcfa54cd1a9f88c2d5158f833f6f (diff)
downloadfsf-binutils-gdb-391d3400084c6a2d805cd0efd925f29347fa7a18.zip
fsf-binutils-gdb-391d3400084c6a2d805cd0efd925f29347fa7a18.tar.gz
fsf-binutils-gdb-391d3400084c6a2d805cd0efd925f29347fa7a18.tar.bz2
gdb.ada/info_exc.exp,mi_exc_info.exp: handle runtimes with full debug info.
If the runtime has full debug info, then the non-standard exceptions declared in the GNAT runtime will appear in the list of exceptions printed by GDB ("info exceptions" or "-info-ada-exceptions"). This is valid output, so this patch allows for it. gdb/testsuite/ChangeLog: * gdb.ada/info_exc.exp: Allow other global exceptions to be listed in the output of "info exceptions". * gdb.ada/mi_exc_info.exp: Allow other global exceptions to be listed in the output of "-info-ada-exceptions".
Diffstat (limited to 'gdb/testsuite/gdb.ada/info_exc.exp')
-rw-r--r--gdb/testsuite/gdb.ada/info_exc.exp4
1 files changed, 3 insertions, 1 deletions
diff --git a/gdb/testsuite/gdb.ada/info_exc.exp b/gdb/testsuite/gdb.ada/info_exc.exp
index 9637bce..9210029 100644
--- a/gdb/testsuite/gdb.ada/info_exc.exp
+++ b/gdb/testsuite/gdb.ada/info_exc.exp
@@ -45,7 +45,9 @@ gdb_test "info exceptions" \
"program_error: $hex" \
"storage_error: $hex" \
"tasking_error: $hex" \
- "const.aint_global_e: $hex"]
+ ".*" \
+ "const.aint_global_e: $hex" \
+ ".*"]
gdb_test "info exceptions task" \
[multi_line "All Ada exceptions matching regular expression \"task\":" \