gdb/testsuite/

	* lib/future.exp (gdb_default_target_compile): Use tail name
	of $destfile as the output name of compile.  Move the
	generated file to $destfile on build.

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 6ce8209..47b7f6b 100644 (file)
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,5 +1,11 @@
 2013-07-18  Yao Qi  <yao@codesourcery.com>
 
+       * lib/future.exp (gdb_default_target_compile): Use tail name
+       of $destfile as the output name of compile.  Move the
+       generated file to $destfile on build.
+
+2013-07-18  Yao Qi  <yao@codesourcery.com>
+
        * lib/gdb.exp (gdb_compile): Set
        gdb_saved_set_unbuffered_mode_obj to
        set_unbuffered_mode_saved.o if host is remote.  Invoke

diff --git a/gdb/testsuite/lib/future.exp b/gdb/testsuite/lib/future.exp
index 9855fdc..5d53e93 100644 (file)
--- a/gdb/testsuite/lib/future.exp
+++ b/gdb/testsuite/lib/future.exp
@@ -419,8 +419,8 @@ proc gdb_default_target_compile {source destfile type options} {
     }
 
     if {[is_remote host]} {
-       append add_flags " -o a.out"
-       remote_file host delete a.out
+       append add_flags " -o " [file tail $destfile]
+       remote_file host delete [file tail $destfile]
     } else {
        if { $destfile != "" } {
            append add_flags " -o $destfile"
@@ -478,8 +478,8 @@ proc gdb_default_target_compile {source destfile type options} {
 
     set compiler_flags $opts
     if {[is_remote host]} {
-       remote_upload host a.out $destfile
-       remote_file host delete a.out
+       remote_upload host [file tail $destfile] $destfile
+       remote_file host delete [file tail $destfile]
     }
     set comp_output [prune_warnings [lindex $status 1]]
     regsub "^\[\r\n\]+" $comp_output "" comp_output