Reviewed and approved by Jim Blandy

2006-02-12  Fred Fish  <fnf@specifix.com>
	* gdb.base/scope.exp (test_at_main): Use gdb_test_multiple
	to handle cases where it takes two "next" commands to skip
	past the init call.
This commit is contained in:
Fred Fish 2006-02-13 10:41:26 +00:00
parent 8b9a88ea4a
commit ac6e4f3115
2 changed files with 18 additions and 2 deletions

View File

@ -1,3 +1,9 @@
2006-02-12 Fred Fish <fnf@specifix.com>
* gdb.base/scope.exp (test_at_main): Use gdb_test_multiple
to handle cases where it takes two "next" commands to skip
past the init call.
2006-02-07 Joel Brobecker <brobecker@adacore.com>
* gdb.ada/array_return.exp: Mark the last test as expected to fail

View File

@ -63,8 +63,18 @@ proc test_at_main {} {
# skip past init. There may be a call to __main at the start of
# main, so the first next may only get us to the init0 call.
if [gdb_test "next" "$decimal.*foo \\(\\);" "next over init0() in main" "$decimal.*init0 \\(\\);" "next"] {
gdb_suppress_tests ;
gdb_test_multiple "next" "next over init0() in main" {
-re "$decimal.*foo \\(\\).*$gdb_prompt $" {
pass "next over init0() in main"
}
-re "$decimal.*init0 \\(\\).*$gdb_prompt $" {
send_gdb "next\n"
exp_continue
}
-re ".*$gdb_prompt $" {
fail "next over init0() in main"
gdb_suppress_tests
}
}