* gdb.base/default.exp: Don't set match_max.

* gdb.base/help.exp: Ditto.
	* gdb.base/list.exp: Ditto.
	* gdb.base/signals.exp: Ditto.

	* config/monitor.exp(gdb_load): If gdb,use_standard_load is
	set, use remote_ld to download the testcase instead of
	the GDB loader.
This commit is contained in:
Bob Manson 1997-03-07 22:00:02 +00:00
parent ccd0e5e29d
commit 60450e30e9
2 changed files with 30 additions and 1 deletions

View File

@ -1,3 +1,14 @@
Fri Mar 7 13:48:30 1997 Bob Manson <manson@charmed.cygnus.com>
* gdb.base/default.exp: Don't set match_max.
* gdb.base/help.exp: Ditto.
* gdb.base/list.exp: Ditto.
* gdb.base/signals.exp: Ditto.
* config/monitor.exp(gdb_load): If gdb,use_standard_load is
set, use remote_ld to download the testcase instead of
the GDB loader.
Wed Mar 5 00:00:43 1997 Bob Manson <manson@charmed.cygnus.com>
* config/vr5000.exp: New file.

View File

@ -101,10 +101,28 @@ proc gdb_load { arg } {
global timeout
for { set j 1; } { $j <= 2 } {incr j; } {
if [target_info exists gdb,use_standard_load] {
gdb_test "target exec" "No exec file now." "" ".*Kill it.*y or n.*" "y"
remote_push_conn host;
set state [remote_ld target $arg];
remote_close target;
remote_pop_conn host;
if { $state != "pass" } {
perror "Couldn't load file into GDB."
return -1;
}
if { $arg != "" } {
if [gdb_file_cmd $arg] { return -1 }
}
gdb_target_monitor;
gdb_test "list main" ".*" ""
verbose "Loaded $arg into $GDB\n";
return 1;
}
if { $arg != "" } {
if [gdb_file_cmd $arg] { return -1 }
}
gdb_target_monitor
if [is_remote host] {