diff options
author | Ben Elliston <bje@au.ibm.com> | 2004-05-12 03:28:46 +0000 |
---|---|---|
committer | Ben Elliston <bje@au.ibm.com> | 2004-05-12 03:28:46 +0000 |
commit | 8d26365061bd4ffae22fd147db2c30fc9b736cc8 (patch) | |
tree | e14c98b77acd75fadd52d3657df6ac2248e9f3c7 /binutils/testsuite/binutils-all/ar.exp | |
parent | * ld-sh/sh64/relax.exp: Remove stray semicolons. (diff) | |
download | binutils-gdb-8d26365061bd4ffae22fd147db2c30fc9b736cc8.tar.gz binutils-gdb-8d26365061bd4ffae22fd147db2c30fc9b736cc8.tar.bz2 binutils-gdb-8d26365061bd4ffae22fd147db2c30fc9b736cc8.zip |
* binutils-all/ar.exp: Remove stray semicolons.
* binutils-all/dlltool.exp: Likewise.
* binutils-all/objcopy.exp: Likewise.
* binutils-all/readelf.exp: Likewise.
* binutils-all/windres/windres.exp: Likewise.
* lib/utils-lib.exp: Likewise.
Diffstat (limited to 'binutils/testsuite/binutils-all/ar.exp')
-rw-r--r-- | binutils/testsuite/binutils-all/ar.exp | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/binutils/testsuite/binutils-all/ar.exp b/binutils/testsuite/binutils-all/ar.exp index 7f01c764078..2c16fafb0dd 100644 --- a/binutils/testsuite/binutils-all/ar.exp +++ b/binutils/testsuite/binutils-all/ar.exp @@ -67,14 +67,14 @@ proc long_filenames { } { close $f if [is_remote host] { - set file1 [remote_download host $file1]; - set file2 [remote_download host $file2]; + set file1 [remote_download host $file1] + set file2 [remote_download host $file2] set dest artest.a } else { set dest tmpdir/artest.a } - remote_file host delete $dest; + remote_file host delete $dest set got [binutils_run $AR "rc $dest $file1 $file2"] if [is_remote host] { @@ -90,7 +90,7 @@ proc long_filenames { } { return } - remote_file host delete $dest; + remote_file host delete $dest set got [binutils_run $AR "rc $dest $file1 $file2"] if ![string match "" $got] { @@ -102,15 +102,15 @@ proc long_filenames { } { remote_file build delete tmpdir/$n2 set got [binutils_run $AR "t $dest"] - regsub "\[\r\n \t\]*$" "$got" "" got; + regsub "\[\r\n \t\]*$" "$got" "" got if ![string match "$n1*$n2" $got] { fail $testname return } if [is_remote host] { - remote_file host delete $file1; - remote_file host delete $file2; + remote_file host delete $file1 + remote_file host delete $file2 } verbose -log "$AR x $dest" @@ -123,8 +123,8 @@ proc long_filenames { } { } if [is_remote host] { - remote_upload host $n1 tmpdir/$n1; - remote_upload host $n2 tmpdir/$n2; + remote_upload host $n1 tmpdir/$n1 + remote_upload host $n2 tmpdir/$n2 set file1 tmpdir/$n1 set file2 tmpdir/$n2 } else { |