diff options
| author | billingd <billingd@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-04-28 23:58:31 +0000 |
|---|---|---|
| committer | billingd <billingd@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-04-28 23:58:31 +0000 |
| commit | c03384c2c259d5bdafdea0b29f1fef01f1f9f9c2 (patch) | |
| tree | b33521d865ba38baae5951b246e72816462b6b8b | |
| parent | 7f956288294532a62a8a2ce320703b45641df731 (diff) | |
| download | ppe42-gcc-c03384c2c259d5bdafdea0b29f1fef01f1f9f9c2.tar.gz ppe42-gcc-c03384c2c259d5bdafdea0b29f1fef01f1f9f9c2.zip | |
2004-04-29 David Billinghurst (David.Billinghurst@riotinto.com)
* lib/fortran-torture.exp (fortran-torture.exp): Catch
error if file cannot be deleted.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@98949 138bc75d-0d04-0410-961f-82ee72b054a4
| -rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/testsuite/lib/fortran-torture.exp | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index f02ae0f5427..638c7fc7931 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2004-04-29 David Billinghurst (David.Billinghurst@riotinto.com) + + * lib/fortran-torture.exp (fortran-torture.exp): Catch + error if file cannot be deleted. + 2005-04-28 Kazu Hirata <kazu@cs.umass.edu> * g++.dg/tree-ssa/pr18178.C, gcc.dg/tree-ssa/20030821-1.c, diff --git a/gcc/testsuite/lib/fortran-torture.exp b/gcc/testsuite/lib/fortran-torture.exp index e47c2efa94a..8f6087c66bf 100644 --- a/gcc/testsuite/lib/fortran-torture.exp +++ b/gcc/testsuite/lib/fortran-torture.exp @@ -180,7 +180,7 @@ proc fortran-torture-execute { src } { # exist. If not, the testcase should XFAIL. # Compile the testcase. - remote_file build delete $executable + catch { remote_file build delete $executable } verbose "Testing $testcase, $option" 1 set options "" |
