* lib/mi-support.exp (mi_gdb_start): If a remote target, use the
CLI jump command to start it. (mi_run_to_main): Fail immediatly when unexpected output.
This commit is contained in:
parent
e866d0e845
commit
6a90e1d0a6
|
@ -1,3 +1,9 @@
|
||||||
|
2001-08-18 Andrew Cagney <ac131313@redhat.com>
|
||||||
|
|
||||||
|
* lib/mi-support.exp (mi_gdb_start): If a remote target, use the
|
||||||
|
CLI jump command to start it.
|
||||||
|
(mi_run_to_main): Fail immediatly when unexpected output.
|
||||||
|
|
||||||
2001-08-18 Andrew Cagney <ac131313@redhat.com>
|
2001-08-18 Andrew Cagney <ac131313@redhat.com>
|
||||||
|
|
||||||
* lib/mi-support.exp (mi_gdb_start): Move call to sid_start to
|
* lib/mi-support.exp (mi_gdb_start): Move call to sid_start to
|
||||||
|
|
|
@ -590,6 +590,18 @@ proc mi_run_cmd {args} {
|
||||||
}
|
}
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
if [target_info exists gdb,start_symbol] {
|
||||||
|
set start [target_info gdb,start_symbol];
|
||||||
|
} else {
|
||||||
|
set start "start";
|
||||||
|
}
|
||||||
|
|
||||||
|
# HACK: Should either use 000-jump or fix the target code
|
||||||
|
# to better handle RUN.
|
||||||
|
send_gdb "jump *$start\n"
|
||||||
|
warning "Using CLI jump command, expect run-to-main FAIL"
|
||||||
|
return
|
||||||
}
|
}
|
||||||
|
|
||||||
send_gdb "000-exec-run $args\n"
|
send_gdb "000-exec-run $args\n"
|
||||||
|
@ -637,6 +649,9 @@ proc mi_run_to_main { } {
|
||||||
pass "$test"
|
pass "$test"
|
||||||
return 0
|
return 0
|
||||||
}
|
}
|
||||||
|
-re ".*$mi_gdb_prompt$" {
|
||||||
|
fail "$test (2)"
|
||||||
|
}
|
||||||
timeout {
|
timeout {
|
||||||
fail "$test (timeout)"
|
fail "$test (timeout)"
|
||||||
return -1
|
return -1
|
||||||
|
|
Loading…
Reference in New Issue