aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorTom de Vries <tdevries@suse.de>2024-06-20 15:37:48 +0200
committerTom de Vries <tdevries@suse.de>2024-06-20 15:37:48 +0200
commit6c58dad0ef53ff7d780c301464e77bdea038c7ec (patch)
treeaebf91d3c0636ae56896d7044adb38fb2494bb75
parent56f39033698b22a89571b345e5133b486822df1d (diff)
downloadfsf-binutils-gdb-6c58dad0ef53ff7d780c301464e77bdea038c7ec.zip
fsf-binutils-gdb-6c58dad0ef53ff7d780c301464e77bdea038c7ec.tar.gz
fsf-binutils-gdb-6c58dad0ef53ff7d780c301464e77bdea038c7ec.tar.bz2
[gdb/testsuite] Fix duplicates in gdb.fortran/huge.exp
With test-case gdb.fortran/huge.exp, on a system without fortran compiler, I ran into a number of duplicates: ... Running /home/vries/gdb/src/gdb/testsuite/gdb.fortran/huge.exp ... gdb compile failed, default_target_compile: Can't find gfortran. UNTESTED: gdb.fortran/huge.exp: huge.exp ... gdb compile failed, default_target_compile: Can't find gfortran. UNTESTED: gdb.fortran/huge.exp: huge.exp DUPLICATE: gdb.fortran/huge.exp: huge.exp UNSUPPORTED: gdb.fortran/huge.exp: require failed: expr $compilation_succeeded ... Fix this by wrapping the compile in a with_test_prefix, getting us instead: ... gdb compile failed, default_target_compile: Can't find gfortran. UNTESTED: gdb.fortran/huge.exp: CRASH_GDB=2097152: huge.exp ... gdb compile failed, default_target_compile: Can't find gfortran. UNTESTED: gdb.fortran/huge.exp: CRASH_GDB=16: huge.exp UNSUPPORTED: gdb.fortran/huge.exp: require failed: expr $compilation_succeeded ... Tested on x86_64-linux.
-rw-r--r--gdb/testsuite/gdb.fortran/huge.exp6
1 files changed, 4 insertions, 2 deletions
diff --git a/gdb/testsuite/gdb.fortran/huge.exp b/gdb/testsuite/gdb.fortran/huge.exp
index 8d2158f..78c1d52 100644
--- a/gdb/testsuite/gdb.fortran/huge.exp
+++ b/gdb/testsuite/gdb.fortran/huge.exp
@@ -37,8 +37,10 @@ lappend opts f90
set compilation_succeeded 0
for { set size [expr $max] } { $size >= $min } { set size [expr $size / 2] } {
set try_opts [concat $opts [list additional_flags=-DCRASH_GDB=$size]]
- if { [build_executable $testfile.exp $testfile $srcfile $try_opts] == -1 } {
- continue
+ with_test_prefix CRASH_GDB=$size {
+ if { [build_executable $testfile.exp $testfile $srcfile $try_opts] == -1 } {
+ continue
+ }
}
set compilation_succeeded 1