diff options
author | Tom Tromey <tromey@adacore.com> | 2024-05-08 13:46:53 -0600 |
---|---|---|
committer | Tom Tromey <tromey@adacore.com> | 2024-09-06 10:22:13 -0600 |
commit | a63b3b2f74e95380a718f9342ee42274dd877a3b (patch) | |
tree | 3a69eb89b4ffb2534e8b40112264cb86a3432363 /gdb/testsuite/gdb.ada/mi_string_access.exp | |
parent | f83ca9c7cca4ab7a2d7352104a37932474320410 (diff) | |
download | gdb-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.exp | 4 |
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 |