diff options
author | Adam Nemet <anemet@lnxw.com> | 2005-07-25 18:55:29 +0000 |
---|---|---|
committer | Adam Nemet <nemet@gcc.gnu.org> | 2005-07-25 18:55:29 +0000 |
commit | 334a03fd1e560c81ccf7b3a47e7481307fc5babe (patch) | |
tree | 3ee78fcce4155dfa0f538469a708296103d24b12 /gcc | |
parent | 1490f93a3c1bdce96d2dddfae1825821c703ab1c (diff) | |
download | gcc-334a03fd1e560c81ccf7b3a47e7481307fc5babe.zip gcc-334a03fd1e560c81ccf7b3a47e7481307fc5babe.tar.gz gcc-334a03fd1e560c81ccf7b3a47e7481307fc5babe.tar.bz2 |
profopt.exp (profopt-execute): Check for profiling data files on the target.
* lib/profopt.exp (profopt-execute): Check for profiling data
files on the target.
From-SVN: r102366
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
-rw-r--r-- | gcc/testsuite/lib/profopt.exp | 13 |
2 files changed, 14 insertions, 4 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index bcc4142..affa4b6 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2005-07-25 Adam Nemet <anemet@lnxw.com> + + * lib/profopt.exp (profopt-execute): Check for profiling data + files on the target. + 2005-07-25 Richard Guenther <rguenther@gcc.gnu.org> * gcc.dg/tree-ssa/flatten-1.c: Use longer function names diff --git a/gcc/testsuite/lib/profopt.exp b/gcc/testsuite/lib/profopt.exp index 369a0c0..a33742c 100644 --- a/gcc/testsuite/lib/profopt.exp +++ b/gcc/testsuite/lib/profopt.exp @@ -231,6 +231,8 @@ proc profopt-execute { src } { } set executable $tmpdir/[file tail [file rootname $src].x] + set basename [file tail $testcase] + set base [file rootname $basename] set count 0 foreach option $prof_option_list { @@ -245,7 +247,9 @@ proc profopt-execute { src } { verbose "Testing $testcase, $option" 1 # Remove old profiling and performance data files. - profopt-cleanup $testcase $prof_ext + foreach ext $prof_ext { + remote_file target delete $tmpdir/$base.$ext + } if [info exists perf_ext] { profopt-cleanup $testcase $perf_ext } @@ -282,9 +286,8 @@ proc profopt-execute { src } { set missing_file 0 # Make sure the profile data was generated, and fail if not. if { $status == "pass" } { - set basename [file tail $testcase] - set base [file rootname $basename] foreach ext $prof_ext { + remote_upload target $tmpdir/$base.$ext set files [glob -nocomplain $base.$ext] if { $files == "" } { set status "fail" @@ -335,7 +338,9 @@ proc profopt-execute { src } { } # Remove the profiling data files. - profopt-cleanup $testcase $prof_ext + foreach ext $prof_ext { + remote_file target delete $tmpdir/$base.$ext + } if { $status != "pass" } { continue |