* config/sid.exp (gdb_load): Add test for empty argument. Adjust

	return value to be compatible with gdb_run_cmd in lib/gdb.exp.
	Remove call to gdb_unload.

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 8ec0434e34b3c3cdb8c6ceaf457819625ae3e9a9..7cede727ce9e3eaf4a970c2394c2dba61548c11d 100644 (file)
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,9 @@
+2007-07-18  Kevin Buettner  <kevinb@redhat.com>
+
+       * config/sid.exp (gdb_load): Add test for empty argument.  Adjust
+       return value to be compatible with gdb_run_cmd in lib/gdb.exp.
+       Remove call to gdb_unload.
+
 2007-07-17  Pedro Alves  <pedro_alves@portugalmail.pt>
            Daniel Jacobowitz  <dan@codesourcery.com>
 

diff --git a/gdb/testsuite/config/sid.exp b/gdb/testsuite/config/sid.exp
index 9990442975501a520749eb35ec506c22b4aa4a2c..71144674eb4d682eb73a5932ee46526f51e21c48 100644 (file)
--- a/gdb/testsuite/config/sid.exp
+++ b/gdb/testsuite/config/sid.exp
@@ -175,8 +175,10 @@ proc gdb_load { arg } {
     global gdb_prompt
     global retval
 
-    gdb_unload
-    if [gdb_file_cmd $arg] then { return -1 }
+    if { $arg != "" } {
+       if [gdb_file_cmd $arg] then { return -1 }
+    }
+
     gdb_target_sid
 
     send_gdb "load\n"
@@ -195,7 +197,7 @@ proc gdb_load { arg } {
            if $verbose>1 then {
                send_user "Loaded $arg into $GDB\n"
            }
-           set retval 1;
+           set retval 0;
        }
        -re "$gdb_prompt $"     {
            if $verbose>1 then {