diff options
Diffstat (limited to 'binutils/testsuite/binutils-all/ar.exp')
| -rw-r--r-- | binutils/testsuite/binutils-all/ar.exp | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/binutils/testsuite/binutils-all/ar.exp b/binutils/testsuite/binutils-all/ar.exp index 0caa847..c66c43e 100644 --- a/binutils/testsuite/binutils-all/ar.exp +++ b/binutils/testsuite/binutils-all/ar.exp @@ -27,6 +27,8 @@ if ![is_remote host] { } } +set bfdtest1 [findfile $base_dir/bfdtest1] + # send_user "Version [binutil_version $AR]" # Test long file name support @@ -34,6 +36,7 @@ if ![is_remote host] { proc long_filenames { } { global AR global host_triplet + global bfdtest1 set testname "ar long file names" @@ -124,6 +127,14 @@ proc long_filenames { } { return } + verbose -log "$bfdtest1 $dest" + set exec_output [binutils_run $bfdtest1 "$dest"] + if ![string match "" $exec_output] { + verbose -log $exec_output + fail "$testname (bfdtest1)" + return + } + if [is_remote host] { remote_upload host $n1 tmpdir/$n1 remote_upload host $n2 tmpdir/$n2 @@ -224,6 +235,7 @@ proc thin_archive { } { global NM global srcdir global subdir + global bfdtest1 set testname "ar thin archive" @@ -249,6 +261,14 @@ proc thin_archive { } { return } + verbose -log "$bfdtest1 $archive" + set exec_output [binutils_run $bfdtest1 "$archive"] + if ![string match "" $exec_output] { + verbose -log $exec_output + fail "$testname (bfdtest1)" + return + } + set got [binutils_run $NM "--print-armap $archive"] if { ![string match "*text_symbol in *bintest.o*" $got] \ || ![string match "*data_symbol in *bintest.o*" $got] \ @@ -271,6 +291,7 @@ proc thin_archive_with_nested { } { global NM global srcdir global subdir + global bfdtest1 set testname "ar thin archive with nested archive" @@ -306,6 +327,14 @@ proc thin_archive_with_nested { } { return } + verbose -log "$bfdtest1 $archive" + set exec_output [binutils_run $bfdtest1 "$archive"] + if ![string match "" $exec_output] { + verbose -log $exec_output + fail "$testname (bfdtest1)" + return + } + set got [binutils_run $NM "--print-armap $archive"] if { ![string match "*text_symbol in *bintest.o*" $got] \ || ![string match "*data_symbol in *bintest.o*" $got] \ |