diff options
Diffstat (limited to 'ld')
| -rw-r--r-- | ld/ChangeLog | 5 | ||||
| -rw-r--r-- | ld/testsuite/ld-mips-elf/mips-elf-flags.exp | 9 |
2 files changed, 12 insertions, 2 deletions
diff --git a/ld/ChangeLog b/ld/ChangeLog index 0bc1876..529850d 100644 --- a/ld/ChangeLog +++ b/ld/ChangeLog @@ -1,6 +1,11 @@ 2017-06-27 Maciej W. Rozycki <macro@imgtec.com> * testsuite/ld-mips-elf/mips-elf-flags.exp (good_combination): + Use `remote_exec' to call `readelf'. Log the command issued. + +2017-06-27 Maciej W. Rozycki <macro@imgtec.com> + + * testsuite/ld-mips-elf/mips-elf-flags.exp (good_combination): Use `readelf -h' rather than `readelf --headers'. 2017-06-26 Maciej W. Rozycki <macro@imgtec.com> diff --git a/ld/testsuite/ld-mips-elf/mips-elf-flags.exp b/ld/testsuite/ld-mips-elf/mips-elf-flags.exp index cea2774..9461cb6 100644 --- a/ld/testsuite/ld-mips-elf/mips-elf-flags.exp +++ b/ld/testsuite/ld-mips-elf/mips-elf-flags.exp @@ -70,8 +70,13 @@ proc good_combination {arglist flags} { } elseif {![ld_link "$ld $ldemul" $finalobj "-r $objs"]} { fail $testname } else { - catch "exec $READELF -h $finalobj" output - if {![regexp "Flags: *(\[^\n\]*)" $output full gotflags]} { + set cmd "$READELF -h $finalobj" + send_log "$cmd\n" + set cmdret [remote_exec host [concat sh -c [list "$cmd 2>&1"]]] + set output [lindex $cmdret 1] + set cmdret [lindex $cmdret 0] + if {$cmdret != 0 \ + || ![regexp "Flags: *(\[^\n\r\]*)" $output full gotflags]} { unresolved $testname } else { set failed 0 |