espressif/binutils-gdb
1
0
Fork 0
mirror of https://github.com/espressif/binutils-gdb.git synced 2025-06-17 16:05:56 +08:00
Code Issues Packages Projects Releases Wiki Activity

Fix gdb.fortran/array-element.exp failures.

Browse Source 
This fixes two FAIL results on this testcase which were caused by a
misplaced "continue" command.  This testcase used to end inferior's
execution too soon, causing the following tests to fail.  Now we break
right after inferior's loop and perform the rest of the tests there.

gdb/testsuite/ChangeLog:

	* gdb.fortran/array-element.exp: Remove unexpected "continue"
	command in testcase.  Simplify testcase.
This commit is contained in:
Gabriel Krisman Bertazi
2014-09-11 00:03:35 -03:00
parent 9b5d451f41
commit 3adc1a7d45
2 changed files with 7 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
gdb/testsuite/ChangeLog
View File

@ -1,3 +1,8 @@
2014-09-11 Gabriel Krisman Bertazi <gabriel@krisman.be>
* gdb.fortran/array-element.exp: Remove unexpected "continue"
command in testcase. Simplify testcase.
2014-09-10 Joel Brobecker <brobecker@adacore.com> 2014-09-10 Joel Brobecker <brobecker@adacore.com>
* gdb.dwarf2/dynarr-ptr.exp: Add a few ptype tests. * gdb.dwarf2/dynarr-ptr.exp: Add a few ptype tests.

13
gdb/testsuite/gdb.fortran/array-element.exp
View File

@ -31,18 +31,9 @@ if ![runto sub_] then {
continue continue
} }
set bp_location [gdb_get_line_number "continue"] gdb_breakpoint [gdb_get_line_number "continue"]
gdb_test "break $bp_location" \ gdb_continue_to_breakpoint "continue"
"Breakpoint.*at.* file .*$srcfile, line $bp_location\\." \
"breakpoint at continue"
gdb_test "continue" \
"Continuing\\..*Breakpoint.*" \
"continue to breakpoint"
gdb_test "print a(1)" ".*1 = 1.*" "print the first element of array a" gdb_test "print a(1)" ".*1 = 1.*" "print the first element of array a"
gdb_test "continue" \
"Continuing\\..*Breakpoint.*" \
"continue to breakpoint once again"
gdb_test "print a(2)" ".*2 = 2.*" "print the second element of array a" gdb_test "print a(2)" ".*2 = 2.*" "print the second element of array a"