diff options
author | Jim Kingdon <jkingdon@engr.sgi.com> | 1994-02-07 01:50:51 +0000 |
---|---|---|
committer | Jim Kingdon <jkingdon@engr.sgi.com> | 1994-02-07 01:50:51 +0000 |
commit | 2558ba5dd651c733b86b9ea4320d6ea091ee9d71 (patch) | |
tree | 4e383723de90cf4377da6d31fac66c856748bdff /gdb/testsuite/config | |
parent | 1dd29bef1b0e38573a41c985428a7f29e71f19eb (diff) | |
download | gdb-2558ba5dd651c733b86b9ea4320d6ea091ee9d71.zip gdb-2558ba5dd651c733b86b9ea4320d6ea091ee9d71.tar.gz gdb-2558ba5dd651c733b86b9ea4320d6ea091ee9d71.tar.bz2 |
* config/udi-gdb.exp (gdb_load): Use "file", not "load" command,
since "run" automatically loads if necessary. Call gdb_target_udi
after the "file" since "file" kills any execution target.
Diffstat (limited to 'gdb/testsuite/config')
-rw-r--r-- | gdb/testsuite/config/udi-gdb.exp | 30 |
1 files changed, 16 insertions, 14 deletions
diff --git a/gdb/testsuite/config/udi-gdb.exp b/gdb/testsuite/config/udi-gdb.exp index 0a78b31..e12ed6f 100644 --- a/gdb/testsuite/config/udi-gdb.exp +++ b/gdb/testsuite/config/udi-gdb.exp @@ -42,20 +42,6 @@ proc gdb_version {} { } # -# gdb_load -- load a file into the debugger. -# return a -1 if anything goes wrong. -# -proc gdb_load { arg } { - global verbose - global loadpath - global loadfile - global GDB - global prompt - - return [gdb_file_cmd $arg] -} - -# # gdb_target_udi # Set gdb to the desired UDI target # @@ -95,6 +81,22 @@ proc gdb_target_udi { } { } # +# gdb_load -- load a file into the debugger. +# return a -1 if anything goes wrong. +# +proc gdb_load { arg } { + global verbose + global loadpath + global loadfile + global GDB + global prompt + + if [gdb_file_cmd $arg] then { return -1 } + + gdb_target_udi +} + +# # gdb_start -- start GDB running. This assumes that there the # UDICONF enviroment variable is set. # |