OpenE2K
/
binutils-gdb
12
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix TUI support checks in gdb.tui tests. 

2020-06-17 Sandra Loosemore <sandra@codesourcery.com>

	gdb/testsuite/
	* gdb.tui/basic.exp: Skip test when TUI is unsupported, don't
	just say UNSUPPORTED.
	* gdb.tui/corefile-run.exp: Likewise.
	* gdb.tui/empty.exp: Likewise.
	* gdb.tui/list-before.exp: Likewise.
	* gdb.tui/list.exp: Likewise.
	* gdb.tui/main.exp: Likewise.
	* gdb.tui/regs.exp: Likewise.
	* gdb.tui/resize.exp: Likewise.
	* gdb.tui/tui-layout-asm-short-prog.exp: Likewise.
	* gdb.tui/tui-layout-asm.exp: Likewise.
	* gdb.tui/tui-missing-src.exp: Likewise.
	* gdb.tui/winheight.exp: Likewise.
	* gdb.tui/new-layout.exp: Likewise.  Also move check earlier.
This commit is contained in:
Sandra Loosemore 2020-06-17 21:57:16 -07:00
parent 612f258a49
commit 581bea2c99
14 changed files with 39 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
gdb/testsuite/ChangeLog
View File

@ -1,3 +1,22 @@
2020-06-17 Sandra Loosemore <sandra@codesourcery.com>
Fix TUI support checks in gdb.tui tests.
* gdb.tui/basic.exp: Skip test when TUI is unsupported, don't
just say UNSUPPORTED.
* gdb.tui/corefile-run.exp: Likewise.
* gdb.tui/empty.exp: Likewise.
* gdb.tui/list-before.exp: Likewise.
* gdb.tui/list.exp: Likewise.
* gdb.tui/main.exp: Likewise.
* gdb.tui/regs.exp: Likewise.
* gdb.tui/resize.exp: Likewise.
* gdb.tui/tui-layout-asm-short-prog.exp: Likewise.
* gdb.tui/tui-layout-asm.exp: Likewise.
* gdb.tui/tui-missing-src.exp: Likewise.
* gdb.tui/winheight.exp: Likewise.
* gdb.tui/new-layout.exp: Likewise. Also move check earlier.
2020-06-17 Sandra Loosemore <sandra@codesourcery.com>
Fix TCL error in gdb.python/py-format-string.exp.

1
gdb/testsuite/gdb.tui/basic.exp
View File

@ -26,6 +26,7 @@ if {[build_executable "failed to prepare" ${testfile} ${srcfile}] == -1} {
Term::clean_restart 24 80 $testfile
if {![Term::enter_tui]} {
unsupported "TUI not supported"
return
}
set text [Term::get_all_lines]

1
gdb/testsuite/gdb.tui/corefile-run.exp
View File

@ -47,6 +47,7 @@ if { ![gdb_gcore_cmd "$core" "save a corefile"] } {
Term::clean_restart 24 80 $testfile
if {![Term::enter_tui]} {
unsupported "TUI not supported"
return
}
set text [Term::get_all_lines]

1
gdb/testsuite/gdb.tui/empty.exp
View File

@ -23,6 +23,7 @@ Term::clean_restart 24 80
if {![Term::enter_tui]} {
unsupported "TUI not supported"
return
}
# Each entry describes a layout. It has these items:

1
gdb/testsuite/gdb.tui/list-before.exp
View File

@ -29,6 +29,7 @@ gdb_test "list main"
if {![Term::enter_tui]} {
unsupported "TUI not supported"
return
}
Term::check_contents "initial source listing" "21 *return 0"

1
gdb/testsuite/gdb.tui/list.exp
View File

@ -26,6 +26,7 @@ if {[build_executable "failed to prepare" ${testfile} ${srcfile}] == -1} {
Term::clean_restart 24 80 $testfile
if {![Term::enter_tui]} {
unsupported "TUI not supported"
return
}
Term::check_contents "initial source listing" "21 *return 0"

1
gdb/testsuite/gdb.tui/main.exp
View File

@ -31,6 +31,7 @@ gdb_test_no_output "set interactive-mode off"
if {![Term::enter_tui]} {
unsupported "TUI not supported"
return
}
Term::command "file [standard_output_file $testfile]"

8
gdb/testsuite/gdb.tui/new-layout.exp
View File

@ -23,6 +23,13 @@ if {[build_executable "failed to prepare" ${testfile} ${srcfile}] == -1} {
return -1
}
# Make sure TUI is supported before continuing.
Term::clean_restart 24 80 $testfile
if {![Term::enter_tui]} {
unsupported "TUI not supported"
return
}
Term::clean_restart 24 80 $testfile
gdb_test "tui new-layout" \
@ -59,6 +66,7 @@ gdb_test "help layout h" \
if {![Term::enter_tui]} {
unsupported "TUI not supported"
return
}
set text [Term::get_all_lines]

1
gdb/testsuite/gdb.tui/regs.exp
View File

@ -32,6 +32,7 @@ if {![runto_main]} {
if {![Term::enter_tui]} {
unsupported "TUI not supported"
return
}
Term::check_contents "source at startup" "\\|.*21 *return 0"

1
gdb/testsuite/gdb.tui/resize.exp
View File

@ -32,6 +32,7 @@ if {![runto_main]} {
if {![Term::enter_tui]} {
unsupported "TUI not supported"
return
}
Term::check_contents "source at startup" "\\|.*21 *return 0"

1
gdb/testsuite/gdb.tui/tui-layout-asm-short-prog.exp
View File

@ -29,6 +29,7 @@ if {[build_executable "failed to prepare" ${testfile} ${srcfile} \
Term::clean_restart 24 80 $testfile
if {![Term::prepare_for_tui]} {
unsupported "TUI not supported"
return
}
# This puts us into TUI mode, and should display the ASM window.

1
gdb/testsuite/gdb.tui/tui-layout-asm.exp
View File

@ -27,6 +27,7 @@ if {[build_executable "failed to prepare" ${testfile} ${srcfile}] == -1} {
Term::clean_restart 24 80 $testfile
if {![Term::prepare_for_tui]} {
unsupported "TUI not supported"
return
}
# This puts us into TUI mode, and should display the ASM window.

1
gdb/testsuite/gdb.tui/tui-missing-src.exp
View File

@ -75,6 +75,7 @@ file delete $mainfile
Term::clean_restart 24 80 $testfile
if {![Term::enter_tui]} {
unsupported "TUI not supported"
return
}
# There must exist a source layout with the size 80x15 and
# there should be nothing in it.

1
gdb/testsuite/gdb.tui/winheight.exp
View File

@ -26,6 +26,7 @@ if {[build_executable "failed to prepare" ${testfile} ${srcfile}] == -1} {
Term::clean_restart 24 80 $testfile
if {![Term::enter_tui]} {
unsupported "TUI not supported"
return
}
Term::check_box "source box" 0 0 80 15