aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBen Elliston <bje@au.ibm.com>2004-05-12 03:28:46 +0000
committerBen Elliston <bje@au.ibm.com>2004-05-12 03:28:46 +0000
commit8d26365061bd4ffae22fd147db2c30fc9b736cc8 (patch)
treee14c98b77acd75fadd52d3657df6ac2248e9f3c7 /binutils/testsuite/binutils-all/ar.exp
parent * ld-sh/sh64/relax.exp: Remove stray semicolons. (diff)
downloadbinutils-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.exp18
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 {