From: Bob Manson Date: Mon, 24 Feb 1997 21:24:26 +0000 (+0000) Subject: * lib/gdb.exp(gdb_test): Generate a FAIL message when X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=3c0af8a010aa4cd7b907729cf7f5e6ce9a517041;p=binutils-gdb.git * lib/gdb.exp(gdb_test): Generate a FAIL message when send_gdb fails. --- diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index a06f49d2be7..8760331196a 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +Mon Feb 24 13:23:26 1997 Bob Manson + + * lib/gdb.exp(gdb_test): Generate a FAIL message when + send_gdb fails. + Sun Feb 23 19:56:02 1997 Bob Manson * config/vr4300.exp: New file. diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp index 2e33b7023f8..4e0920f7227 100644 --- a/gdb/testsuite/lib/gdb.exp +++ b/gdb/testsuite/lib/gdb.exp @@ -350,6 +350,7 @@ proc gdb_test { args } { if ![string match $command ""] { if { [send_gdb "$command\n"] != "" } { perror "Couldn't send $command to GDB."; + fail "$message"; return $result; } }