diff options
author | Ijaz, Abdul B <abdul.b.ijaz@intel.com> | 2023-09-08 22:56:18 +0200 |
---|---|---|
committer | Ijaz, Abdul B <abdul.b.ijaz@intel.com> | 2023-09-11 17:14:29 +0200 |
commit | 2e2d1ccdc5b66fcb765c7efd2b6ba58c9932697e (patch) | |
tree | f1ed0e7cbd9a58997d39bb547b08fdb17b2312cb /gdb/testsuite | |
parent | cdda72c2fa1e47c566c7b5768f3831a1cc11d263 (diff) | |
download | gdb-2e2d1ccdc5b66fcb765c7efd2b6ba58c9932697e.zip gdb-2e2d1ccdc5b66fcb765c7efd2b6ba58c9932697e.tar.gz gdb-2e2d1ccdc5b66fcb765c7efd2b6ba58c9932697e.tar.bz2 |
testsuite, fortran: Fix regression due to fix for ifort's 'start' behavior
Got a regression email due to merge of commit in CI config
tcwg_gdb_check/master-aarch64 :
https://sourceware.org/git/?p=binutils-gdb.git;a=commitdiff;h=41439185cd0075bbb1aedf9665685dba0827cfec
Begining of test "gdb.fortran/array-slices-bad.exp" was updated in above
commit to start the test from running to line with tag "First Breakpoint"
instead of "fortran_runto_main". Reason of the regression is shared
libraries are still loaded after hitting the breakpoint as "nosharedlibrary"
is already called before hitting the breakpoint.
So now after this change test is updated accordingly to disable and unload
shared libraries symbols after hitting the first breakpoint.
Approved-By: Andrew Burgess <aburgess@redhat.com>
Diffstat (limited to 'gdb/testsuite')
-rw-r--r-- | gdb/testsuite/gdb.fortran/array-slices-bad.exp | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/gdb/testsuite/gdb.fortran/array-slices-bad.exp b/gdb/testsuite/gdb.fortran/array-slices-bad.exp index d7b0069..280628d 100644 --- a/gdb/testsuite/gdb.fortran/array-slices-bad.exp +++ b/gdb/testsuite/gdb.fortran/array-slices-bad.exp @@ -25,17 +25,17 @@ if {[prepare_for_testing ${testfile}.exp ${testfile} ${srcfile} \ return -1 } +if {![runto [gdb_get_line_number "First Breakpoint"]]} { + perror "couldn't run to breakpoint First Breakpoint" + return -1 +} + # Avoid shared lib symbols. gdb_test_no_output "set auto-solib-add off" # Avoid libc symbols, in particular the 'array' type. gdb_test_no_output "nosharedlibrary" -if {![runto [gdb_get_line_number "First Breakpoint"]]} { - perror "couldn't run to breakpoint First Breakpoint" - return -1 -} - gdb_breakpoint [gdb_get_line_number "Second Breakpoint"] gdb_breakpoint [gdb_get_line_number "Final Breakpoint"] |