GDB 7.6.50

gdb/testsuite/config/sid.exp

Index: gdb/testsuite/config/sid.exp
diff --git a/gdb/testsuite/config/sid.exp b/gdb/testsuite/config/sid.exp
index 88fd83f731732703ed14a7fa803e498bd66266f6..83f85340a50fdaec5d39a9e7102004eaba0c75d3 100644
--- a/gdb/testsuite/config/sid.exp
+++ b/gdb/testsuite/config/sid.exp
@@ -1,5 +1,5 @@
 # Test Framework Driver for GDB driving an external simulator
-#   Copyright 1999, 2001, 2007-2012 Free Software Foundation, Inc.
+#   Copyright 1999-2013 Free Software Foundation, Inc.
 #
 # This program is free software; you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
@@ -96,7 +96,7 @@ proc sid_start {} {
     sleep 4
 
     if ![target_info exists gdb,no_push_conn] {
-        remote_push_conn host;
+        remote_push_conn host
     }
 }
 
@@ -111,8 +111,8 @@ proc gdb_start {} {
 
 proc sid_exit {} {
     if ![target_info exists gdb,no_push_conn] {
-	remote_close host;
-	remote_pop_conn host;
+	remote_close host
+	remote_pop_conn host
     }
 }
 
@@ -190,28 +190,28 @@ proc gdb_load { arg } {
 	    if $verbose>1 then {
 		perror "Error during download."
 	    }
-	    set retval -1;
+	    set retval -1
 	}
 	-re ".*$gdb_prompt $" {
 	    if $verbose>1 then {
 		send_user "Loaded $arg into $GDB\n"
 	    }
-	    set retval 0;
+	    set retval 0
 	}
 	-re "$gdb_prompt $"     {
 	    if $verbose>1 then {
 		perror "GDB couldn't load."
 	    }
-	    set retval -1;
+	    set retval -1
 	}
 	timeout {
 	    if $verbose>1 then {
 		perror "Timed out trying to load $arg."
 	    }
-	    set retval -1;
+	    set retval -1
 	}
     }
     set timeout $prev_timeout
     verbose "Timeout is now $timeout seconds" 2
-    return $retval;
+    return $retval
 }