From 7549fed824cbea8d9ea864742cf29ff293b09402 Mon Sep 17 00:00:00 2001 From: Tom de Vries Date: Tue, 12 May 2020 10:53:47 +0200 Subject: [PATCH] [gdb/testsuite] Fix duplicate test-names in gdb.fortran In gdb.fortran we have: ... DUPLICATE: gdb.fortran/complex.exp: whatis $ DUPLICATE: gdb.fortran/complex.exp: whatis $ DUPLICATE: gdb.fortran/complex.exp: whatis $ DUPLICATE: gdb.fortran/complex.exp: whatis $ ... Fix this by using with_test_prefix. Tested on x86_64-linux. gdb/testsuite/ChangeLog: 2020-05-12 Tom de Vries * gdb.fortran/complex.exp: Use with_test_prefix. --- gdb/testsuite/ChangeLog | 4 ++++ gdb/testsuite/gdb.fortran/complex.exp | 22 +++++++++++++++------- 2 files changed, 19 insertions(+), 7 deletions(-) diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 1db518edcc5..ae72ce6dd73 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2020-05-12 Tom de Vries + + * gdb.fortran/complex.exp: Use with_test_prefix. + 2020-05-12 Tom de Vries * gdb.trace/passcount.exp: Fix test-names. diff --git a/gdb/testsuite/gdb.fortran/complex.exp b/gdb/testsuite/gdb.fortran/complex.exp index a88e553e586..f1e754e1630 100644 --- a/gdb/testsuite/gdb.fortran/complex.exp +++ b/gdb/testsuite/gdb.fortran/complex.exp @@ -38,21 +38,29 @@ gdb_test "print c16" " = \\(-874,19\\)" gdb_test "whatis c" "type = complex\\(kind=4\\)" gdb_test "print \$_creal (c)" " = 1000" -gdb_test "whatis \$" " = real" +with_test_prefix "c" { + gdb_test "whatis \$" " = real" +} gdb_test "whatis c4" "type = complex\\(kind=4\\)" gdb_test "print \$_creal (c4)" " = 1000" -gdb_test "whatis \$" " = real" - +with_test_prefix "c4" { + gdb_test "whatis \$" " = real" +} gdb_test "whatis c8" "type = complex\\(kind=8\\)" gdb_test "print \$_creal (c8)" " = 321" -gdb_test "whatis \$" " = real\\*8" - +with_test_prefix "c8" { + gdb_test "whatis \$" " = real\\*8" +} gdb_test "whatis dc" "type = complex\\(kind=8\\)" gdb_test "print \$_creal (dc)" " = 321" -gdb_test "whatis \$" " = real\\*8" +with_test_prefix "dc" { + gdb_test "whatis \$" " = real\\*8" +} gdb_test "whatis c16" "type = complex\\(kind=16\\)" gdb_test "print \$_creal (c16)" " = -874" -gdb_test "whatis \$" " = real\\*16" +with_test_prefix "c16" { + gdb_test "whatis \$" " = real\\*16" +} -- 2.30.2