aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/gdb.ada/mi_string_access.exp
diff options
context:
space:
mode:
authorTom Tromey <tromey@adacore.com>2024-05-08 13:46:53 -0600
committerTom Tromey <tromey@adacore.com>2024-09-06 10:22:13 -0600
commita63b3b2f74e95380a718f9342ee42274dd877a3b (patch)
tree3a69eb89b4ffb2534e8b40112264cb86a3432363 /gdb/testsuite/gdb.ada/mi_string_access.exp
parentf83ca9c7cca4ab7a2d7352104a37932474320410 (diff)
downloadgdb-a63b3b2f74e95380a718f9342ee42274dd877a3b.zip
gdb-a63b3b2f74e95380a718f9342ee42274dd877a3b.tar.gz
gdb-a63b3b2f74e95380a718f9342ee42274dd877a3b.tar.bz2
Introduce and use foreach_gnat_encoding
gnat-llvm does not support the -fgnat-encodings flag. This patch prepares gdb's Ada tests to handle this situation by introducing a new foreach_gnat_encoding. A subsequent patch may change this to support gnat-llvm; meanwhile this is a little cleaner anyway.
Diffstat (limited to 'gdb/testsuite/gdb.ada/mi_string_access.exp')
-rw-r--r--gdb/testsuite/gdb.ada/mi_string_access.exp4
1 files changed, 2 insertions, 2 deletions
diff --git a/gdb/testsuite/gdb.ada/mi_string_access.exp b/gdb/testsuite/gdb.ada/mi_string_access.exp
index 15b8cf1..8fd116b 100644
--- a/gdb/testsuite/gdb.ada/mi_string_access.exp
+++ b/gdb/testsuite/gdb.ada/mi_string_access.exp
@@ -22,8 +22,8 @@ standard_ada_testfile bar
load_lib mi-support.exp
set MIFLAGS "-i=mi"
-foreach_with_prefix scenario {all minimal} {
- set flags [list debug additional_flags=-fgnat-encodings=$scenario]
+foreach_gnat_encoding scenario flags {all minimal} {
+ lappend flags debug
if {[gdb_compile_ada "${srcfile}" "${binfile}-${scenario}" executable $flags] != ""} {
return -1