[gdb/testsuite] Fix gdb.xml/tdesc-reload.exp for remote host
authorTom de Vries <tdevries@suse.de>
Tue, 21 Mar 2023 10:25:12 +0000 (11:25 +0100)
committerTom de Vries <tdevries@suse.de>
Tue, 21 Mar 2023 10:25:12 +0000 (11:25 +0100)
Fix test-case gdb.xml/tdesc-reload.exp for remote host by using appropriate
filenames.

Tested on x86_64-linux.

gdb/testsuite/gdb.xml/tdesc-reload.exp
gdb/testsuite/lib/gdb.exp

index 21dede88faae48bfbc6abe09336d595a39e24339..b8ece6fc19c0d55c9edd2dcf1b0681be3a3b0b1f 100644 (file)
@@ -29,9 +29,9 @@ if {![runto_main]} {
 }
 
 # Three files we're going to write out to.
-set xml_file_1 [standard_output_file outfile1.xml]
-set xml_file_2 [standard_output_file outfile2.xml]
-set xml_file_3 [standard_output_file outfile3.xml]
+set xml_file_1 [host_standard_output_file outfile1.xml]
+set xml_file_2 [host_standard_output_file outfile2.xml]
+set xml_file_3 [host_standard_output_file outfile3.xml]
 
 # Write the current target description to a file.
 gdb_test_no_output "pipe maint print xml-tdesc | cat > $xml_file_1" \
index 111a158e7ce63d41d33709db20e4b4f24295509a..0a0ae697d1ee0b5c77e155795298518508d729f2 100644 (file)
@@ -6364,6 +6364,16 @@ proc standard_output_file {basename} {
     return [file join $dir $basename]
 }
 
+# Turn BASENAME into a file name on host.
+
+proc host_standard_output_file { basename } {
+    if { [is_remote host] } {
+       return $basename
+    } else {
+       return [standard_output_file $basename]
+    }
+}
+
 # Turn BASENAME into a full file name in the standard output directory.  If
 # GDB has been launched more than once then append the count, starting with
 # a ".1" postfix.