diff options
| author | Daniel Jacobowitz <drow@false.org> | 2007-03-27 17:59:38 +0000 |
|---|---|---|
| committer | Daniel Jacobowitz <drow@false.org> | 2007-03-27 17:59:38 +0000 |
| commit | b741e217929039042129802a61e4510c580ecc79 (patch) | |
| tree | 7f95fddc87c00954b65a276ae74af2533d50aa59 /gdb/testsuite/gdb.ada/start.exp | |
| parent | d2449ee801d18f5af7317bc72c92bc9bbb7b669e (diff) | |
| download | gdb-b741e217929039042129802a61e4510c580ecc79.zip gdb-b741e217929039042129802a61e4510c580ecc79.tar.gz gdb-b741e217929039042129802a61e4510c580ecc79.tar.bz2 | |
* config/gdbserver.exp (gdbserver_gdb_load): Update argument list.
(gdb_load): Delete, replace with...
(gdb_reload): ...this.
* gdb.server/server-run.exp: Use gdb_load and gdbserver_run.
* gdb.server/server-mon.exp: Likewise.
* lib/gdb.exp (gdb_run_cmd): Use gdb_reload.
(gdb_start_cmd): New.
(gdb_file_cmd): Save the last loaded file.
(gdb_reload): New.
(gdb_gnu_strip_debug): Use transform.
* lib/gdbserver-support.exp (gdbserver_spawn): Move file download
support here. Use new $last_loaded_file. Check mtime.
(gdb_target_cmd): Handle ObjC failure case.
(infer_host_exec): Delete.
(gdbserver_load): Rename to...
(gdbserver_run): ...this. Simplify.
* lib/mi-support.exp (mi_gdb_file_cmd): Set last_loaded_file.
(mi_gdb_load): Move most contents to a new function...
(mi_gdb_target_load): ...here. Simplify call to gdbserver_gdb_load.
(mi_run_cmd): Use mi_gdb_target_load.
* gdb.base/break.exp, gdb.base/ending-run.exp, gdb.base/pending.exp,
gdb.base/sepdebug.exp, gdb.base/unload.exp, gdb.objc/objcdecode.exp:
Use gdb_run_cmd.
* gdb.base/charsign.exp: Remove incorrect comment.
* gdb.base/dbx.exp (gdb_file_cmd): Set last_loaded_file.
* gdb.ada/exec_changed.exp, gdb.ada/null_record.exp, gdb.ada/start.exp,
gdb.base/start.exp: Use gdb_start_cmd.
Diffstat (limited to 'gdb/testsuite/gdb.ada/start.exp')
| -rw-r--r-- | gdb/testsuite/gdb.ada/start.exp | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/gdb/testsuite/gdb.ada/start.exp b/gdb/testsuite/gdb.ada/start.exp index a658bd7..4e1da51 100644 --- a/gdb/testsuite/gdb.ada/start.exp +++ b/gdb/testsuite/gdb.ada/start.exp @@ -37,7 +37,11 @@ gdb_reinitialize_dir $srcdir/$subdir gdb_load ${binfile} # Verify that "start" lands inside the right procedure. -gdb_test "start" \ +if { [gdb_start_cmd] < 0 } { + untested start + return -1 +} + +gdb_test "" \ "dummy \\(\\) at .*dummy.adb.*" \ "start" - |