(gdb_target_cmd): Add explicit error return.

(gdb_target_monitor): Add check of gdb_target_cmd return value.

1 files changed, 2 insertions, 1 deletions

diff --git a/gdb/testsuite/config/monitor.exp b/gdb/testsuite/config/monitor.exp
index e9a22184855..e48d0d94461 100644
--- a/gdb/testsuite/config/monitor.exp
+++ b/gdb/testsuite/config/monitor.exp
@@ -67,6 +67,7 @@ proc gdb_target_cmd { targetname serialport } {
 	    }
 	}
     }
+    return 1
 }
 
 
@@ -109,7 +110,7 @@ proc gdb_target_monitor { exec_file } {
     for {set j 1} {$j <= 2} {incr j} {
 	if [gdb_file_cmd $exec_file] { return -1; }
 
-	gdb_target_cmd $targetname $serialport;
+	if ![gdb_target_cmd $targetname $serialport] { return 0; }
 
 	gdb_target_exec;