[gdb/testsuite] Fix have_avx for remote target
authorTom de Vries <tdevries@suse.de>
Fri, 17 Mar 2023 15:06:39 +0000 (16:06 +0100)
committerTom de Vries <tdevries@suse.de>
Fri, 17 Mar 2023 15:06:39 +0000 (16:06 +0100)
In proc have_avx we compile some source into an exec, resulting in a file $obj
on build, and then attempt to execute it on target:
...
    set result [remote_exec target $obj]
...

Fix this by using gdb_remote_download target.

Likewise in a few other procs that use "remote_exec target".

Tested on x86_64-linux.

gdb/testsuite/lib/gdb.exp

index 0e69bcab28820a35460c257ee74a0e5dc4590562..7ceb702b0bf3afa3ec64953c38c1c6d653e6dc19 100644 (file)
@@ -8987,7 +8987,8 @@ gdb_caching_proc supports_scalar_storage_order_attribute {} {
        return 0
     }
 
-    set result [remote_exec target $obj]
+    set target_obj [gdb_remote_download target $obj]
+    set result [remote_exec target $target_obj]
     set status [lindex $result 0]
     set output [lindex $result 1]
     if { $output != "" } {
@@ -9047,7 +9048,8 @@ gdb_caching_proc have_mpx {} {
         return 0
     }
 
-    set result [remote_exec target $obj]
+    set target_obj [gdb_remote_download target $obj]
+    set result [remote_exec target $target_obj]
     set status [lindex $result 0]
     set output [lindex $result 1]
     if { $output != "" } {
@@ -9071,7 +9073,8 @@ gdb_caching_proc have_mpx {} {
         return 0
     }
 
-    set result [remote_exec target $obj]
+    set target_obj [gdb_remote_download target $obj]
+    set result [remote_exec target $target_obj]
     set status [lindex $result 0]
     set output [lindex $result 1]
     set status [expr ($status == 0) \
@@ -9114,7 +9117,8 @@ gdb_caching_proc have_avx {} {
         return 0
     }
 
-    set result [remote_exec target $obj]
+    set target_obj [gdb_remote_download target $obj]
+    set result [remote_exec target $target_obj]
     set status [lindex $result 0]
     set output [lindex $result 1]
     if { $output != "" } {
@@ -9311,7 +9315,8 @@ gdb_caching_proc arm_cc_for_target {} {
                 $src \
                 executable [list compiler=$compiler]]} {
 
-           set result [remote_exec target $obj]
+           set target_obj [gdb_remote_download target $obj]
+           set result [remote_exec target $target_obj]
            set status [lindex $result 0]
            set output [lindex $result 1]