diff options
| -rw-r--r-- | gdb/testsuite/ChangeLog | 6 | ||||
| -rw-r--r-- | gdb/testsuite/lib/insight-support.exp | 17 |
2 files changed, 23 insertions, 0 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 23445950581..48ba2f0764f 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,9 @@ +2001-09-18 Keith Seitz <keiths@redhat.com> + + * lib/insight-support.exp (_gdbtk_export_target_info): Add + support for running tests against sid targets. + (gdbtk_done): Ditto. + 2001-09-18 Corinna Vinschen <vinschen@redhat.com> * gdb.base/ending-run.c (main): Set stdout buffersize diff --git a/gdb/testsuite/lib/insight-support.exp b/gdb/testsuite/lib/insight-support.exp index 9c3cbad4259..db2747e5ce6 100644 --- a/gdb/testsuite/lib/insight-support.exp +++ b/gdb/testsuite/lib/insight-support.exp @@ -185,6 +185,9 @@ proc _gdbtk_export_target_info {} { } elseif {[string compare [info proc gdb_target_sim] gdb_target_sim] == 0} { # Using a simulator target set target simulator + } elseif {[string compare [info proc gdb_target_sid] gdb_target_sid] == 0} { + # Using sid + set target sid } else { # Assume native set target native @@ -238,6 +241,15 @@ proc _gdbtk_export_target_info {} { set info(run) "continue" } + sid { + # We must start sid first, since Insight won't have a clue + # about how to do this. + sid_start + set info(target) "target [target_info gdb_protocol] [target_info netport]" + set info(load) "load" + set info(run) "continue" + } + native { set info(run) "run" } @@ -290,4 +302,9 @@ proc gdbtk_done {{results {}}} { if {[info exists _xvfb_spawn_id]} { _gdbtk_xvfb_exit } + + # Yich. If we're using sid, we must kill it + if {[string compare [info proc gdb_target_sid] gdb_target_sid] == 0} { + sid_exit + } } |