[gdb/testsuite] Fix re-read FAILs with -readnow

When running the testsuite with target board readnow, we run into:
...
FAIL: gdb.ada/exec_changed.exp: start second
FAIL: gdb.ada/exec_changed.exp: start just first
FAIL: gdb.base/reread.exp: opts= "" "" : run to foo() second time
FAIL: gdb.base/reread.exp: opts= "" "" : second pass: run to foo() second time
FAIL: gdb.base/reread.exp: opts= "-fPIE" "ldflags=-pie" : \
  run to foo() second time
FAIL: gdb.base/reread.exp: opts= "-fPIE" "ldflags=-pie" : second pass: \
  run to foo() second time
...

These are FAILs due to PR26800.

Mark these as KFAILs.

Tested on x86_64-linux.

gdb/testsuite/ChangeLog:

2020-10-28  Tom de Vries  <tdevries@suse.de>

	* gdb.ada/exec_changed.exp: Add KFAILs for -readnow.
	* gdb.base/reread.exp: Same.
This commit is contained in:
Tom de Vries
2020-10-28 21:04:12 +01:00
parent 6b68fd45a8
commit efe9b87393
3 changed files with 21 additions and 0 deletions

View File

@ -1,3 +1,8 @@
2020-10-28 Tom de Vries <tdevries@suse.de>
* gdb.ada/exec_changed.exp: Add KFAILs for -readnow.
* gdb.base/reread.exp: Same.
2020-10-28 Tom de Vries <tdevries@suse.de>
* lib/gdb.exp (readnow): Handle arg.

View File

@ -51,6 +51,8 @@ gdb_reinitialize_dir $srcdir/$subdir
gdb_test "shell mv ${binfile} ${common_binfile}" ".*" ""
gdb_load ${common_binfile}
set readnow_p [readnow ${common_binfile}]
# Start the program, we should land in the program main procedure
if { [gdb_start_cmd] < 0 } {
untested start
@ -76,6 +78,9 @@ gdb_test "shell touch ${common_binfile}" ".*" ""
if { [gdb_start_cmd] < 0 } {
fail "start second"
} else {
if { $readnow_p } {
setup_kfail "gdb/26800" *-*-*
}
gdb_test "" \
"second \\(\\) at .*second.adb.*" \
"start second"
@ -103,6 +108,9 @@ if { [gdb_start_cmd] < 0 } {
gdb_test_no_output "set \$check_gdb_running = 0" "check gdb running"
fail "start just first"
} else {
if { $readnow_p } {
setup_kfail "gdb/26800" *-*-*
}
gdb_test "" \
"first \\(\\) at .*first.adb.*" \
"start just first"

View File

@ -67,6 +67,8 @@ foreach_with_prefix opts {
gdb_rename_execfile ${binfile1} ${binfile}
gdb_load ${binfile}
set readnow_p [readnow ${binfile}]
# Set a breakpoint at foo
gdb_test "break foo" \
@ -97,6 +99,9 @@ foreach_with_prefix opts {
unsupported $test
} else {
gdb_run_cmd
if { $readnow_p } {
setup_kfail "gdb/26800" *-*-*
}
gdb_test "" "Breakpoint.* foo .* at .*:9.*" $test
}
@ -133,6 +138,9 @@ foreach_with_prefix opts {
gdb_rename_execfile ${binfile} ${binfile1}
gdb_rename_execfile ${binfile2} ${binfile}
gdb_run_cmd
if { $readnow_p } {
setup_kfail "gdb/26800" *-*-*
}
gdb_test "" "Breakpoint.* foo .* at .*:9.*" \
"second pass: run to foo() second time"
}