]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blobdiff - gdb/testsuite/config/sim.exp
Copyright updates for 2007.
[thirdparty/binutils-gdb.git] / gdb / testsuite / config / sim.exp
index 5d8a93d5311c13ae31f8a35f1cfa636f74cc57a7..9b6a226e044ad0fe0d24bb0c92e643614d19e4e3 100644 (file)
@@ -1,5 +1,5 @@
 # Test Framework Driver for GDB driving a builtin simulator
-#   Copyright 1994, 1997, 1998 Free Software Foundation, Inc.
+#   Copyright 1994, 1997, 1998, 2004, 2007 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
@@ -55,7 +55,9 @@ proc gdb_load { arg } {
     global GDB
     global gdb_prompt
 
-    if [gdb_file_cmd $arg] then { return -1 }
+    if { $arg != "" } {
+       if [gdb_file_cmd $arg] then { return -1 }
+    }
 
     gdb_target_sim
 
@@ -69,7 +71,7 @@ proc gdb_load { arg } {
            }
            set timeout 30
            verbose "Timeout is now $timeout seconds" 2
-           return 1
+           return 0
        }
        -re "$gdb_prompt $"     {
            if $verbose>1 then {
@@ -82,4 +84,5 @@ proc gdb_load { arg } {
            }
        }
     }
+    return -1
 }