diff options
-rw-r--r-- | binutils/testsuite/ChangeLog | 4 | ||||
-rw-r--r-- | binutils/testsuite/lib/utils-lib.exp | 6 |
2 files changed, 10 insertions, 0 deletions
diff --git a/binutils/testsuite/ChangeLog b/binutils/testsuite/ChangeLog index 3a74c9f..a7e6ad6 100644 --- a/binutils/testsuite/ChangeLog +++ b/binutils/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2006-04-10 H.J. Lu <hongjiu.lu@intel.com> + + * lib/utils-lib.exp (default_binutils_run): Check exit status. + 2005-12-24 Ben Elliston <bje@gnu.org> * config/default.exp: Do not load the unneeded util-defs.exp. diff --git a/binutils/testsuite/lib/utils-lib.exp b/binutils/testsuite/lib/utils-lib.exp index bb819a3..f7970b2 100644 --- a/binutils/testsuite/lib/utils-lib.exp +++ b/binutils/testsuite/lib/utils-lib.exp @@ -73,6 +73,12 @@ proc default_binutils_run { prog progargs } { if {![string match "" $exec_output]} then { send_log "$exec_output\n" verbose "$exec_output" + } else { + if { [lindex $state 0] != 0 } { + set exec_output "$prog exited with status [lindex $state 0]" + send_log "$exec_output\n" + verbose "$exec_output" + } } return $exec_output } |