* config/sid.exp (gdb_load): Add test for empty argument. Adjust
authorKevin Buettner <kevinb@redhat.com>
Thu, 19 Jul 2007 00:41:27 +0000 (00:41 +0000)
committerKevin Buettner <kevinb@redhat.com>
Thu, 19 Jul 2007 00:41:27 +0000 (00:41 +0000)
return value to be compatible with gdb_run_cmd in lib/gdb.exp.
Remove call to gdb_unload.

gdb/testsuite/ChangeLog
gdb/testsuite/config/sid.exp

index 8ec0434..7cede72 100644 (file)
@@ -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>
 
index 9990442..7114467 100644 (file)
@@ -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 {