diff --git a/binutils/testsuite/ChangeLog b/binutils/testsuite/ChangeLog index 3a74c9f8e6d125c8aa3e65669741b09fadbf50af..a7e6ad6d975ae820910da53ac61628007dfe98ba 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 bb819a3766fbaba58e7c47a30dbc74d41870f6bd..f7970b29269171d4b287d252f9ae9eafcd87157e 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 }