From 6976b5b96120ad71af4cec2891f3d8ae7869e4e0 Mon Sep 17 00:00:00 2001 From: Simon Marchi Date: Tue, 30 Nov 2021 21:00:59 -0500 Subject: [PATCH] gdb.base/corefile-buildid.exp: fix DUPLICATEs when failing to generate a core file When my system isn't properly configured to generate core files in the local directory, I see these DUPLICATEs: DUPLICATE: gdb.base/corefile-buildid.exp: could not generate core file Fix that by having a single with_test_prefix around that message and what follows. Change-Id: I4ac245fcce1c666db56e3bad3582aa17f183dcba --- gdb/testsuite/gdb.base/corefile-buildid.exp | 38 ++++++++++----------- 1 file changed, 19 insertions(+), 19 deletions(-) diff --git a/gdb/testsuite/gdb.base/corefile-buildid.exp b/gdb/testsuite/gdb.base/corefile-buildid.exp index 15509be7039..e1703d6a248 100644 --- a/gdb/testsuite/gdb.base/corefile-buildid.exp +++ b/gdb/testsuite/gdb.base/corefile-buildid.exp @@ -257,30 +257,30 @@ proc do_corefile_buildid_tests {args} { lappend suffix "sepdebug" } - # Find the core file. - set corefile [core_find $program_to_run] - if {$corefile == ""} { - untested "could not generate core file" - return - } - verbose -log "corefile is $corefile" + with_test_prefix "[join $suffix \ ]" { + # Find the core file. + set corefile [core_find $program_to_run] + if {$corefile == ""} { + untested "could not generate core file" + return + } + verbose -log "corefile is $corefile" - # Grab the build-id from the binary, removing ".debug" from the end. - set buildid [build_id_debug_filename_get $program_to_run] - if {$buildid == ""} { - untested "binary for [join $suffix \ ] has no build-id" - } - regsub {\.debug$} $buildid {} buildid - verbose -log "build-id is $buildid" + # Grab the build-id from the binary, removing ".debug" from the end. + set buildid [build_id_debug_filename_get $program_to_run] + if {$buildid == ""} { + untested "binary has no build-id" + } + regsub {\.debug$} $buildid {} buildid + verbose -log "build-id is $buildid" - with_test_prefix "[join $suffix \ ]" { locate_exec_from_core_build_id $corefile $buildid \ [join $suffix -] $sepdebug false $shared - } - with_test_prefix "symlink [join $suffix \ ]" { - locate_exec_from_core_build_id $corefile $buildid \ - [join $suffix -] $sepdebug true $shared + with_test_prefix "symlink" { + locate_exec_from_core_build_id $corefile $buildid \ + [join $suffix -] $sepdebug true $shared + } } } -- 2.30.2