* config/sparclet.exp: Detect gratuitous change to sparclet gdb

 	target mode.

1 files changed, 25 insertions, 19 deletions

diff --git a/gdb/testsuite/config/sparclet.exp b/gdb/testsuite/config/sparclet.exp
index db128b0..1919aca 100644
--- a/gdb/testsuite/config/sparclet.exp
+++ b/gdb/testsuite/config/sparclet.exp
@@ -181,10 +181,14 @@ proc gdb_sparclet_startup { arg } {
 
 	send_gdb "load $loader [target_info gdb_stub_offset]\n"
 	verbose "Loading $loader into $GDB" 2
+	set no_run_command 0;
 	gdb_expect 1200 {
 	     -re "Loading.*$gdb_prompt $" {
 		verbose "Loaded $loader into $GDB" 1
 	    }
+	    -re "Transfer rate:.*Switching to remote protocol.*Remote debugging" {
+		set no_run_command 1;
+	    }
 	     -re "$gdb_prompt $"     {
 		if $verbose>1 then {
 		    perror "GDB couldn't load."
@@ -197,25 +201,27 @@ proc gdb_sparclet_startup { arg } {
 	    }
 	}
 
-	send_gdb "run\n";
-	gdb_expect 60 {
-	     -re "A program is being debug.*Kill it.*y or n. $" {
-		send_gdb "y\n"
-		exp_continue
-	    }
-	     -re "The program being debugged .*y or n. $" {
-		send_gdb "y\n"
-		exp_continue
-	    }
-	     -re "Starting program:.*loader.*$" { 
-		verbose "Starting loader succeeded" 
-	    }
-	    timeout { 
-		perror "(timeout) starting the loader" ; 
-		return -1 
-	    }
-	    default {
-		perror "error starting the loader";
+	if !$no_run_command {
+	    send_gdb "run\n";
+	    gdb_expect 60 {
+		-re "A program is being debug.*Kill it.*y or n. $" {
+		    send_gdb "y\n"
+		    exp_continue
+		}
+		-re "The program being debugged .*y or n. $" {
+		    send_gdb "y\n"
+		    exp_continue
+		}
+		-re "Starting program:.*loader.*$" { 
+		    verbose "Starting loader succeeded" 
+		}
+		timeout { 
+		    perror "(timeout) starting the loader" ; 
+		    return -1 
+		}
+		default {
+		    perror "error starting the loader";
+		}
 	    }
 	}
 	sleep 2;