[binutils-gdb] [gdb/testsuite] Fix gdb.xml/tdesc-regs.exp for remote host

Tom de Vries vries@sourceware.org
Tue Mar 21 10:25:20 GMT 2023


https://sourceware.org/git/gitweb.cgi?p=binutils-gdb.git;h=96cabfaa4327de5387487ab7af8239aebc00230e

commit 96cabfaa4327de5387487ab7af8239aebc00230e
Author: Tom de Vries <tdevries@suse.de>
Date:   Tue Mar 21 11:25:12 2023 +0100

    [gdb/testsuite] Fix gdb.xml/tdesc-regs.exp for remote host
    
    Fix test-case gdb.xml/tdesc-regs.exp for remote host by using appropriate
    filenames.
    
    Tested on x86_64-linux.

Diff:
---
 gdb/testsuite/gdb.xml/tdesc-regs.exp | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/gdb/testsuite/gdb.xml/tdesc-regs.exp b/gdb/testsuite/gdb.xml/tdesc-regs.exp
index 4545cd1c9b5..684c47f0b35 100644
--- a/gdb/testsuite/gdb.xml/tdesc-regs.exp
+++ b/gdb/testsuite/gdb.xml/tdesc-regs.exp
@@ -142,12 +142,10 @@ proc load_description { file errmsg xml_file } {
     close $ifd
     close $ofd
 
-    if {[is_remote host]} {
-	set regs_file [remote_download host "$regs_file" $xml_file]
-    }
+    set host_regs_file [gdb_remote_download host "$regs_file"]
 
     # Anchor the test output, so that error messages are detected.
-    set cmd "set tdesc filename [file tail $regs_file]"
+    set cmd "set tdesc filename $host_regs_file"
     set msg "set tdesc filename $xml_file - from $file"
     set cmd_regex [string_to_regexp $cmd]
     gdb_test_multiple $cmd $msg {


More information about the Gdb-cvs mailing list