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

2010-06-01 Michael Snyder <msnyder@vmware.com> 

* gdb.base/arithmet.exp: Use gdb_test_no_output.
	* gdb.base/arrayidx.exp: Ditto.
	* gdb.base/attach.exp: Ditto.
	* gdb.base/auxv.exp: Ditto.
	* gdb.base/bigcre.exp: Ditto.
	* gdb.base/break-always.exp: Ditto.
	* gdb.base/break-interp.exp: Ditto.
	* gdb.base/break.exp: Ditto.
	* gdb.base/breakpoint-shadow.exp: Ditto.
	* gdb.base/call-ar-st.exp: Ditto.
	* gdb.base/call-sc.exp: Ditto.
	* gdb.base/call-signal-resume.exp: Ditto.
	* gdb.base/callfuncs.exp: Ditto.
	* gdb.base/catch-syscall.exp: Ditto.
	* gdb.base/charset.exp: Ditto.
	* gdb.base/code-expr.exp: Ditto.
	* gdb.base/commands.exp: Ditto.
	* gdb.base/cond-expr.exp: Ditto.
	* gdb.base/condbreak.exp: Ditto.
	* gdb.base/cursal.exp: Ditto.
	* gdb.base/cvexpr.exp: Ditto.
	* gdb.base/default.exp: Ditto.
	* gdb.base/del.exp: Ditto.
	* gdb.base/detach.exp: Ditto.
	* gdb.base/display.exp: Ditto.
	* gdb.base/ena-dis-br.exp: Ditto.
	* gdb.base/eval-skip.exp: Ditto.
	* gdb.base/foll-fork.exp: Ditto.
	* gdb.base/foll-vfork.exp: Ditto.
	* gdb.base/frame-args.exp: Ditto.
	* gdb.base/funcargs.exp: Ditto.
	* gdb.base/gcore-buffer-overflow.exp: Ditto.
	* gdb.base/gdbvars.exp: Ditto.
	* gdb.base/help.exp: Ditto.
	* gdb.base/ifelse.exp: Ditto.
	* gdb.base/included.exp: Ditto.
	* gdb.base/list.exp: Ditto.
	* gdb.base/macscp.exp: Ditto.
	* gdb.base/maint.exp: Ditto.
	* gdb.base/multi-fork.exp: Ditto.
	* gdb.base/overlays.exp: Ditto.
	* gdb.base/page.exp: Ditto.
	* gdb.base/pending.exp: Ditto.
	* gdb.base/pointers.exp: Ditto.
	* gdb.base/pr11022.exp: Ditto.
	* gdb.base/prelink.exp: Ditto.
	* gdb.base/printcmds.exp: Ditto.
	* gdb.base/psymtab.exp: Ditto.
	* gdb.base/randomize.exp: Ditto.
	* gdb.base/relational.exp: Ditto.
	* gdb.base/relocate.exp: Ditto.
	* gdb.base/remote.exp: Ditto.
	* gdb.base/sepdebug.exp: Ditto.
	* gdb.base/set-lang-auto.exp: Ditto.
	* gdb.base/setshow.exp: Ditto.
	* gdb.base/setvar.exp: Ditto.
	* gdb.base/signals.exp: Ditto.
	* gdb.base/signull.exp: Ditto.
	* gdb.base/sigstep.exp: Ditto.
	* gdb.base/sizeof.exp: Ditto.
	* gdb.base/solib-disc.exp: Ditto.
	* gdb.base/store.exp: Ditto.
	* gdb.base/structs.exp: Ditto.
	* gdb.base/structs2.exp: Ditto.
	* gdb.base/subst.exp: Ditto.
	* gdb.base/term.exp: Ditto.
	* gdb.base/trace-commands.exp: Ditto.
	* gdb.base/unwindonsignal.exp: Ditto.
	* gdb.base/valgrind-db-attach.exp: Ditto.
	* gdb.base/varargs.exp: Ditto.
	* gdb.base/watch-cond.exp: Ditto.
	* gdb.base/watch_thread_num.exp: Ditto.
	* gdb.base/watchpoint-cond-gone.exp: Ditto.
	* gdb.base/watchpoint.exp: Ditto.
	* gdb.base/whatis-exp.exp: Ditto.
This commit is contained in:
Michael Snyder 2010-06-01 21:29:21 +00:00
parent 3537c84bf4
commit 27d3a1a248
81 changed files with 487 additions and 438 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

84
gdb/testsuite/ChangeLog
View File

@ -1,3 +1,81 @@
2010-06-01 Michael Snyder <msnyder@vmware.com>
* gdb.base/arithmet.exp: Use gdb_test_no_output.
* gdb.base/arrayidx.exp: Ditto.
* gdb.base/attach.exp: Ditto.
* gdb.base/auxv.exp: Ditto.
* gdb.base/bigcre.exp: Ditto.
* gdb.base/break-always.exp: Ditto.
* gdb.base/break-interp.exp: Ditto.
* gdb.base/break.exp: Ditto.
* gdb.base/breakpoint-shadow.exp: Ditto.
* gdb.base/call-ar-st.exp: Ditto.
* gdb.base/call-sc.exp: Ditto.
* gdb.base/call-signal-resume.exp: Ditto.
* gdb.base/callfuncs.exp: Ditto.
* gdb.base/catch-syscall.exp: Ditto.
* gdb.base/charset.exp: Ditto.
* gdb.base/code-expr.exp: Ditto.
* gdb.base/commands.exp: Ditto.
* gdb.base/cond-expr.exp: Ditto.
* gdb.base/condbreak.exp: Ditto.
* gdb.base/cursal.exp: Ditto.
* gdb.base/cvexpr.exp: Ditto.
* gdb.base/default.exp: Ditto.
* gdb.base/del.exp: Ditto.
* gdb.base/detach.exp: Ditto.
* gdb.base/display.exp: Ditto.
* gdb.base/ena-dis-br.exp: Ditto.
* gdb.base/eval-skip.exp: Ditto.
* gdb.base/foll-fork.exp: Ditto.
* gdb.base/foll-vfork.exp: Ditto.
* gdb.base/frame-args.exp: Ditto.
* gdb.base/funcargs.exp: Ditto.
* gdb.base/gcore-buffer-overflow.exp: Ditto.
* gdb.base/gdbvars.exp: Ditto.
* gdb.base/help.exp: Ditto.
* gdb.base/ifelse.exp: Ditto.
* gdb.base/included.exp: Ditto.
* gdb.base/list.exp: Ditto.
* gdb.base/macscp.exp: Ditto.
* gdb.base/maint.exp: Ditto.
* gdb.base/multi-fork.exp: Ditto.
* gdb.base/overlays.exp: Ditto.
* gdb.base/page.exp: Ditto.
* gdb.base/pending.exp: Ditto.
* gdb.base/pointers.exp: Ditto.
* gdb.base/pr11022.exp: Ditto.
* gdb.base/prelink.exp: Ditto.
* gdb.base/printcmds.exp: Ditto.
* gdb.base/psymtab.exp: Ditto.
* gdb.base/randomize.exp: Ditto.
* gdb.base/relational.exp: Ditto.
* gdb.base/relocate.exp: Ditto.
* gdb.base/remote.exp: Ditto.
* gdb.base/sepdebug.exp: Ditto.
* gdb.base/set-lang-auto.exp: Ditto.
* gdb.base/setshow.exp: Ditto.
* gdb.base/setvar.exp: Ditto.
* gdb.base/signals.exp: Ditto.
* gdb.base/signull.exp: Ditto.
* gdb.base/sigstep.exp: Ditto.
* gdb.base/sizeof.exp: Ditto.
* gdb.base/solib-disc.exp: Ditto.
* gdb.base/store.exp: Ditto.
* gdb.base/structs.exp: Ditto.
* gdb.base/structs2.exp: Ditto.
* gdb.base/subst.exp: Ditto.
* gdb.base/term.exp: Ditto.
* gdb.base/trace-commands.exp: Ditto.
* gdb.base/unwindonsignal.exp: Ditto.
* gdb.base/valgrind-db-attach.exp: Ditto.
* gdb.base/varargs.exp: Ditto.
* gdb.base/watch-cond.exp: Ditto.
* gdb.base/watch_thread_num.exp: Ditto.
* gdb.base/watchpoint-cond-gone.exp: Ditto.
* gdb.base/watchpoint.exp: Ditto.
* gdb.base/whatis-exp.exp: Ditto.
2010-06-01 Michael Snyder <msnyder@vmware.com>
* gdb.cp/annota2.exp: Replace uses of send_gdb / gdb_expect.
@ -46,7 +124,7 @@
* gdb.base/tui-layout.exp: New.
2010-05-28 Michael Snyder <msnyder@msnyder-server.eng.vmware.com>
2010-05-28 Michael Snyder <msnyder@vmware.com>
* gdb.reverse/break-precsave.exp:
Replace uses of send_gdb / gdb_expect.
@ -100,7 +178,7 @@
* gdb.base/sepdebug.exp (info silent break bp_location1): Fix racy
excessive newline.
2010-05-27 Michael Snyder <msnyder@msnyder-server.eng.vmware.com>
2010-05-27 Michael Snyder <msnyder@vmware.com>
* gdb.base/break.exp: Replace uses of send_gdb / gdb_expect.
* gdb.base/relational.exp: Replace uses of send_gdb / gdb_expect.
@ -122,7 +200,7 @@
* gdb.base/watch_thread_num.exp: Replace uses of send_gdb / gdb_expect.
* gdb.base/watchpoint.exp: Replace uses of send_gdb / gdb_expect.
2010-05-26 Michael Snyder <msnyder@msnyder-server.eng.vmware.com>
2010-05-26 Michael Snyder <msnyder@vmware.com>
* gdb.java/jmisc.exp: Replace uses of send_gdb / gdb_expect.
* gdb.java/jprint.exp: Replace uses of send_gdb / gdb_expect.

12
gdb/testsuite/gdb.base/arithmet.exp
View File

@ -59,10 +59,10 @@ if ![runto_main] then {
# test expressions with "int" types
#
gdb_test "set variable x=14" ""
gdb_test "set variable y=2" ""
gdb_test "set variable z=2" ""
gdb_test "set variable w=3" ""
gdb_test_no_output "set variable x=14"
gdb_test_no_output "set variable y=2"
gdb_test_no_output "set variable z=2"
gdb_test_no_output "set variable w=3"
gdb_test "print x" "14"
gdb_test "print y" "2"
@ -88,8 +88,8 @@ gdb_test "print x%y%z" "0"
# test precedence rules on pairs of arithmetic operators
gdb_test "set variable x=10" ""
gdb_test "set variable y=4" ""
gdb_test_no_output "set variable x=10"
gdb_test_no_output "set variable y=4"
# x y z w
# 10 4 2 3

6
gdb/testsuite/gdb.base/arrayidx.exp
View File

@ -41,8 +41,7 @@ if ![runto_main] then {
# First, print the array without the indexes
gdb_test "set print array-indexes off" \
"" \
gdb_test_no_output "set print array-indexes off" \
"Set print array-indexes to off"
gdb_test "print array" \
@ -51,8 +50,7 @@ gdb_test "print array" \
# Second, print the same array with the indexes
gdb_test "set print array-indexes on" \
"" \
gdb_test_no_output "set print array-indexes on" \
"Set print array-indexes to on"
gdb_test "print array" \

2
gdb/testsuite/gdb.base/attach.exp
View File

@ -246,7 +246,7 @@ proc do_attach_tests {} {
# Verify that we can modify the variable "should_exit" in the
# program.
gdb_test "set should_exit=1" "" "after attach2, set should_exit"
gdb_test_no_output "set should_exit=1" "after attach2, set should_exit"
# Verify that the modification really happened.

6
gdb/testsuite/gdb.base/auxv.exp
View File

@ -53,10 +53,8 @@ gdb_exit
gdb_start
gdb_reinitialize_dir $srcdir/$subdir
gdb_load ${binfile}
gdb_test "set print sevenbit-strings" "" \
"set print sevenbit-strings; ${testfile}"
gdb_test "set width 0" "" \
"set width 0; ${testfile}"
gdb_test_no_output "set print sevenbit-strings"
gdb_test_no_output "set width 0"
if {$core_works} {
if {[gdb_test "cd $coredir" ".*Working directory .*" \

9
gdb/testsuite/gdb.base/bigcore.exp
View File

@ -67,10 +67,9 @@ gdb_exit
gdb_start
gdb_reinitialize_dir $srcdir/$subdir
gdb_load ${binfile}
gdb_test "set print sevenbit-strings" "" \
"set print sevenbit-strings; ${testfile}"
gdb_test "set width 0" "" \
"set width 0; ${testfile}"
gdb_test_no_output "set print sevenbit-strings"
gdb_test_no_output "set width 0"
if { ![runto_main] } then {
gdb_suppress_tests;
}
@ -116,7 +115,7 @@ set prev_heap [extract_heap prev]
# Save the total allocated size within GDB so that we can check
# the core size later.
gdb_test "set \$bytes_allocated = bytes_allocated" "" "save heap size"
gdb_test_no_output "set \$bytes_allocated = bytes_allocated" "save heap size"
# Now create a core dump

2
gdb/testsuite/gdb.base/break-always.exp
View File

@ -21,7 +21,7 @@ if { [prepare_for_testing break-always.exp break-always break-always.c] } {
set bar_location [gdb_get_line_number "break in bar" break-always.c]
gdb_test "set breakpoint always-inserted on" ""
gdb_test_no_output "set breakpoint always-inserted on"
gdb_test "show breakpoint always-inserted" "mode is on\." \
"confirm breakpoint always-inserted"

15
gdb/testsuite/gdb.base/break-interp.exp
View File

@ -279,12 +279,13 @@ proc test_core {file displacement} {
gdb_exit
gdb_start
# Clear it to never find any separate debug infos in $debug_root.
gdb_test "set debug-file-directory" "" "set debug-file-directory for core"
gdb_test_no_output "set debug-file-directory" \
"set debug-file-directory for core"
gdb_reinitialize_dir $srcdir/$subdir
gdb_load $file
# Print the "PIE (Position Independent Executable) displacement" message.
gdb_test "set verbose on"
gdb_test_no_output "set verbose on"
set test "core loaded"
set test_displacement "seen displacement message as $displacement"
@ -356,7 +357,7 @@ proc test_attach {file displacement} {
gdb_start
# Print the "PIE (Position Independent Executable) displacement" message.
gdb_test "set verbose on"
gdb_test_no_output "set verbose on"
set test "attach"
gdb_test_multiple "attach $pid" $test {
@ -409,12 +410,12 @@ proc test_ld {file ifmain trynosym displacement} {
gdb_exit
gdb_start
# Clear it to never find any separate debug infos in $debug_root.
gdb_test "set debug-file-directory"
gdb_test_no_output "set debug-file-directory"
gdb_reinitialize_dir $srcdir/$subdir
gdb_load $file
# Print the "PIE (Position Independent Executable) displacement" message.
gdb_test "set verbose on"
gdb_test_no_output "set verbose on"
reach "dl_main" "run segv" $displacement
@ -454,11 +455,11 @@ proc test_ld {file ifmain trynosym displacement} {
gdb_exit
gdb_start
# Clear it to never find any separate debug infos in $debug_root.
gdb_test "set debug-file-directory"
gdb_test_no_output "set debug-file-directory"
gdb_reinitialize_dir $srcdir/$subdir
# Print the "PIE (Position Independent Executable) displacement" message.
gdb_test "set verbose on"
gdb_test_no_output "set verbose on"
# Test no (error) message has been printed by `exec-file'.
set escapedfile [string_to_regexp $file]

2
gdb/testsuite/gdb.base/break.exp
View File

@ -738,7 +738,7 @@ clean_restart breako2
# breakpoint on a symbol causes 'break' to choke.
#
gdb_test "set breakpoint pending on" "" "rbreak junk pending setup"
gdb_test_no_output "set breakpoint pending on" "rbreak junk pending setup"
# We expect at least one breakpoint to be set when we "rbreak main".
gdb_test "rbreak main" \

2
gdb/testsuite/gdb.base/breakpoint-shadow.exp
View File

@ -34,7 +34,7 @@ if ![runto_main] {
# The default "auto" mode removes all the breakpoints when we stop (and not
# running the nonstop mode). We would not be able to test the shadow.
gdb_test "set breakpoint always-inserted on"
gdb_test_no_output "set breakpoint always-inserted on"
gdb_test "show breakpoint always-inserted" "Always inserted breakpoint mode is on."
set match "\nDump of assembler code for function main:\r\n(.*)End of assembler dump.\r\n$gdb_prompt $"

2
gdb/testsuite/gdb.base/call-ar-st.exp
View File

@ -290,7 +290,7 @@ gdb_test "continue" \
gdb_test "break sum_array_print" \
".*Breakpoint ${decimal}: file .*call-ar-st.c, line.*" \
"set breakpoint in sum_array_print"
gdb_test "set print frame-arguments all" ""
gdb_test_no_output "set print frame-arguments all"
gdb_test "continue" \
".*Breakpoint ${decimal}, sum_array_print \\(seed=10, linked_list1=.next_index = .1, 2, 3, 4, 5, 6, 7, 8, 9, 10., values = .4, 6, 8, 10, 12, 14, 16, 18, 20, 22., head = 0., linked_list2=.next_index = .1, 2, 3, 4, 5, 6, 7, 8, 9, 10., values = .8, 10, 12, 14, 16, 18, 20, 22, 24, 26., head = 0., linked_list3=.next_index = .1, 2, 3, 4, 5, 6, 7, 8, 9, 10., values = .10, 12, 14, 16, 18, 20, 22, 24, 26, 28., head = 0., linked_list4=.next_index = .1, 2, 3, 4, 5, 6, 7, 8, 9, 10., values = .20, 22, 24, 26, 28, 30, 32, 34, 36, 38., head = 0.\\) at .*call-ar-st.c:1105\[ \t\n\r\]+1105.*printf\\(.Sum of 4 arrays, by element \\(add in seed as well\\).*\\);.*" \
"check args of sum_array_print"

11
gdb/testsuite/gdb.base/call-sc.exp
View File

@ -78,12 +78,9 @@ proc start_scalars_test { type } {
gdb_load ${binfile}
# Make certain that the output is consistent
gdb_test "set print sevenbit-strings" "" \
"set print sevenbit-strings; ${testfile}"
gdb_test "set print address off" "" \
"set print address off; ${testfile}"
gdb_test "set width 0" "" \
"set width 0; ${testfile}"
gdb_test_no_output "set print sevenbit-strings"
gdb_test_no_output "set print address off"
gdb_test_no_output "set width 0"
# Advance to main
if { ![runto_main] } then {
@ -151,7 +148,7 @@ proc test_scalar_calls { } {
# stores its parameter in the global variable "L". GDB then
# examining that global to confirm that the value is as expected.
gdb_test "call Fun(foo)" "" "call Fun(foo); ${tests}"
gdb_test_no_output "call Fun(foo)" "call Fun(foo); ${tests}"
gdb_test "p/c L" " = 49 '1'" "p/c L; ${tests}"
}

8
gdb/testsuite/gdb.base/call-signal-resume.exp
View File

@ -102,8 +102,8 @@ if { "$frame_number" == "" } {
# Pop the dummy frame.
gdb_test "frame $frame_number" ""
gdb_test "set confirm off" ""
gdb_test "return" ""
gdb_test_no_output "set confirm off"
gdb_test_no_output "return"
# Resume execution, the program should continue without any signal.
@ -135,8 +135,8 @@ if { "$frame_number" == "" } {
# Pop the dummy frame.
gdb_test "frame $frame_number" ""
gdb_test "set confirm off" ""
gdb_test "return" ""
gdb_test_no_output "set confirm off"
gdb_test_no_output "return"
# Continue again, this time we should get to the signal handler.

8
gdb/testsuite/gdb.base/callfuncs.exp
View File

@ -297,9 +297,9 @@ gdb_start
gdb_reinitialize_dir $srcdir/$subdir
gdb_load ${binfile}
gdb_test "set print sevenbit-strings" ""
gdb_test "set print address off" ""
gdb_test "set width 0" ""
gdb_test_no_output "set print sevenbit-strings"
gdb_test_no_output "set print address off"
gdb_test_no_output "set width 0"
if { $hp_aCC_compiler } {
# Do not set language explicitly to 'C'. This will cause aCC
@ -313,7 +313,7 @@ if { $hp_aCC_compiler } {
# However, turn off overload-resolution for aCC. Having it on causes
# a lot of failures.
gdb_test "set overload-resolution 0" ".*"
gdb_test_no_output "set overload-resolution 0"
} else {
if { ![set_lang_c] } {
gdb_suppress_tests;

4
gdb/testsuite/gdb.base/catch-syscall.exp
View File

@ -259,7 +259,7 @@ proc test_catch_syscall_fail_nodatadir {} {
# Make sure GDB doesn't load the syscalls xml from the system data
# directory.
gdb_test "set data-directory /the/path/to/nowhere" ""
gdb_test_no_output "set data-directory /the/path/to/nowhere"
# Testing to see if we receive a warning when calling "catch syscall"
# without XML support (without datadir).
@ -379,7 +379,7 @@ proc do_syscall_tests_without_xml {} {
# Make sure GDB doesn't load the syscalls xml from the system data
# directory.
gdb_test "set data-directory /the/path/to/nowhere" ""
gdb_test_no_output "set data-directory /the/path/to/nowhere"
# Let's test if we can catch syscalls without XML support.
# We should succeed, but GDB is not supposed to print syscall names.

6
gdb/testsuite/gdb.base/charset.exp
View File

@ -361,7 +361,7 @@ if {$wchar_size == 2} {
set wchar_ok 1
}
gdb_test "set host-charset ASCII" ""
gdb_test_no_output "set host-charset ASCII"
foreach target_charset $charset_subset {
if {![valid_target_charset $target_charset]} {
continue
@ -513,7 +513,7 @@ foreach target_charset $charset_subset {
}
# Reset the target charset.
gdb_test "set target-charset UTF-8" ""
gdb_test_no_output "set target-charset UTF-8"
# \242 is not a valid UTF-8 character.
gdb_test "print \"\\242\"" " = \"\\\\242\"" \
@ -608,7 +608,7 @@ gdb_test "print 'a' == 'a' || 'b' == 'b'" \
proc string_display { var_name set_prefix x_size x_type} {
gdb_test "set ${var_name} = ${set_prefix}\"Test String\\0with zeroes\"" "" "Assign ${var_name} with prefix ${set_prefix}"
gdb_test_no_output "set ${var_name} = ${set_prefix}\"Test String\\0with zeroes\"" "Assign ${var_name} with prefix ${set_prefix}"
gdb_test "x /2${x_size}s ${var_name}" ".* ${x_type}\"Test String\"\[\r\n\]+.* ${x_type}\"with zeroes\"" "Display String ${var_name} with x/${x_size}s"
}

6
gdb/testsuite/gdb.base/code-expr.exp
View File

@ -44,9 +44,9 @@ if [target_info exists gdb_stub] {
gdb_step_for_stub;
}
gdb_test "set print sevenbit-strings" "" ""
gdb_test "set print address off" "" ""
gdb_test "set width 0" "" ""
gdb_test_no_output "set print sevenbit-strings"
gdb_test_no_output "set print address off"
gdb_test_no_output "set width 0"
set ws "\[ \t\]*"

45
gdb/testsuite/gdb.base/commands.exp
View File

@ -30,7 +30,7 @@ if { [prepare_for_testing commands.exp commands run.c {debug additional_flags=-D
proc gdbvar_simple_if_test {} {
global gdb_prompt
gdb_test "set \$foo = 0" "" "set foo in gdbvar_simple_if_test"
gdb_test_no_output "set \$foo = 0" "set foo in gdbvar_simple_if_test"
# All this test should do is print 0xdeadbeef once.
gdb_test "if \$foo == 1\np/x 0xfeedface\nelse\np/x 0xdeadbeef\nend" \
"\\\$\[0-9\]* = 0xdeadbeef" "gdbvar_simple_if_test #1"
@ -42,7 +42,7 @@ proc gdbvar_simple_if_test {} {
proc gdbvar_simple_while_test {} {
global gdb_prompt
gdb_test "set \$foo = 5" "" "set foo in gdbvar_simple_while_test"
gdb_test_no_output "set \$foo = 5" "set foo in gdbvar_simple_while_test"
# This test should print 0xfeedface five times.
gdb_test "while \$foo > 0\np/x 0xfeedface\nset \$foo -= 1\nend" \
"\\\$\[0-9\]* = 0xfeedface\[^\n\]*\n\\\$\[0-9\]* = 0xfeedface\[^\n\]*\n\\\$\[0-9\]* = 0xfeedface\[^\n\]*\n\\\$\[0-9\]* = 0xfeedface\[^\n\]*\n\\\$\[0-9\]* = 0xfeedface" \
@ -52,7 +52,8 @@ proc gdbvar_simple_while_test {} {
proc gdbvar_complex_if_while_test {} {
global gdb_prompt
gdb_test "set \$foo = 4" "" "set foo in gdbvar complex_if_while_test"
gdb_test_no_output "set \$foo = 4" \
"set foo in gdbvar complex_if_while_test"
# This test should alternate between 0xdeadbeef and 0xfeedface two times.
gdb_test "while \$foo > 0\nset \$foo -= 1\nif \(\$foo % 2\) == 1\np/x 0xdeadbeef\nelse\np/x 0xfeedface\nend\nend" \
"\\\$\[0-9\]* = 0xdeadbeef\[^\n\]*\n\\\$\[0-9\]* = 0xfeedface\[^\n\]*\n\\\$\[0-9\]* = 0xdeadbeef\[^\n\]*\n\\\$\[0-9\]* = 0xfeedface" \
@ -90,7 +91,7 @@ proc progvar_simple_while_test {} {
return
}
gdb_test "set args 5" "" "set args in progvar_simple_while_test"
gdb_test_no_output "set args 5" "set args in progvar_simple_while_test"
if { ![runto factorial] } then { gdb_suppress_tests }
# Don't depend upon argument passing, since most simulators don't
# currently support it. Bash value variable to be what we want.
@ -110,7 +111,8 @@ proc progvar_complex_if_while_test {} {
return
}
gdb_test "set args 4" "" "set args in progvar_complex_if_while_test"
gdb_test_no_output "set args 4" \
"set args in progvar_complex_if_while_test"
if { ![runto factorial] } then { gdb_suppress_tests }
# Don't depend upon argument passing, since most simulators don't
# currently support it. Bash value variable to be what we want.
@ -128,7 +130,8 @@ proc if_while_breakpoint_command_test {} {
return
}
gdb_test "set args 5" "" "set args in if_while_breakpoint_command_test"
gdb_test_no_output "set args 5" \
"set args in if_while_breakpoint_command_test"
if { ![runto factorial] } then { gdb_suppress_tests }
# Don't depend upon argument passing, since most simulators don't
# currently support it. Bash value variable to be what we want.
@ -168,7 +171,8 @@ proc infrun_breakpoint_command_test {} {
return
}
gdb_test "set args 6" "" "set args in infrun_breakpoint_command_test"
gdb_test_no_output "set args 6" \
"set args in infrun_breakpoint_command_test"
if { ![runto factorial] } then { gdb_suppress_tests }
# Don't depend upon argument passing, since most simulators don't
# currently support it. Bash value variable to be what we want.
@ -202,7 +206,7 @@ proc breakpoint_command_test {} {
return
}
gdb_test "set args 6" "" "set args in breakpoint_command_test"
gdb_test_no_output "set args 6" "set args in breakpoint_command_test"
if { ![runto factorial] } then { gdb_suppress_tests; }
# Don't depend upon argument passing, since most simulators don't
# currently support it. Bash value variable to be what we want.
@ -222,7 +226,8 @@ proc breakpoint_command_test {} {
proc user_defined_command_test {} {
global gdb_prompt
gdb_test "set \$foo = 4" "" "set foo in user_defined_command_test"
gdb_test_no_output "set \$foo = 4" \
"set foo in user_defined_command_test"
gdb_test_multiple "define mycommand" \
"define mycommand in user_defined_command_test" {
@ -258,7 +263,7 @@ proc watchpoint_command_test {} {
gdb_test "set can-use-hw-watchpoints 0" "" ""
}
gdb_test "set args 6" "" "set args in watchpoint_command_test"
gdb_test_no_output "set args 6" "set args in watchpoint_command_test"
if { ![runto factorial] } then { return }
delete_breakpoints
@ -377,28 +382,26 @@ proc deprecated_command_test {} {
gdb_test "maintenance deprecate blah" "Can't find command.*" \
"tried to deprecate non-existing command"
gdb_test "maintenance deprecate p \"new_p\"" "" "maintenance deprecate p \"new_p\" /1/"
gdb_test_no_output "maintenance deprecate p \"new_p\"" "maintenance deprecate p \"new_p\" /1/"
gdb_test "p 5" \
"Warning: 'p', an alias for the command 'print' is deprecated.*Use 'new_p'.*" \
"p deprecated warning, with replacement"
gdb_test "p 5" ".\[0-9\]* = 5.*" "Deprecated warning goes away /1/"
gdb_test "maintenance deprecate p \"new_p\"" "" "maintenance deprecate p \"new_p\" /2/"
gdb_test "maintenance deprecate print \"new_print\"" ""
gdb_test_no_output "maintenance deprecate p \"new_p\"" "maintenance deprecate p \"new_p\" /2/"
gdb_test_no_output "maintenance deprecate print \"new_print\""
gdb_test "p 5" \
"Warning: command 'print' \\(p\\) is deprecated.*Use 'new_print'.*" \
"both alias and command are deprecated"
gdb_test "p 5" ".\[0-9\]* = 5.*" "Deprecated warning goes away /2/"
gdb_test "maintenance deprecate set remote memory-read-packet-size \"srm\" " \
"" \
gdb_test_no_output "maintenance deprecate set remote memory-read-packet-size \"srm\" " \
"deprecate long command /1/"
gdb_test "set remote memory-read-packet-size" \
"Warning: command 'set remote memory-read-packet-size' is deprecated.*Use 'srm'.*" \
"long command deprecated /1/"
gdb_test "maintenance deprecate set remote memory-read-packet-size" \
"" \
gdb_test_no_output "maintenance deprecate set remote memory-read-packet-size" \
"deprecate long command /2/"
gdb_test "set remote memory-read-packet-size" \
"Warning: command 'set remote memory-read-packet-size' is deprecated.*No alternative known.*" \
@ -417,7 +420,8 @@ proc bp_deleted_in_command_test {} {
return
}
gdb_test "set args 1" "" "set args in bp_deleted_in_command_test"
gdb_test_no_output "set args 1" \
"set args in bp_deleted_in_command_test"
delete_breakpoints
# Create a breakpoint, and associate a command-list to it, with
@ -477,7 +481,8 @@ proc temporary_breakpoint_commands {} {
return
}
gdb_test "set args 1" "" "set args in temporary_breakpoint_commands"
gdb_test_no_output "set args 1" \
"set args in temporary_breakpoint_commands"
delete_breakpoints
# Create a temporary breakpoint, and associate a commands list to it.
@ -609,7 +614,7 @@ proc gdb_test_no_prompt { command result msg } {
proc if_commands_test {} {
global gdb_prompt
gdb_test "set \$tem = 1" "" "set \$tem in if_commands_test"
gdb_test_no_output "set \$tem = 1" "set \$tem in if_commands_test"
set test "if_commands_test 1"
gdb_test_no_prompt "if \$tem == 2" { >} $test

8
gdb/testsuite/gdb.base/cond-expr.exp
View File

@ -61,14 +61,14 @@ gdb_test "print (2 ? 3 : 4)" "\[0-9\]* = 3" \
gdb_test "print (0 ? 3 : 4)" "\[0-9\]* = 4" \
"print value of cond expr (const false)"
gdb_test "set variable x=14" "" "set variable x=14"
gdb_test "set variable y=2" "" "set variable y=2"
gdb_test "set variable z=3" "" "set variable z=3"
gdb_test_no_output "set variable x=14" "set variable x=14"
gdb_test_no_output "set variable y=2" "set variable y=2"
gdb_test_no_output "set variable z=3" "set variable z=3"
gdb_test "print (x ? y : z)" "\[0-9\]* = 2" \
"print value of cond expr (var true)"
gdb_test "set variable x=0" "" "set variable x=0"
gdb_test_no_output "set variable x=0" "set variable x=0"
gdb_test "print (x ? y : z)" "\[0-9\]* = 3" \
"print value of cond expr (var false)"

4
gdb/testsuite/gdb.base/condbreak.exp
View File

@ -86,7 +86,7 @@ gdb_test "break main" \
gdb_test "break marker1 if 1==1" \
"Breakpoint.*at.* file .*$srcfile1, line.*"
gdb_test "delete 2" ""
gdb_test_no_output "delete 2"
#
# test conditional break at line number
@ -94,7 +94,7 @@ gdb_test "delete 2" ""
gdb_test "break $srcfile:$bp_location1 if 1==1" \
"Breakpoint.*at.* file .*$srcfile, line $bp_location1\\."
gdb_test "delete 3" ""
gdb_test_no_output "delete 3"
#
# test conditional break at function

7
gdb/testsuite/gdb.base/cursal.exp
View File

@ -31,8 +31,7 @@ gdb_exit
gdb_start
gdb_reinitialize_dir $srcdir/$subdir
gdb_file_cmd ${binfile}
gdb_test "set listsize 1" \
".*"
gdb_test_no_output "set listsize 1"
# initial sal should be first statement in main
gdb_test "list" \
@ -64,8 +63,8 @@ gdb_test "list -1" \
"list after backtrace"
# check the window
gdb_test "set listsize 3" \
".*"
gdb_test_no_output "set listsize 3"
if {! [runto_main]} {
return -1
}

6
gdb/testsuite/gdb.base/cvexpr.exp
View File

@ -44,9 +44,9 @@ if [target_info exists gdb_stub] {
gdb_step_for_stub;
}
gdb_test "set print sevenbit-strings" "" ""
gdb_test "set print address off" "" ""
gdb_test "set width 0" "" ""
gdb_test_no_output "set print sevenbit-strings"
gdb_test_no_output "set print address off"
gdb_test_no_output "set width 0"
set ws "\[ \t\]*"

76
gdb/testsuite/gdb.base/default.exp
View File

@ -105,13 +105,13 @@ gdb_test "condition" "Argument required .breakpoint number.*" "condition"
#test core-file
gdb_test "core-file" "No core file now.|GDB can't read core files on this machine." "core-file"
#test delete "d" abbreviation
gdb_test "d" "" "delete \"d\" abbreviation"
gdb_test_no_output "d" "delete \"d\" abbreviation"
#test delete
gdb_test "delete" "" "delete"
gdb_test_no_output "delete" "delete"
#test define
gdb_test "define" "Argument required \[(\]name of command to define\[)\]." "define"
#test delete breakpoints
gdb_test "delete breakpoints" "" "delete breakpoints"
gdb_test_no_output "delete breakpoints" "delete breakpoints"
#test delete display
# FIXME -- need to dump full output to detailed log
@ -140,19 +140,19 @@ gdb_test "directory" \
"y"
#test disable "dis" abbreviation
gdb_test "dis" "" "disable \"dis\" abbreviation"
gdb_test_no_output "dis" "disable \"dis\" abbreviation"
#test disable "disa" abbreviation
gdb_test "disa" "" "disable \"disa\" abbreviation"
gdb_test_no_output "disa" "disable \"disa\" abbreviation"
#test disable
gdb_test "disable" "" "disable"
gdb_test_no_output "disable" "disable"
#test disable breakpoints
gdb_test "disable breakpoints" "" "disable breakpoints"
gdb_test_no_output "disable breakpoints" "disable breakpoints"
#test disable display
gdb_test "disable display" "" "disable display"
gdb_test_no_output "disable display" "disable display"
#test disassemble
gdb_test "disassemble" "No frame selected." "disassemble"
#test display
gdb_test "display" "" "display"
gdb_test_no_output "display" "display"
#test do
gdb_test "do" "No stack." "do"
#test document
@ -178,21 +178,21 @@ gdb_test "dump srec value" "Missing filename\."
gdb_test "dump tekhex memory" "Missing filename\."
gdb_test "dump tekhex value" "Missing filename\."
#test echo
gdb_test "echo" "" "echo"
gdb_test_no_output "echo" "echo"
#test enable breakpoints delete
gdb_test "enable breakpoints delete" "Argument required .one or more breakpoint numbers.*" "enable breakpoints delete"
#test enable breakpoints once
gdb_test "enable breakpoints once" "Argument required .one or more breakpoint numbers.*" "enable breakpoints once"
#test enable breakpoints
gdb_test "enable breakpoints" "" "enable breakpoints"
gdb_test_no_output "enable breakpoints" "enable breakpoints"
#test enable delete
gdb_test "enable delete" "Argument required .one or more breakpoint numbers.*" "enable delete"
#test enable display
gdb_test "enable display" "" "enable display"
gdb_test_no_output "enable display" "enable display"
#test enable once
gdb_test "enable once" "Argument required .one or more breakpoint numbers.*" "enable once"
#test enable
gdb_test "enable" "" "enable"
gdb_test_no_output "enable" "enable"
#test exec-file
send_gdb "exec-file\n"
gdb_expect {
@ -300,7 +300,7 @@ gdb_test "info f" "No stack.*|No selected frame.*" "info frame \"f\" abbreviatio
#test info frame
gdb_test "info frame" "No stack.|No selected frame." "info frame"
#test info files
gdb_test "info files" "" "info files"
gdb_test_no_output "info files" "info files"
#test info float
gdb_test "info float" "The program has no registers now." "info float"
#test info functions
@ -326,7 +326,7 @@ gdb_test "info source" "No current source file..*" "info source"
#test info sources
gdb_test "info sources" "No symbol table is loaded. Use the \"file\" command.*" "info sources"
#test info target
gdb_test "info target" "" "info target"
gdb_test_no_output "info target" "info target"
#test info terminal
gdb_test "info terminal" "No saved terminal information." "info terminal"
#test info types
@ -369,13 +369,13 @@ gdb_test "output" "Argument required .expression to compute.*" "output"
gdb_test "overlay" "\"overlay\" must be followed by the name of .*"
#test a non-existant overlay subcommand
gdb_test "overlay on" "Undefined overlay command.* Try \"help overlay\"."
gdb_test "overlay manual" "" "overlay manual #1"
gdb_test "overlay auto" ""
gdb_test "overlay off" ""
gdb_test_no_output "overlay manual" "overlay manual #1"
gdb_test_no_output "overlay auto"
gdb_test_no_output "overlay off"
gdb_test "overlay list" "No sections are mapped."
gdb_test "overlay map" "Overlay debugging not enabled.*" "overlay map #1"
gdb_test "overlay unmap" "Overlay debugging not enabled.*" "overlay unmap #1"
gdb_test "overlay manual" "" "overlay manual #2"
gdb_test_no_output "overlay manual" "overlay manual #2"
gdb_test "overlay map" "Argument required: name of an overlay section." "overlay map #2"
gdb_test "overlay unmap" "Argument required: name of an overlay section." "overlay unmap #2"
@ -442,7 +442,7 @@ You must specify a function name to run, and arguments if any"
}
#test rbreak
gdb_test "rbreak" "" "rbreak"
gdb_test "rbreak" "rbreak"
# test restore
gdb_test "restore" "You can't do that without a process to debug\."
@ -466,7 +466,7 @@ gdb_test "section" "Must specify section name and its virtual address.*" "sectio
#test set annotate
gdb_test "set annotate" "Argument required .integer to set it to.*" "set annotate"
#test set args
gdb_test "set args" "" "set args"
gdb_test_no_output "set args" "set args"
#test set check "c" abbreviation
gdb_test "set c" "\"set check\" must be followed by the name of a check subcommand.(\[^\r\n\]*\[\r\n\])+List of set check subcommands:(\[^\r\n\]*\[\r\n\])+set check range -- Set range checking(\[^\r\n\]*\[\r\n\])+set check type -- Set type checking(\[^\r\n\]*\[\r\n\])+Type \"help set check\" followed by set check subcommand name for full documentation.(\[^\r\n\]*\[\r\n\])+Command name abbreviations are allowed if unambiguous." "set check \"c\" abbreviation"
#test set check "ch" abbreviation
@ -480,7 +480,7 @@ gdb_test "set check type" "" "set check type"
#test set complaints
gdb_test "set complaints" "Argument required .integer to set it to.*" "set complaints"
#test set confirm
gdb_test "set confirm" "" "set confirm"
gdb_test_no_output "set confirm" "set confirm"
# Don't test set editing. What if we're talking to a gdb that
# won't do editing correctly while we're talking to it?
# gdb_test "set editing" "" "set editing"
@ -490,11 +490,11 @@ gdb_test "set environment" "Argument required .environment variable and value.*"
#test set height
gdb_test "set height" "Argument required .integer to set it to.*" "set height"
#test set history expansion
gdb_test "set history expansion" "" "set history expansion"
gdb_test_no_output "set history expansion" "set history expansion"
#test set history filename
gdb_test "set history filename" "Argument required .filename to set it to.*" "set history filename"
#test set history save
gdb_test "set history save" "" "set history save"
gdb_test_no_output "set history save" "set history save"
#test set history size
gdb_test "set history size" "Argument required .integer to set it to.*" "set history size"
#test set history
@ -510,39 +510,39 @@ gdb_test "set pr" "\"set print\" must be followed by the name of a print subcomm
#test set print
gdb_test "set print" "\"set print\" must be followed by the name of a print subcommand.(\[^\r\n\]*\[\r\n\])+List of set print subcommands:(\[^\r\n\]*\[\r\n\])+Type \"help set print\" followed by set print subcommand name for full documentation.(\[^\r\n\]*\[\r\n\])+Command name abbreviations are allowed if unambiguous." "set print"
#test set print address
gdb_test "set print address" "" "set print address"
gdb_test_no_output "set print address" "set print address"
#test set print array
gdb_test "set print array" "" "set print array"
gdb_test_no_output "set print array" "set print array"
#test set print asm-demangle
gdb_test "set print asm-demangle" "" "set print asm-demangle"
gdb_test_no_output "set print asm-demangle" "set print asm-demangle"
#test set print demangle
gdb_test "set print demangle" "" "set print demangle"
gdb_test_no_output "set print demangle" "set print demangle"
#test set print elements
gdb_test "set print elements" "Argument required .integer to set it to.*" "set print elements"
#test set print object
gdb_test "set print object" "" "set print object"
gdb_test_no_output "set print object" "set print object"
#test set print pretty
gdb_test "set print pretty" "" "set print pretty"
gdb_test_no_output "set print pretty" "set print pretty"
#test set print sevenbit-strings
gdb_test "set print sevenbit-strings" "" "set print sevenbit-strings"
gdb_test_no_output "set print sevenbit-strings" "set print sevenbit-strings"
#test set print union
gdb_test "set print union" "" "set print union"
gdb_test_no_output "set print union" "set print union"
#test set print vtbl
gdb_test "set print vtbl" "" "set print vtbl"
gdb_test_no_output "set print vtbl" "set print vtbl"
# FIXME -- need a test for "set prompt"
#test set radix
gdb_test "set radix" "Input and output radices now set to decimal 10, hex a, octal 12.*" "set radix"
#test set symbol-reloading
gdb_test "set symbol-reloading" "" "set symbol-reloading"
gdb_test_no_output "set symbol-reloading" "set symbol-reloading"
#test set variable
gdb_test "set variable" "Argument required .expression to compute.*" "set variable"
#test set verbose
gdb_test "set verbose" "" "set verbose"
gdb_test_no_output "set verbose" "set verbose"
#test set width
gdb_test "set width" "Argument required .integer to set it to.*" "set width"
#test set write
# This is only supported on targets which use exec.o.
gdb_test "set write" "" "set write"
gdb_test_no_output "set write" "set write"
#test set
gdb_test "set" "Argument required .expression to compute.*" "set"
#test shell echo Hi dad!
@ -627,9 +627,9 @@ gdb_test "show radix" "Input and output radices set to decimal 10, hex a, octal
#test show symbol-reloading
gdb_test "show symbol-reloading" "Dynamic symbol table reloading multiple times in one run is on." "show symbol-reloading"
#test show user
gdb_test "show user" "" "show user"
gdb_test_no_output "show user" "show user"
#test show values
gdb_test "show values" "" "show values"
gdb_test_no_output "show values" "show values"
#test show verbose
gdb_test "show verbose" "Verbose printing of informational messages is o.*|Verbosity is off.*" "show verbose"
#test show version

7
gdb/testsuite/gdb.base/del.exp
View File

@ -44,9 +44,9 @@ proc test_delete_alias { alias } {
# First of all, remove all previous breakpoints if there were any,
# and then verify that we do not have any breakpoint lying around.
gdb_test "delete" \
"" \
gdb_test_no_output "delete" \
"Remove all breakpoints ($alias)"
gdb_test "info break" \
"No breakpoints or watchpoints." \
"info break after removing break on main"
@ -59,8 +59,7 @@ proc test_delete_alias { alias } {
"Breakpoint.*at.* file .*$srcfile, line.*" \
"breakpoint insertion ($alias)"
gdb_test "$alias \$bpnum" \
"" \
gdb_test_no_output "$alias \$bpnum" \
"Remove last breakpoint ($alias)"
gdb_test "info break" \

2
gdb/testsuite/gdb.base/detach.exp
View File

@ -49,7 +49,7 @@ proc do_detach_tests {} {
global pass
runto_main
gdb_test "set should_exit = 1" "" "set should_exit, $pass"
gdb_test_no_output "set should_exit = 1" "set should_exit, $pass"
gdb_test "detach" "Detaching from program: .*$escapedbinfile, .*" "detach, $pass"
}

14
gdb/testsuite/gdb.base/display.exp
View File

@ -103,11 +103,11 @@ gdb_test "cont" ".*\[Ww\]atchpoint 3: sum.*\[1-9\]*: x/s &sum.*\[1-9\]*: /f f =
gdb_test "cont" ".*\[Ww\]atchpoint 3: sum.*\[1-9\]*: x/s &sum.*\[1-9\]*: /f f = 4.1415\r\n\[1-9\]*: x/i &k.*\r\n\[1-9\]*: /x j = 0x0.*\[1-9\]*: i = 0.*" "second disp"
gdb_test "enab disp 6" ".*No display number 6..*" "catch err"
gdb_test "disab disp 1" ".*" "disab disp 1"
gdb_test "disab disp 2" ".*" "disab disp 2"
gdb_test "enab disp 1" ".*" "re-enab"
gdb_test "enab disp 1" ".*" "re-enab of enab"
gdb_test "undisp 5" ".*" "undisp"
gdb_test_no_output "disab disp 1" "disab disp 1"
gdb_test_no_output "disab disp 2" "disab disp 2"
gdb_test_no_output "enab disp 1" "re-enab"
gdb_test_no_output "enab disp 1" "re-enab of enab"
gdb_test_no_output "undisp 5" "undisp"
gdb_test "info disp" ".*Auto-display expressions now in effect.*y /f f.*y /1bi &k.*n /x j.*y i.*" "info disp"
gdb_test "cont" ".*\[Ww\]atch.*5.1415.*.*i = 0.*" "next hit"
@ -150,7 +150,7 @@ gdb_test "printf %d" ".*Bad format string, missing.*"
gdb_test "printf \"%d" ".*Bad format string, non-terminated.*"
gdb_test "printf \"%d%d\",i" ".*Wrong number of arguments.*"
gdb_test "printf \"\\\\!\\a\\f\\r\\t\\v\\b\\n\"" ".*!.*"
gdb_test "printf \"\"" ".*" "re-set term"
gdb_test_no_output "printf \"\"" "re-set term"
gdb_test "printf \"\\w\"" ".*Unrecognized escape character.*"
gdb_test "printf \"%d\" j" ".*Invalid argument syntax.*"
gdb_test "printf \"%p\\n\", 0" "\\(nil\\)"
@ -169,7 +169,7 @@ gdb_test "print j" " = 0\[\\r\\n\]+" "debug test output 3"
if [istarget "hppa2.0w-hp-hpux11*"] {
xfail "'x/0 j' terminates PA64 process - skipped test point"
} else {
gdb_test "x/0 j" ".*"
gdb_test_no_output "x/0 j"
}
if [istarget "hppa*-hp-hpux*"] {
# on HP-UX you could access the first page without getting an error

14
gdb/testsuite/gdb.base/ena-dis-br.exp
View File

@ -84,7 +84,7 @@ proc break_at { breakpoint where } {
set bp [break_at "marker1" " line ($bp_location15|$bp_location16)"]
gdb_test "enable $bp" "" "enable break marker1"
gdb_test_no_output "enable $bp" "enable break marker1"
gdb_test "info break $bp" \
"\[0-9\]*\[ \t\]+breakpoint\[ \t\]+keep\[ \t\]+y.*" \
@ -102,13 +102,13 @@ gdb_test_multiple "continue" "$test" {
}
}
gdb_test "delete $bp" "" "delete break marker1"
gdb_test_no_output "delete $bp" "delete break marker1"
# Verify that we can set a breakpoint to be self-disabling after the
# first time it triggers.
set bp [break_at "marker2" " line ($bp_location8|$bp_location9)"]
gdb_test "enable once $bp" "" "enable once break marker2"
gdb_test_no_output "enable once $bp" "enable once break marker2"
gdb_test "info break $bp" \
"\[0-9\]*\[ \t\]+breakpoint\[ \t\]+dis\[ \t\]+y.*" \
@ -143,7 +143,7 @@ if ![runto_main] then {
set bp [break_at "marker3" " line ($bp_location17|$bp_location18)"]
gdb_test "enable del $bp" "" "enable del break marker3"
gdb_test_no_output "enable del $bp" "enable del break marker3"
gdb_test "info break $bp" \
"\[0-9\]*\[ \t\]+breakpoint\[ \t\]+del\[ \t\]+y.*" \
@ -162,7 +162,7 @@ gdb_test "info break $bp" \
set bp [break_at "marker4" " line ($bp_location14|$bp_location13).*"]
gdb_test "disable $bp" "" "disable break marker4"
gdb_test_no_output "disable $bp" "disable break marker4"
gdb_test "info break $bp" \
"\[0-9\]*\[ \t\]+breakpoint\[ \t\]+keep\[ \t\]+n.*" \
@ -237,7 +237,7 @@ gdb_test "ignore $bp 1" \
"Will ignore next crossing of breakpoint \[0-9\]*.*" \
"ignore break marker1"
gdb_test "enable del $bp" "" "enable del break marker1"
gdb_test_no_output "enable del $bp" "enable del break marker1"
gdb_test "info break $bp" \
"\[0-9\]*\[ \t\]+breakpoint\[ \t\]+del\[ \t\]+y.*ignore next 1 hits.*" \
@ -263,7 +263,7 @@ gdb_test "ignore $bp 10" \
"Will ignore next 10 crossings of breakpoint \[0-9\]*.*" \
"ignore break marker1"
gdb_test "disable $bp" "" "disable break marker1"
gdb_test_no_output "disable $bp" "disable break marker1"
gdb_continue_to_end "no stop at ignored & disabled break marker1"
rerun_to_main

8
gdb/testsuite/gdb.base/eval-skip.exp
View File

@ -60,10 +60,10 @@ if ![runto_main] then {
continue
}
gdb_test "set variable x=14" "" "set variable x=14"
gdb_test "set variable y=2" "" "set variable y=2"
gdb_test "set variable z=2" "" "set variable z=2"
gdb_test "set variable w=3" "" "set variable w=3"
gdb_test_no_output "set variable x=14" "set variable x=14"
gdb_test_no_output "set variable y=2" "set variable y=2"
gdb_test_no_output "set variable z=2" "set variable z=2"
gdb_test_no_output "set variable w=3" "set variable w=3"
gdb_test "print (0 && (x+y))" ".$decimal = $false" \
"print value of (0 && (x+y))"

5
gdb/testsuite/gdb.base/foll-fork.exp
View File

@ -195,7 +195,8 @@ proc catch_fork_unpatch_child {} {
"Breakpoint .*file .*$srcfile, line .*" \
"unpatch child, breakpoint at exit call"
gdb_test "set follow-fork child" "" "unpatch child, set follow-fork child"
gdb_test_no_output "set follow-fork child" \
"unpatch child, set follow-fork child"
set test "unpatch child, unpatched parent breakpoints from child"
gdb_test_multiple "continue" $test {
@ -342,7 +343,7 @@ gdb_load ${binfile}
# The "Detaching..." and "Attaching..." messages may be hidden by
# default.
gdb_test "set verbose" ""
gdb_test_no_output "set verbose"
# This is a test of gdb's ability to follow the parent, child or both
# parent and child of a Unix fork() system call.

2
gdb/testsuite/gdb.base/foll-vfork.exp
View File

@ -396,7 +396,7 @@ gdb_load ${binfile}
# The "Detaching..." and "Attaching..." messages may be hidden by
# default.
gdb_test "set verbose" ""
gdb_test_no_output "set verbose"
# This is a test of gdb's ability to follow the parent or child
# of a Unix vfork() system call. (The child will subsequently

9
gdb/testsuite/gdb.base/frame-args.exp
View File

@ -37,8 +37,7 @@ if ![runto break_me] then {
# Test with "print frame-arguments" set to "all"
gdb_test "set print frame-arguments all" \
"" \
gdb_test_no_output "set print frame-arguments all" \
"set print frame-arguments all"
gdb_test "frame 1" \
".*in call_me \\(i=3, f=5, s=({a = 3, b = 5}|<value optimized out>), ss=0x\[0-9a-f\]\+, u=({.*}|<value optimized out>), e=green\\) at .*frame-args\\.c:.*" \
@ -46,8 +45,7 @@ gdb_test "frame 1" \
# Test with "print frame-arguments" set to "scalars"
gdb_test "set print frame-arguments scalars" \
"" \
gdb_test_no_output "set print frame-arguments scalars" \
"set print frame-arguments scalars"
gdb_test "frame 1" \
".*in call_me \\(i=3, f=5, s=\\.\\.\\., ss=0x\[0-9a-f\]\+, u=\\.\\.\\., e=green\\) at .*frame-args\\.c:.*" \
@ -55,8 +53,7 @@ gdb_test "frame 1" \
# Test with "print frame-arguments" set to "none"
gdb_test "set print frame-arguments none" \
"" \
gdb_test_no_output "set print frame-arguments none" \
"set print frame-arguments none"
gdb_test "frame 1" \
".*in call_me \\(i=\\.\\.\\., f=\\.\\.\\., s=\\.\\.\\., ss=\\.\\.\\., u=\\.\\.\\., e=\\.\\.\\.\\) at .*frame-args\\.c:.*" \

2
gdb/testsuite/gdb.base/funcargs.exp
View File

@ -1179,7 +1179,7 @@ gdb_test_multiple "show endian" "getting target endian" {
# Perform tests
gdb_test "set print frame-arguments all" ""
gdb_test_no_output "set print frame-arguments all"
integral_args
funcargs_reload

5
gdb/testsuite/gdb.base/gcore-buffer-overflow.exp
View File

@ -51,9 +51,8 @@ gdb_test_multiple "help gcore" "help gcore" {
}
}
gdb_test "set args ${pattern}" \
"" \
"Set buffer exceeding arguments"
gdb_test_no_output "set args ${pattern}" \
"Set buffer exceeding arguments"
if { ! [ runto_main ] } then {
untested gcore-buffer-overflow.exp

8
gdb/testsuite/gdb.base/gdbvars.exp
View File

@ -33,19 +33,19 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {deb
proc test_convenience_variables {} {
global gdb_prompt
gdb_test "set \$foo = 101" "" \
gdb_test_no_output "set \$foo = 101" \
"Set a new convenience variable"
gdb_test "print \$foo" " = 101" \
"Print contents of new convenience variable"
gdb_test "set \$foo = 301" "" \
gdb_test_no_output "set \$foo = 301" \
"Set convenience variable to a new value"
gdb_test "print \$foo" " = 301" \
"Print new contents of convenience variable"
gdb_test "set \$_ = 11" "" \
gdb_test_no_output "set \$_ = 11" \
"Set convenience variable \$_"
gdb_test "print \$_" " = 11" \
@ -111,7 +111,7 @@ proc test_value_history {} {
proc test_with_program {} {
global hex
gdb_test "set \$prog_var = p" "" \
gdb_test_no_output "set \$prog_var = p" \
"Set a new convenience variable to a program variable"
gdb_test "print /x \$prog_var" " = $hex" \
"Print contents of new convenience variable of program variable"

4
gdb/testsuite/gdb.base/help.exp
View File

@ -24,8 +24,8 @@
gdb_start
# force the height of the debugger to be pretty large so no pagers getused
gdb_test "set height 400" "" "test set height"
# force the height of the debugger to be pretty large so no pagers get used
gdb_test_no_output "set height 400" "test set height"
# use a larger expect input buffer for long help outputs.
# test help add-symbol-file

2
gdb/testsuite/gdb.base/ifelse.exp
View File

@ -93,7 +93,7 @@ gdb_test "if 1\necho true\\n\nelse\necho false\\n\nend" "true" ""
# create
gdb_test "define abc\nif 1\nelse\nend\nend" "" "create define with empty else"
# call (note that condition is 1 so should pass)
gdb_test "abc" "" "call original define"
gdb_test_no_output "abc" "call original define"
# replace
set message "replace define with if .. else with empty body"
gdb_test_multiple "define abc\necho got here\\n\nend" $message {

2
gdb/testsuite/gdb.base/included.exp
View File

@ -27,7 +27,7 @@ gdb_start
gdb_reinitialize_dir $srcdir/$subdir
gdb_load ${binfile}
gdb_test "set listsize 1" ""
gdb_test_no_output "set listsize 1"
gdb_test "list main" ".*"
get_debug_format

4
gdb/testsuite/gdb.base/list.exp
View File

@ -496,7 +496,7 @@ proc test_list_filename_and_function {} {
proc test_forward_search {} {
global timeout
gdb_test "set listsize 4" ""
gdb_test_no_output "set listsize 4"
# On SunOS4, this gives us lines 19-22. On AIX, it gives us
# lines 20-23. This depends on whether the line number of a function
# is considered to be the openbrace or the first statement--either one
@ -528,7 +528,7 @@ if [target_info exists gdb_stub] {
gdb_step_for_stub;
}
gdb_test "set width 0" "" "set width 0"
gdb_test_no_output "set width 0"
test_listsize
get_debug_format

46
gdb/testsuite/gdb.base/macscp.exp
View File

@ -456,16 +456,14 @@ gdb_test "print MACRO_TO_EXPAND" \
" = 0" \
"print expression with macro in scope."
gdb_test "macro define MACRO_TO_EXPAND 72" \
"" \
gdb_test_no_output "macro define MACRO_TO_EXPAND 72" \
"user macro override"
gdb_test "print MACRO_TO_EXPAND" \
" = 72" \
"choose user macro"
gdb_test "macro undef MACRO_TO_EXPAND" \
"" \
gdb_test_no_output "macro undef MACRO_TO_EXPAND" \
"remove user override"
gdb_test "print MACRO_TO_EXPAND" \
@ -478,8 +476,7 @@ gdb_test "print MACRO_TO_EXPAND" \
"No symbol \"MACRO_TO_EXPAND\" in current context\." \
"print expression with macro after undef."
gdb_test "macro define MACRO_TO_EXPAND 5" \
"" \
gdb_test_no_output "macro define MACRO_TO_EXPAND 5" \
"basic macro define"
gdb_test "print MACRO_TO_EXPAND" \
@ -490,16 +487,14 @@ gdb_test "macro list" \
"macro define MACRO_TO_EXPAND 5" \
"basic macro list"
gdb_test "macro define MACRO_TO_EXPAND(x) x" \
"" \
gdb_test_no_output "macro define MACRO_TO_EXPAND(x) x" \
"basic redefine, macro with args"
gdb_test "print MACRO_TO_EXPAND (7)" \
" = 7" \
"expansion of macro with arguments"
gdb_test "macro undef MACRO_TO_EXPAND" \
"" \
gdb_test_no_output "macro undef MACRO_TO_EXPAND" \
"basic macro undef"
gdb_test "print MACRO_TO_EXPAND" \
@ -566,8 +561,7 @@ gdb_expect {
timeout { fail "(timeout) complete 'p FORTY_' 2" }
}
gdb_test "macro define TWENTY_THREE 25" \
"" \
gdb_test_no_output "macro define TWENTY_THREE 25" \
"defining TWENTY_THREE"
# User-defined macros are always in scope.
@ -592,8 +586,7 @@ gdb_test "macro expand SPLICE(x, y)" \
"expands to: xy" \
"basic macro splicing"
gdb_test "macro define robotinvasion 2010" \
"" \
gdb_test_no_output "macro define robotinvasion 2010" \
"define splice helper"
gdb_test "macro expand SPLICE(robot, invasion)" \
@ -602,20 +595,16 @@ gdb_test "macro expand SPLICE(robot, invasion)" \
# Varargs tests.
gdb_test "macro define va_c99(...) varfunc (fixedarg, __VA_ARGS__)" \
"" \
gdb_test_no_output "macro define va_c99(...) varfunc (fixedarg, __VA_ARGS__)" \
"define first varargs helper"
gdb_test "macro define va2_c99(x, y, ...) varfunc (fixedarg, x, y, __VA_ARGS__)" \
"" \
gdb_test_no_output "macro define va2_c99(x, y, ...) varfunc (fixedarg, x, y, __VA_ARGS__)" \
"define second varargs helper"
gdb_test "macro define va_gnu(args...) varfunc (fixedarg, args)" \
"" \
gdb_test_no_output "macro define va_gnu(args...) varfunc (fixedarg, args)" \
"define third varargs helper"
gdb_test "macro define va2_gnu(args...) varfunc (fixedarg, ## args)" \
"" \
gdb_test_no_output "macro define va2_gnu(args...) varfunc (fixedarg, ## args)" \
"define fourth varargs helper"
gdb_test "macro expand va_c99(one, two, three)" \
@ -644,16 +633,13 @@ gdb_test "macro expand va2_gnu()" \
# Stringification tests.
gdb_test "macro define str(x) #x" \
"" \
gdb_test_no_output "macro define str(x) #x" \
"define stringification macro"
gdb_test "macro define maude 5" \
"" \
gdb_test_no_output "macro define maude 5" \
"define first stringification helper"
gdb_test "macro define xstr(x) str(x)" \
"" \
gdb_test_no_output "macro define xstr(x) str(x)" \
"define second stringification helper"
gdb_test "print str(5)" \
@ -685,9 +671,9 @@ gdb_test "print xstr(maude)" \
"stringify with substitution"
# Regression test for pp-number bug.
gdb_test "macro define si_addr fields.fault.si_addr" \
"" \
gdb_test_no_output "macro define si_addr fields.fault.si_addr" \
"define si_addr macro"
gdb_test "macro expand siginfo.si_addr" \
"expands to: siginfo.fields.fault.si_addr" \
"macro expand siginfo.si_addr"

2
gdb/testsuite/gdb.base/maint.exp
View File

@ -160,7 +160,7 @@ gdb_test_multiple "maint print statistics" "maint print statistics" {
}
# There aren't any ...
gdb_test "maint print dummy-frames" ""
gdb_test_no_output "maint print dummy-frames"
send_gdb "maint print objfiles\n"

26
gdb/testsuite/gdb.base/multi-forks.exp
View File

@ -120,7 +120,7 @@ proc continue_to_exit_bp_loc {} {
# The result should be that each of the 4 forks returns zero.
runto_main
gdb_test "set follow-fork child"
gdb_test_no_output "set follow-fork child"
continue_to_exit_bp_loc
gdb_test "print pids" "\\$.* = \\{0, 0, 0, 0\\}.*" "follow child, print pids"
@ -160,7 +160,7 @@ gdb_test "help set detach-on-fork" "whether gdb will detach the child.*" \
gdb_test "show detach-on-fork" "on." "show detach default on"
gdb_test "set detach off" "" "set detach off"
gdb_test_no_output "set detach off" "set detach off"
#
# We will now run every fork up to the exit bp,
@ -196,27 +196,27 @@ gdb_test "detach inferior 5" "Detaching .*" "Detach 5"
# Test kill inferior
#
gdb_test "kill inferior 6" "" "Kill 6"
gdb_test_no_output "kill inferior 6" "Kill 6"
gdb_test "info inferior 6" "<null>.*" "Did kill 6"
gdb_test "kill inferior 7" "" "Kill 7"
gdb_test_no_output "kill inferior 7" "Kill 7"
gdb_test "info inferior 7" "<null>.*" "Did kill 7"
gdb_test "kill inferior 8" "" "Kill 8"
gdb_test_no_output "kill inferior 8" "Kill 8"
gdb_test "info inferior 8" "<null>.*" "Did kill 8"
gdb_test "kill inferior 9" "" "Kill 9"
gdb_test_no_output "kill inferior 9" "Kill 9"
gdb_test "info inferior 9" "<null>.*" "Did kill 9"
gdb_test "kill inferior 10" "" "Kill 10"
gdb_test_no_output "kill inferior 10" "Kill 10"
gdb_test "info inferior 10" "<null>.*" "Did kill 10"
gdb_test "kill inferior 11" "" "Kill 11"
gdb_test_no_output "kill inferior 11" "Kill 11"
gdb_test "info inferior 11" "<null>.*" "Did kill 11"
gdb_test "kill inferior 12" "" "Kill 12"
gdb_test_no_output "kill inferior 12" "Kill 12"
gdb_test "info inferior 12" "<null>.*" "Did kill 12"
gdb_test "kill inferior 13" "" "Kill 13"
gdb_test_no_output "kill inferior 13" "Kill 13"
gdb_test "info inferior 13" "<null>.*" "Did kill 13"
gdb_test "kill inferior 14" "" "Kill 14"
gdb_test_no_output "kill inferior 14" "Kill 14"
gdb_test "info inferior 14" "<null>.*" "Did kill 14"
gdb_test "kill inferior 15" "" "Kill 15"
gdb_test_no_output "kill inferior 15" "Kill 15"
gdb_test "info inferior 15" "<null>.*" "Did kill 15"
gdb_test "kill inferior 16" "" "Kill 16"
gdb_test_no_output "kill inferior 16" "Kill 16"
gdb_test "info inferior 16" "<null>.*" "Did kill 16"
return 0

4
gdb/testsuite/gdb.base/overlays.exp
View File

@ -98,7 +98,7 @@ set fptrcast [string_to_regexp "{int (int)}"]
set iptrcast [string_to_regexp "(int *)"]
set hexx "0x\[0-9abcdefABCDEF\]+"
gdb_test "overlay manual" ""
gdb_test_no_output "overlay manual"
gdb_test "overlay list" "No sections are mapped." "List with none mapped"
# capture the LMA addresses of [foo bar baz grbx foox barx bazx grbxx]
@ -247,7 +247,7 @@ if $data_overlays then {
# test automatic mode
gdb_test "overlay auto" ""
gdb_test_no_output "overlay auto"
gdb_test "overlay list" "No sections are mapped." "List none mapped (auto)"
gdb_test "break foo" "Breakpoint .*at .*file .*foo.c.*" "break foo"
gdb_test "break bar" "Breakpoint .*at .*file .*bar.c.*" "break bar"

6
gdb/testsuite/gdb.base/page.exp
View File

@ -23,7 +23,7 @@ if $tracelevel {
gdb_exit
gdb_start
gdb_test "set pagination off" ""
gdb_test_no_output "set pagination off"
gdb_test "show pagination" "State of pagination is off.*" "pagination is off"
send_gdb "help\n"
gdb_expect_list "unpaged help" ".*$gdb_prompt $" {
@ -48,9 +48,9 @@ gdb_expect_list "unpaged help" ".*$gdb_prompt $" {
}
gdb_test "set pagination on" ""
gdb_test_no_output "set pagination on"
gdb_test "show pagination" "State of pagination is on.*" "pagination is on"
gdb_test "set height 10" ""
gdb_test_no_output "set height 10"
send_gdb "help\n"
gdb_expect_list "paged help" \
".*---Type <return> to continue, or q <return> to quit---" {

9
gdb/testsuite/gdb.base/pending.exp
View File

@ -133,7 +133,7 @@ gdb_test_multiple "break pendfunc2" "Don't set pending breakpoint" {
# Add condition to pending breakpoint
#
gdb_test "condition 1 k == 1" ""
gdb_test_no_output "condition 1 k == 1"
gdb_test "info break" \
"Num Type\[ \]+Disp Enb Address\[ \]+What.*
@ -146,7 +146,7 @@ gdb_test "info break" \
# Disable pending breakpoint
#
gdb_test "disable 1" ""
gdb_test_no_output "disable 1"
gdb_test "info break" \
"Num Type\[ \]+Disp Enb Address\[ \]+What.*
@ -159,7 +159,7 @@ gdb_test "info break" \
# Add commands to pending breakpoint
#
gdb_test "commands 1\nprint k\nend" "" \
"Set commands for pending breakpoint"
"Set commands for pending breakpoint"
gdb_test "info break" \
"Num Type\[ \]+Disp Enb Address\[ \]+What.*
@ -229,8 +229,7 @@ gdb_test "" \
# Re-enable the first pending breakpoint which should resolve
#
gdb_test "enable 1" \
"" \
gdb_test_no_output "enable 1" \
"re-enabling pending breakpoint that can resolve instantly"
#

18
gdb/testsuite/gdb.base/pointers.exp
View File

@ -127,8 +127,10 @@ gdb_test "next " "more_code.*;" "continuing after dummy()"
# timeout { fail "(timeout) illegal pointer assignment rejected" }
# }
gdb_test "set variable v_int_pointer=&v_int_array\[0\]" "" "set pointer to beginning of array"
gdb_test "set variable v_int_pointer2=&v_int_array\[1\]" "" "set pointer to end of array"
gdb_test_no_output "set variable v_int_pointer=&v_int_array\[0\]" \
"set pointer to beginning of array"
gdb_test_no_output "set variable v_int_pointer2=&v_int_array\[1\]" \
"set pointer to end of array"
gdb_test "print *v_int_pointer" " = 6" "print object pointed to"
@ -153,24 +155,26 @@ gdb_test "print v_int_pointer < v_int_pointer2" " = $true" \
gdb_test "print v_int_pointer > v_int_pointer2" " = $false" \
"pointer1>pointer2"
gdb_test "set variable y = *v_int_pointer++" "" "set y = *v_int_pointer++"
gdb_test_no_output "set variable y = *v_int_pointer++" \
"set y = *v_int_pointer++"
gdb_test "print y" " = 6" "pointer assignment"
gdb_test "print *v_int_pointer" " = 18" "and post-increment"
gdb_test "set variable y = *--v_int_pointer2" "" "set y = *--v_int_pointer2"
gdb_test_no_output "set variable y = *--v_int_pointer2" \
"set y = *--v_int_pointer2"
gdb_test "print y" " = 6" "pointer assignment"
gdb_test "print *v_int_pointer2" " = 6" "and pre-decrement"
gdb_test "set variable y =v_int_pointer-v_int_pointer2" "" \
gdb_test_no_output "set variable y =v_int_pointer-v_int_pointer2" \
"set y =v_int_pointer-v_int_pointer2"
gdb_test "print y" " = 1" "pointer1-pointer2"
gdb_test "set variable v_int_pointer=v_int_array" "" \
gdb_test_no_output "set variable v_int_pointer=v_int_array" \
"set v_int_pointer=v_int_array"
gdb_test "print *v_int_pointer" " = 6" \
"print array element through pointer"
@ -190,7 +194,7 @@ gdb_test "print (*rptr)\[1\]" " = 1" \
gdb_test "print (*rptr)\[2\]" " = 2" \
"print array element through pointer \#5"
gdb_test "set variable rptr = rptr+1" "" "increment rptr"
gdb_test_no_output "set variable rptr = rptr+1" "increment rptr"
gdb_test "print (*rptr)\[0\]" " = 3" \
"print array element through pointer \#6"

2
gdb/testsuite/gdb.base/pr11022.exp
View File

@ -52,6 +52,6 @@ gdb_test "continue" ".*break here.*" "breakpoint hit"
gdb_test "continue" ".*Hardware watchpoint.*Old value = 0.*New value = 42.*" \
"watchpoint hit"
gdb_test "continue" ".*break here.*" "breakpoint hit 2"
gdb_test "set var x = 1"
gdb_test_no_output "set var x = 1"
gdb_test "continue" ".*Hardware watchpoint.*Old value = 1.*New value = 42.*" \
"watchpoint hit 2"

2
gdb/testsuite/gdb.base/prelink.exp
View File

@ -108,6 +108,6 @@ gdb_reinitialize_dir $srcdir/$subdir
gdb_load ${binfile}
# Print the "adjusting expectations" message.
gdb_test "set verbose on"
gdb_test_no_output "set verbose on"
gdb_test "core-file $objdir/$subdir/prelink.core" {Using PIC \(Position Independent Code\) prelink displacement.*} "prelink"

38
gdb/testsuite/gdb.base/printcmds.exp
View File

@ -42,7 +42,7 @@ get_compiler_info ${binfile}
proc set_lang_c {} {
global gdb_prompt
if [gdb_test "set language c" "" "set language c"] {
if [gdb_test_no_output "set language c" "set language c"] {
return 0
}
@ -414,7 +414,7 @@ proc test_print_repeats_10 {} {
global gdb_prompt
for { set x 1; } { $x <= 16 } { incr x; } {
gdb_test "set print elements $x" ""
gdb_test_no_output "set print elements $x"
for { set e 1; } { $e <= 16 } {incr e; } {
set v [expr $e - 1];
set command "p &ctable2\[${v}*16\]"
@ -467,23 +467,23 @@ proc test_print_strings {} {
# Test that setting print elements unlimited doesn't completely suppress
# printing; this was a bug in older gdb's.
gdb_test "set print elements 0" ""
gdb_test_no_output "set print elements 0"
gdb_test "p teststring" \
" = (.unsigned char .. )?\"teststring contents\"" "p teststring with elements set to 0"
gdb_test "set print elements 1" ""
gdb_test_no_output "set print elements 1"
gdb_test "p teststring" \
" = (.unsigned char .. )?\"t\"\\.\\.\\." "p teststring with elements set to 1"
gdb_test "set print elements 5" ""
gdb_test_no_output "set print elements 5"
gdb_test "p teststring" \
" = (.unsigned char .. )?\"tests\"\\.\\.\\." "p teststring with elements set to 5"
gdb_test "set print elements 19" ""
gdb_test_no_output "set print elements 19"
gdb_test "p teststring" \
" = (.unsigned char .. )?\"teststring contents\"" "p teststring with elements set to 19"
gdb_test "set print elements 20" ""
gdb_test_no_output "set print elements 20"
gdb_test "p teststring" \
" = (.unsigned char .. )?\"teststring contents\"" "p teststring with elements set to 20"
gdb_test "set print elements 8" ""
gdb_test_no_output "set print elements 8"
gdb_test "p &ctable1\[0\]" \
" = \\(unsigned char \\*\\) \"\""
@ -556,7 +556,7 @@ proc test_print_strings {} {
proc test_print_int_arrays {} {
global gdb_prompt
gdb_test "set print elements 24" ""
gdb_test_no_output "set print elements 24"
gdb_test_escape_braces "p int1dim" \
" = {0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11}"
@ -571,7 +571,7 @@ proc test_print_int_arrays {} {
proc test_print_typedef_arrays {} {
global gdb_prompt
gdb_test "set print elements 24" ""
gdb_test_no_output "set print elements 24"
gdb_test_escape_braces "p a1" \
" = {2, 4, 6, 8, 10, 12, 14, 16, 18, 20}"
@ -584,9 +584,9 @@ proc test_print_typedef_arrays {} {
gdb_test "p a2\[3\]" " = 100 'd'"
# Regression test of null-stop; PR 11049.
gdb_test "set print null-stop on" ""
gdb_test_no_output "set print null-stop on"
gdb_test "p a2" " = \"abcd\"" "print a2 with null-stop on"
gdb_test "set print null-stop off" ""
gdb_test_no_output "set print null-stop off"
}
proc test_artificial_arrays {} {
@ -603,8 +603,8 @@ proc test_print_char_arrays {} {
global gdb_prompt
global hex
gdb_test "set print elements 24" ""
gdb_test "set print address on" ""
gdb_test_no_output "set print elements 24"
gdb_test_no_output "set print address on"
gdb_test "p arrays" \
" = {array1 = \"abc\", array2 = \"d\", array3 = \"e\", array4 = \"fg\", array5 = \"hij\"}"
@ -621,13 +621,13 @@ proc test_print_char_arrays {} {
gdb_test "p parrays->array5" " = \"hij\""
gdb_test "p &parrays->array5" " = \\(unsigned char \\(\\*\\)\\\[4\\\]\\) $hex"
gdb_test "set print address off" ""
gdb_test_no_output "set print address off"
}
proc test_print_string_constants {} {
global gdb_prompt
gdb_test "set print elements 50" ""
gdb_test_no_output "set print elements 50"
if [target_info exists gdb,cannot_call_functions] {
setup_xfail "*-*-*" 2416
@ -772,9 +772,9 @@ gdb_file_cmd ${binfile}
gdb_test "print \$pc" "No registers\\." "print \$pc (with file)"
gdb_test "set print sevenbit-strings" ""
gdb_test "set print address off" ""
gdb_test "set width 0" ""
gdb_test_no_output "set print sevenbit-strings"
gdb_test_no_output "set print address off"
gdb_test_no_output "set width 0"
if [set_lang_c] then {
if { [test_compiler_info "armcc-*"] } {

2
gdb/testsuite/gdb.base/psymtab.exp
View File

@ -62,7 +62,7 @@ gdb_load ${binfile}
# Disable the prompt for whether to set pending breakpoints.
# We don't want a breakpoint, we just want to verify the symbol
# isn't found.
gdb_test "set breakpoint pending off" "" "psymtab pending setup"
gdb_test_no_output "set breakpoint pending off" "psymtab pending setup"
# This test is looking for a bug that manifested itself when GDB was
# looking for a partial symbol such that there wasn't such a partial

2
gdb/testsuite/gdb.base/randomize.exp
View File

@ -76,7 +76,7 @@ if [string equal $addr1 $addr2] {
pass $test
}
gdb_test "set disable-randomization on"
gdb_test_no_output "set disable-randomization on"
gdb_test "show disable-randomization" \
"Disabling randomization .* is on." \
"show disable-randomization on"

60
gdb/testsuite/gdb.base/relational.exp
View File

@ -50,10 +50,10 @@ if ![runto_main] then {
# test expressions with "int" types
#
gdb_test "set variable x=14" "" "set variable x=14"
gdb_test "set variable y=2" "" "set variable y=2"
gdb_test "set variable z=2" "" "set variable z=2"
gdb_test "set variable w=3" "" "set variable w=3"
gdb_test_no_output "set variable x=14" "set variable x=14"
gdb_test_no_output "set variable y=2" "set variable y=2"
gdb_test_no_output "set variable z=2" "set variable z=2"
gdb_test_no_output "set variable w=3" "set variable w=3"
gdb_test "print x" " = 14" "print value of x"
@ -78,9 +78,9 @@ gdb_test "print x != y" "$true" "print value of x!=y"
# Test associativity of <, >, <=, >=, ==, !=
gdb_test "set variable x=3" "" "set variable x"
gdb_test "set variable y=5" "" "set variable y"
gdb_test "set variable z=2" "" "set variable z"
gdb_test_no_output "set variable x=3" "set variable x"
gdb_test_no_output "set variable y=5" "set variable y"
gdb_test_no_output "set variable z=2" "set variable z"
gdb_test "print x < y < z" "$true" "print value of x<y<z"
@ -90,30 +90,30 @@ gdb_test "print x > y > z" "$false" "print value of x>y>z"
gdb_test "print x >= y >= z" "$false" "print value of x>=y>=z"
gdb_test "set variable x=2" "" "set variable x"
gdb_test "set variable y=2" "" "set variable y"
gdb_test "set variable z=1" "" "set variable z"
gdb_test_no_output "set variable x=2" "set variable x"
gdb_test_no_output "set variable y=2" "set variable y"
gdb_test_no_output "set variable z=1" "set variable z"
gdb_test "print x == y == z" "$true" "print value of x==y==z"
gdb_test "set variable z=0" "" "set variable z"
gdb_test_no_output "set variable z=0" "set variable z"
gdb_test "print x != y != z" "$false" "print value of x!=y!=z"
# test precedence rules on pairs of relational operators
gdb_test "set variable x=0" "" "set variable x"
gdb_test "set variable y=2" "" "set variable y"
gdb_test "set variable z=2" "" "set variable z"
gdb_test_no_output "set variable x=0" "set variable x"
gdb_test_no_output "set variable y=2" "set variable y"
gdb_test_no_output "set variable z=2" "set variable z"
gdb_test "print x < y == z" "$false" "print value of x<y==z"
# 0 2 2
gdb_test "print x < y != z" "$true" "print value of x<y!=z"
gdb_test "set variable x=2" "" "set variable x"
gdb_test "set variable y=3" "" "set variable y"
gdb_test "set variable z=1" "" "set variable z"
gdb_test_no_output "set variable x=2" "set variable x"
gdb_test_no_output "set variable y=3" "set variable y"
gdb_test_no_output "set variable z=1" "set variable z"
# 2 3 1
@ -122,28 +122,28 @@ gdb_test "print x < y <= z" "$true" "print value of x<y<=z"
# 2 3 1
gdb_test "print x < y >= z" "$true" "print value of x<y>=z"
gdb_test "set variable z=0" "" " set variable z"
gdb_test_no_output "set variable z=0" " set variable z"
# 2 3 0
gdb_test "print x < y > z" "$true" "print value of x<y>z"
gdb_test "set variable x=1" "" " set variable x"
gdb_test_no_output "set variable x=1" " set variable x"
# 1 3 0
gdb_test "print x > y >= z" "$true" "print value of x>y>=z"
gdb_test "set variable z=2" "" " set variable z"
gdb_test_no_output "set variable z=2" " set variable z"
# 1 3 2
gdb_test "print x > y == z" "$false" "print value of x>y==z"
gdb_test "set variable x=2" "" " set variable x"
gdb_test "set variable z=0" "" " set variable z"
gdb_test_no_output "set variable x=2" " set variable x"
gdb_test_no_output "set variable z=0" " set variable z"
# 2 3 0
gdb_test "print x > y != z" "$false" "print value of x>y!=z"
gdb_test "set variable x=4" "" "set x to 4"
gdb_test_no_output "set variable x=4" "set x to 4"
# 4 3 0
gdb_test "print x > y <= z" "$false" "print value of x>y<=z"
@ -151,13 +151,13 @@ gdb_test "print x > y <= z" "$false" "print value of x>y<=z"
# 4 3 0
gdb_test "print x >= y == z" "$false" "print value of x>=y==z"
gdb_test "set variable x=2" "" " set variable x"
gdb_test_no_output "set variable x=2" " set variable x"
# 2 3 0
gdb_test "print x >= y != z" "$false" "print value of x>=y!=z"
gdb_test "set variable x=0" "" " set variable x"
gdb_test "set variable z=4" "" " set variable z"
gdb_test_no_output "set variable x=0" " set variable x"
gdb_test_no_output "set variable z=4" " set variable z"
# 0 3 4
gdb_test "print x >= y <= z" "$true" "print value of x>=y<=z"
@ -165,7 +165,7 @@ gdb_test "print x >= y <= z" "$true" "print value of x>=y<=z"
# 0 3 4
gdb_test "print x <= y == z" "$false" "print value of x<=y==z"
gdb_test "set variable x=2" "" " set variable x"
gdb_test_no_output "set variable x=2" " set variable x"
# 2 3 4
gdb_test "print x <= y != z" "$true" "print value of x<=y!=z"
@ -177,7 +177,7 @@ gdb_test "print x == y != z" "$true" "print value of x==y!=z"
# test use of parenthesis to enforce different order of evaluation
gdb_test "set variable z=0" "" " set variable z"
gdb_test_no_output "set variable z=0" " set variable z"
# 2 3 0
gdb_test "print x >= (y < z)" "$true" "print value of x>=(y<z)"
@ -188,8 +188,8 @@ gdb_test "print x >= (y != z)" "$true" "print value of x>=(y!=z)"
# 2 3 0
gdb_test "print x == (y == z)" "$false" "print value of x==(y==z)"
gdb_test "set variable x=1" "" " set variable x"
gdb_test "set variable z=4" "" " set variable z"
gdb_test_no_output "set variable x=1" " set variable x"
gdb_test_no_output "set variable z=4" " set variable z"
# 1 3 4
gdb_test "print (x == y) < z" "$true" "print value of (x==y)<z"

2
gdb/testsuite/gdb.base/relocate.exp
View File

@ -105,7 +105,7 @@ gdb_exit
gdb_start
gdb_reinitialize_dir $srcdir/$subdir
gdb_test "set \$offset = 0x10000" ""
gdb_test_no_output "set \$offset = 0x10000"
# Load the object file.
gdb_test "add-symbol-file ${binfile} \$offset" \

12
gdb/testsuite/gdb.base/remote.exp
View File

@ -50,12 +50,12 @@ gdb_test "set remote memory-write-packet-size" \
"Argument required .integer, `fixed' or `limited'.\." \
"set write-packet - NULL"
gdb_test "set remote memory-write-packet-size 20" ""
gdb_test_no_output "set remote memory-write-packet-size 20"
gdb_test "show remote memory-write-packet-size" \
"The memory-write-packet-size is 20. Packets are limited to 20 bytes." \
"set write-packet - small"
gdb_test "set remote memory-write-packet-size 1" ""
gdb_test_no_output "set remote memory-write-packet-size 1"
gdb_test "show remote memory-write-packet-size" \
"The memory-write-packet-size is 1. Packets are limited to 20 bytes." \
"set write-packet - very-small"
@ -69,8 +69,8 @@ proc gdb_load_timed {executable class writesize} {
set test "timed download `[file tail $executable]' - $class, $writesize"
if {$writesize != ""} then {
gdb_test "set remote memory-write-packet-size $writesize" \
"" "$test - set packet size"
gdb_test_no_output "set remote memory-write-packet-size $writesize" \
"$test - set packet size"
send_gdb "set remote memory-write-packet-size $class\n"
gdb_expect 5 {
@ -153,8 +153,8 @@ if {$sizeof_random_data > 16380 } then {
# Read a chunk just larger than the packet size (reduce the packet
# size to make life easier)
gdb_test "set remote memory-read-packet-size 16" \
""
gdb_test_no_output "set remote memory-read-packet-size 16"
gdb_test "show remote memory-read-packet-size" \
"The memory-read-packet-size is 16. Packets are limited to 20 bytes."
gdb_test "x/17ub random_data" \

5
gdb/testsuite/gdb.base/sepdebug.exp
View File

@ -444,7 +444,7 @@ gdb_test "clear marker3" {Deleted breakpoints [0-9]+ [0-9]+.*}
# Verify that a breakpoint can be set via a convenience variable.
#
gdb_test "set \$foo=$bp_location11" "" \
gdb_test_no_output "set \$foo=$bp_location11" \
"set convenience variable \$foo to bp_location11"
gdb_test "break \$foo" \
@ -668,7 +668,8 @@ proc test_different_dir {type test_different_dir xfail} {
gdb_exit
gdb_start
gdb_reinitialize_dir $srcdir/$subdir
gdb_test "set debug-file-directory ${test_different_dir}" ".*" "set separate debug location"
gdb_test_no_output "set debug-file-directory ${test_different_dir}" \
"set separate debug location"
gdb_load ${binfile}
if [target_info exists gdb_stub] {

6
gdb/testsuite/gdb.base/set-lang-auto.exp
View File

@ -44,8 +44,7 @@ gdb_test "show lang" \
# Now, switch the language to a specific language, instead of leaving it
# on auto.
gdb_test "set lang ada" \
"" \
gdb_test_no_output "set lang ada" \
"forcing the language to ada"
# Verify that the language is now "ada".
@ -54,8 +53,7 @@ gdb_test "show lang" \
"show lang after switching language to ada"
# Then, switch back to auto...
gdb_test "set lang auto" \
"" \
gdb_test_no_output "set lang auto" \
"switching the language back to auto"
# ... And verify that the language mode is back to auto *and* that

58
gdb/testsuite/gdb.base/setshow.exp
View File

@ -80,12 +80,12 @@ gdb_test "show annotate" "Annotation_level is 1..*" "show annotate (1)"
#test annotation_level 1
gdb_test "info line 1" "Line 1 of .* is at address .* but contains no code.*:1:0:beg:0x.*" "annotation_level 1"
#test set annotate 0
gdb_test "set annotate 0" "" "set annotate 0"
gdb_test_no_output "set annotate 0" "set annotate 0"
gdb_test "show annotate" "Annotation_level is 0..*" "show annotate (0)"
#test annotation_level 0
gdb_test "info line 1" "Line 1 of .* is at address .* but contains no code.*" "annotation_level 0"
#test set args
gdb_test "set args foo bar blup baz bubble" "" "set args"
gdb_test_no_output "set args foo bar blup baz bubble" "set args"
#test show args
gdb_test "show args" "Argument list to give program being debugged when it is started is \"foo bar blup baz bubble\"..*" "show args"
@ -101,11 +101,11 @@ gdb_test "set check range on" "" "set check range on"
#test show check range on
gdb_test "show check range" "Range checking is \"on\"\..*" "show check range (on)"
#test set check range off with trailing space
gdb_test "set check range off " "" "set check range off"
gdb_test_no_output "set check range off " "set check range off"
#test show check range off
gdb_test "show check range" "Range checking is \"off\"\..*" "show check range (off)"
#test set check range auto
gdb_test "set check range auto" "" "set check range auto"
gdb_test_no_output "set check range auto" "set check range auto"
#test show check range auto
gdb_test "show check range" "Range checking is \"auto; currently .*" "show check range (auto)"
#test set check type on
@ -113,80 +113,82 @@ gdb_test "set check type on" "" "set check type on"
#test show check type on
gdb_test "show check type" "Type checking is \"on\"..*" "show check type (on)"
#test set check type off with trailing space
gdb_test "set check type off " "" "set check type off"
gdb_test_no_output "set check type off " "set check type off"
#test show check type off
gdb_test "show check type" "Type checking is \"off\"..*" "show check type (off)"
#test set check type auto
gdb_test "set check type auto" "" "set check type auto"
gdb_test_no_output "set check type auto" "set check type auto"
#test show check type
gdb_test "show check type" "Type checking is \"auto; currently .*" "show check type (auto)"
#test set complaints 100
gdb_test "set complaints 100" "" "set complaints 100"
gdb_test_no_output "set complaints 100" "set complaints 100"
#test show complaints 100
gdb_test "show complaints" "Max number of complaints about incorrect symbols is 100..*" "show complaints (100)"
#test set complaints 0
gdb_test "set complaints 0" "" "set complaints 0"
gdb_test_no_output "set complaints 0" "set complaints 0"
#test show complaints 0
gdb_test "show complaints" "Max number of complaints about incorrect symbols is 0..*" "show complaints (0)"
#test set confirm off
gdb_test "set confirm off" "" "set confirm off"
gdb_test_no_output "set confirm off" "set confirm off"
#test show confirm off
gdb_test "show confirm" "Whether to confirm potentially dangerous operations is off..*" "show confirm (off)"
#test set confirm on
gdb_test "set confirm on" "" "set confirm on"
gdb_test_no_output "set confirm on" "set confirm on"
#test show confirm on
gdb_test "show confirm" "Whether to confirm potentially dangerous operations is on..*" "show confirm (on)"
#test set editing off
gdb_test "set editing off" "" "set editing off"
gdb_test_no_output "set editing off" "set editing off"
#test show editing off
gdb_test "show editing" "Editing of command lines as they are typed is off..*" "show editing (off)"
#test set editing on
#gdb_test "set editing on" "" "set editing on"
#gdb_test_no_output "set editing on" "set editing on"
#test show editing on
#gdb_test "show editing" "Editing of command lines as they are typed is on..*" "show editing (on)"
#test set environment FOOBARBAZ
gdb_test "set environment FOOBARBAZ = grbxgrbxgrbx" "" "set environment FOOBARBAZ"
gdb_test_no_output "set environment FOOBARBAZ = grbxgrbxgrbx" \
"set environment FOOBARBAZ"
#test show environment FOOBARBAZ
gdb_test "show environment FOOBARBAZ" "FOOBARBAZ = grbxgrbxgrbx.*" "show environment FOOBARBAZ"
#test set height 100
gdb_test "set height 100" "" "set height 100"
gdb_test_no_output "set height 100" "set height 100"
#test show height 100
gdb_test "show height" "Number of lines gdb thinks are in a page is 100..*" "show height"
# back to infinite height to avoid pagers
gdb_test "set height 0" "" ""
#test set history expansion on
gdb_test "set history expansion on" "" "set history expansion on"
gdb_test_no_output "set history expansion on" "set history expansion on"
#test show history expansion on
gdb_test "show history expansion on" "History expansion on command input is on.*" "show history expansion"
#test set history filename foobar.baz
gdb_test "set history filename foobar.baz" "" "set history filename foobar.baz"
gdb_test_no_output "set history filename foobar.baz" \
"set history filename foobar.baz"
#test show history filename foobar.baz
gdb_test "show history filename" "The filename in which to record the command history is \"foobar.baz\"..*" "show history filename (foobar.baz)"
#test set history save on
gdb_test "set history save on" "" "set history save on"
gdb_test_no_output "set history save on" "set history save on"
#test show history save on
gdb_test "show history save" "Saving of the history record on exit is on..*" "show history save (on)"
#test set history size 100
gdb_test "set history size 100" "" "set history size 100"
gdb_test_no_output "set history size 100" "set history size 100"
#test show history size 100
gdb_test "show history size" "The size of the command history is 100..*" "show history size (100)"
#test set language asm
gdb_test "set language asm" "" "set language asm"
gdb_test_no_output "set language asm" "set language asm"
#test show language asm
gdb_test "show language" "The current source language is \"asm\"..*" "show language (asm)"
#test set language java, with a trailing space
gdb_test "set language java " "" "set language java"
gdb_test_no_output "set language java " "set language java"
#test show language java
gdb_test "show language" "The current source language is \"java\"..*" "show language (java)"
#test completion for set language.
gdb_test "complete set language min" "set language minimal" \
"complete set language minimal"
#test set language auto
gdb_test "set language auto" "" "set language auto"
gdb_test_no_output "set language auto" "set language auto"
#test show language
gdb_test "show language" "The current source language is \"auto.*\"..*" "show language (auto)"
#test set listsize 100
gdb_test "set listsize 100" "" "set listsize 100"
gdb_test_no_output "set listsize 100" "set listsize 100"
#test show listsize 100
gdb_test "show listsize" "Number of source lines gdb will list by default is 100..*" "show listsize (100)"
@ -228,26 +230,26 @@ gdb_test "set radix" "Input and output radices now set to decimal 10, hex a, oct
#test show radix 10
gdb_test "show radix" "Input and output radices set to decimal 10, hex a, octal 12..*" "show radix (10)"
#test set width 90
gdb_test "set width 90" "" "set width 90"
gdb_test_no_output "set width 90" "set width 90"
#test show width 90
gdb_test "show width" "Number of characters gdb thinks are in a line is 90..*" "show width (90)"
#test set write on
# This is only supported on targets which use exec.o.
gdb_test "set write on" "" "set write on"
gdb_test_no_output "set write on" "set write on"
#test show write on
# This is only supported on targets which use exec.o.
gdb_test "show write" "Writing into executable and core files is on..*" "show write (on)"
#test set symbol-reloading on
gdb_test "set symbol-reloading on" "" "set symbol-reloading on"
gdb_test_no_output "set symbol-reloading on" "set symbol-reloading on"
#test show symbol-reloading on
gdb_test "show symbol-reloading" "Dynamic symbol table reloading multiple times in one run is on..*" "show symbol-reloading (on)"
#test show user
gdb_test "show user" "" "show user"
gdb_test_no_output "show user" "show user"
#test set verbose on
gdb_test "set verbose on" "" "set verbose on"
gdb_test_no_output "set verbose on" "set verbose on"
#test show verbose on
gdb_test "show verbose" "Verbose printing of informational messages is on..*" "show verbose (on)"
#test set verbose off
gdb_test "set verbose off" "" "set verbose off"
gdb_test_no_output "set verbose off" "set verbose off"
#test show verbose off
gdb_test "show verbose" "Verbosity is off..*" "show verbose (off)"

16
gdb/testsuite/gdb.base/setvar.exp
View File

@ -133,11 +133,11 @@ test_set "set variable v_signed_char=65" "print v_signed_char" ".\[0-9\]* = 65 \
test_set "set variable v_signed_char=97" "print v_signed_char" ".\[0-9\]* = 97 \'a\'" "set variable signed char=97 ('a')"
test_set "set variable v_signed_char=126" "print v_signed_char" ".\[0-9\]* = 126 \'~\'" "set variable signed char=126 ('~')"
test_set "set variable v_signed_char=127" "print v_signed_char" ".\[0-9\]* = 127 \'.177\'" "set variable signed char=127 (8-bit)"
gdb_test "set variable v_signed_char=-1" ""
gdb_test_no_output "set variable v_signed_char=-1"
if {!$gcc_compiled} then { setup_xfail "mips-sgi-irix4*" }
gdb_test "print v_signed_char" ".\[0-9\]* = -1 \'.377\'" \
"set variable signed char=-1 (-1)"
gdb_test "set variable v_signed_char=0xFF" ""
gdb_test_no_output "set variable v_signed_char=0xFF"
if {!$gcc_compiled} then { setup_xfail "mips-sgi-irix4*" }
gdb_test "print v_signed_char" ".\[0-9\]* = -1 \'.377\'" \
"set variable signed char=0xFF (0xFF)"
@ -294,18 +294,18 @@ test_set "set v_short_pointer=v_short_array" "set variable *(v_short_pointer)=12
#
# test "set variable" for type "signed short *"
#
gdb_test "set v_signed_short_pointer=v_signed_short_array" ""
gdb_test "set variable *(v_signed_short_pointer)=123" ""
gdb_test "set variable *(v_signed_short_pointer+1)=-456" ""
gdb_test_no_output "set v_signed_short_pointer=v_signed_short_array"
gdb_test_no_output "set variable *(v_signed_short_pointer)=123"
gdb_test_no_output "set variable *(v_signed_short_pointer+1)=-456"
gdb_test "print v_signed_short_array" ".\[0-9\]* =.*\\{123,.*-456\\}" \
"set variable signed short pointer"
gdb_test "print *(v_signed_short_pointer+1)" ".\[0-9\]*.*=.*-456"
#
# test "set variable" for type "unsigned short *"
#
gdb_test "set v_unsigned_short_pointer=v_unsigned_short_array" ""
gdb_test "set variable *(v_unsigned_short_pointer)=123" ""
gdb_test "set variable *(v_unsigned_short_pointer+1)=-456" ""
gdb_test_no_output "set v_unsigned_short_pointer=v_unsigned_short_array"
gdb_test_no_output "set variable *(v_unsigned_short_pointer)=123"
gdb_test_no_output "set variable *(v_unsigned_short_pointer+1)=-456"
gdb_test "print v_unsigned_short_array" ".\[0-9\]* =.*\\{123,.*65080\\}" \
"set variable unsigned short pointer"
gdb_test "print *(v_unsigned_short_pointer+1)" ".\[0-9\]* = 65080"

4
gdb/testsuite/gdb.base/signals.exp
View File

@ -80,7 +80,7 @@ if [runto_main] then {
# Since count is a static variable outside main, runto_main is no
# guarantee that count will be 0 at this point.
gdb_test "set variable count = 0" ""
gdb_test_no_output "set variable count = 0"
# Test an inferior function call that takes a signal that hits a
# breakpoint (with a false condition). When GDB tries to run the
@ -91,7 +91,7 @@ if [runto_main] then {
# ...setup an always false conditional breakpoint
gdb_test "break handler if 0" "Breakpoint \[0-9\]+ .*"
gdb_test "set \$handler_breakpoint_number = \$bpnum" ""
gdb_test_no_output "set \$handler_breakpoint_number = \$bpnum"
# ...setup the signal

5
gdb/testsuite/gdb.base/signull.exp
View File

@ -77,7 +77,8 @@ gdb_test_multiple "x 0" "memory at address 0" {
# then function pointers are descriptors, probe this and remember the
# result.
gdb_test "set test = code_entry_point" "" "set for function pointer probe"
gdb_test_no_output "set test = code_entry_point" \
"set for function pointer probe"
set test "probe function pointer"
set function_pointer code_entry_point
set signame "SIGSEGV"
@ -112,7 +113,7 @@ proc test_segv { name tag bt_from_segv bt_from_keeper } {
global signame
gdb_test continue "Breakpoint.* bowler.*" "${name}; start with the bowler"
# NB: Don't use $tag in the testname - changes across systems.
gdb_test "set test = $tag" "" "${name}; select the pointer type"
gdb_test_no_output "set test = $tag" "${name}; select the pointer type"
gdb_test continue "Program received signal ${signame}.*" \
"${name}; take the ${signame}"
gdb_test backtrace $bt_from_segv "${name}; backtrace from ${signame}"

38
gdb/testsuite/gdb.base/sigstep.exp
View File

@ -196,7 +196,7 @@ advancei nexti
advancei finish
advancei return
gdb_test "set done = 1" "" "Set done as return will have skipped it"
gdb_test_no_output "set done = 1" "Set done as return will have skipped it"
# Check that we can step/next our way into / over a signal handler.
@ -209,7 +209,7 @@ gdb_test "set done = 1" "" "Set done as return will have skipped it"
delete_breakpoints
set infinite_loop [gdb_get_line_number {while (!done)}]
gdb_test "set itimer = itimer_real"
gdb_test_no_output "set itimer = itimer_real"
gdb_test "break [gdb_get_line_number {done = 0}]"
# Try stepping when there's a signal pending, and a breakpoint at the
@ -230,15 +230,15 @@ proc skip_to_handler { i } {
}
# Advance to the infinite loop
gdb_test "advance $infinite_loop" "" "$prefix; advance to infinite loop"
gdb_test "advance $infinite_loop" ".*" "$prefix; advance to infinite loop"
# Make the signal pending
sleep 1
# Insert / remove the handler breakpoint.
gdb_test "break handler" "" "$prefix; break handler"
gdb_test "break handler" ".*" "$prefix; break handler"
gdb_test "$i" " handler .*" "$prefix; performing $i"
gdb_test "clear handler" "" "$prefix; clear handler"
gdb_test "clear handler" ".*" "$prefix; clear handler"
}
skip_to_handler step
@ -271,15 +271,15 @@ proc skip_to_handler_entry { i } {
}
# Advance to the infinite loop
gdb_test "advance $infinite_loop" "" "$prefix; advance to infinite loop"
gdb_test "advance $infinite_loop" ".*" "$prefix; advance to infinite loop"
# Make the signal pending
sleep 1
# Insert / remove the handler breakpoint.
gdb_test "break *handler" "" "$prefix; break handler"
gdb_test "break *handler" ".*" "$prefix; break handler"
gdb_test "$i" " handler .*" "$prefix; performing $i"
gdb_test "clear *handler" "" "$prefix; clear handler"
gdb_test "clear *handler" ".*" "$prefix; clear handler"
}
skip_to_handler_entry step
@ -304,7 +304,7 @@ proc skip_over_handler { i } {
}
# Advance to the infinite loop
gdb_test "advance $infinite_loop" "" "$prefix; advance to infinite loop"
gdb_test "advance $infinite_loop" ".*" "$prefix; advance to infinite loop"
# Make the signal pending
sleep 1
@ -334,8 +334,8 @@ proc breakpoint_to_handler { i } {
}
}
gdb_test "break $infinite_loop" "" "$prefix; break infinite loop"
gdb_test "break handler" "" "$prefix; break handler"
gdb_test "break $infinite_loop" ".*" "$prefix; break infinite loop"
gdb_test "break handler" ".*" "$prefix; break handler"
# Continue to the infinite loop
gdb_test "continue" "while ..done.*" "$prefix; continue to infinite loop"
@ -344,8 +344,8 @@ proc breakpoint_to_handler { i } {
sleep 1
gdb_test "$i" " handler .*" "$prefix; performing $i"
gdb_test "clear $infinite_loop" "" "$prefix; clear infinite loop"
gdb_test "clear handler" "" "$prefix; clear handler"
gdb_test "clear $infinite_loop" ".*" "$prefix; clear infinite loop"
gdb_test "clear handler" ".*" "$prefix; clear handler"
}
breakpoint_to_handler step
@ -378,8 +378,8 @@ proc breakpoint_to_handler_entry { i } {
}
}
gdb_test "break $infinite_loop" "" "$prefix; break infinite loop"
gdb_test "break *handler" "" "$prefix; break handler"
gdb_test "break $infinite_loop" ".*" "$prefix; break infinite loop"
gdb_test "break *handler" ".*" "$prefix; break handler"
# Continue to the infinite loop
gdb_test "continue" "while ..done.*" "$prefix; continue to infinite loop"
@ -388,8 +388,8 @@ proc breakpoint_to_handler_entry { i } {
sleep 1
gdb_test "$i" " handler .*" "$prefix; performing $i"
gdb_test "clear $infinite_loop" "" "$prefix; clear infinite loop"
gdb_test "clear *handler" "" "$prefix; clear handler"
gdb_test "clear $infinite_loop" ".*" "$prefix; clear infinite loop"
gdb_test "clear *handler" ".*" "$prefix; clear handler"
}
breakpoint_to_handler_entry step
@ -414,7 +414,7 @@ proc breakpoint_over_handler { i } {
}
}
gdb_test "break $infinite_loop" "" "$prefix; break infinite loop"
gdb_test "break $infinite_loop" ".*" "$prefix; break infinite loop"
# Continue to the infinite loop
gdb_test "continue" "while ..done.*" "$prefix; continue to infinite loop"
@ -423,7 +423,7 @@ proc breakpoint_over_handler { i } {
sleep 1
gdb_test "$i" "done = 0.*" "$prefix; performing $i"
gdb_test "clear $infinite_loop" "" "$prefix; clear infinite loop"
gdb_test "clear $infinite_loop" ".*" "$prefix; clear infinite loop"
}
breakpoint_over_handler step

2
gdb/testsuite/gdb.base/sizeof.exp
View File

@ -119,7 +119,7 @@ check_valueof "(int) (unsigned char) -1" ${signof_unsigned_char}
proc check_padding { fmt type val } {
global gdb_prompt
gdb_test "set padding_${type}.v = ${val}"
gdb_test_no_output "set padding_${type}.v = ${val}"
gdb_test "print padding_${type}.p1" "= \"The quick brown \""
gdb_test "print${fmt} padding_${type}.v" "= ${val}"
gdb_test "print padding_${type}.p2" "\"The quick brown \".*"

2
gdb/testsuite/gdb.base/solib-corrupted.exp
View File

@ -26,7 +26,7 @@ if ![runto_main] {
return
}
gdb_test "info sharedlibrary" "" "normal list"
gdb_test "info sharedlibrary" "From * To .*" "normal list"
# GDB checks there for matching L_PREV.
set test "make solibs looping"

2
gdb/testsuite/gdb.base/solib-disc.exp
View File

@ -59,7 +59,7 @@ if ![runto_main] then {
return 0
}
gdb_test "set stop-on-solib-events 1" ""
gdb_test_no_output "set stop-on-solib-events 1"
gdb_test "continue" "Stopped due to shared library event" "continue to load"

2
gdb/testsuite/gdb.base/solib-symbol.exp
View File

@ -60,7 +60,7 @@ delete_breakpoints
# Break in the library.
gdb_test "br foo" \
"" \
"Breakpoint.*file.*${srcfile_lib}.*" \
"foo in libmd"
gdb_test "continue" \

2
gdb/testsuite/gdb.base/source.exp
View File

@ -49,7 +49,7 @@ gdb_test_multiple "source ${srcdir}/${subdir}/source-test.gdb" $test {
}
}
gdb_test "dir ${srcdir}/${subdir}" ""
gdb_test "dir ${srcdir}/${subdir}" "Source directories searched: .*"
gdb_test "source -s ./source-test.gdb" \
"test source options" \
"source -s"

4
gdb/testsuite/gdb.base/step-bt.exp
View File

@ -56,7 +56,7 @@ gdb_expect {
}
gdb_test "stepi" \
"" \
".*" \
"step first instruction"
gdb_test "bt" \
@ -64,7 +64,7 @@ gdb_test "bt" \
"backtrace after first instruction step"
gdb_test "stepi" \
"" \
".*" \
"step second instruction"
gdb_test "bt" \

22
gdb/testsuite/gdb.base/store.exp
View File

@ -63,7 +63,7 @@ proc check_set { t l r new add } {
"${prefix}; print old l, expecting ${l}"
gdb_test "print r" " = ${r}" \
"${prefix}; print old r, expecting ${r}"
gdb_test "set variable l = 4" "" \
gdb_test_no_output "set variable l = 4" \
"${prefix}; setting l to 4"
gdb_test "print l" " = ${new}" \
"${prefix}; print new l, expecting ${new}"
@ -95,7 +95,7 @@ proc up_set { t l r new } {
"${prefix}; print old l, expecting ${l}"
gdb_test "print r" " = ${r}" \
"${prefix}; print old r, expecting ${r}"
gdb_test "set variable l = 4" "" \
gdb_test_no_output "set variable l = 4" \
"${prefix}; set l to 4"
gdb_test "print l" " = ${new}" \
"${prefix}; print new l, expecting ${new}"
@ -121,7 +121,7 @@ proc check_struct { t old new } {
"${prefix}; next to add_struct_${t} call"
gdb_test "print u" " = ${old}" \
"${prefix}; print old u, expecting ${old}"
gdb_test "set variable u = s_${t}" "" \
gdb_test_no_output "set variable u = s_${t}" \
"${prefix}; set u to s_${t}"
gdb_test "print u" " = ${new}" \
"${prefix}; print new u, expecting ${new}"
@ -141,7 +141,7 @@ proc up_struct { t old new } {
"${prefix}; up"
gdb_test "print u" " = ${old}" \
"${prefix}; print old u, expecting ${old}"
gdb_test "set variable u = s_${t}" "" \
gdb_test_no_output "set variable u = s_${t}" \
"${prefix}; set u to s_${t}"
gdb_test "print u" " = ${new}" \
"${prefix}; print new u, expecting ${new}"
@ -166,25 +166,25 @@ proc check_field { t } {
gdb_test "next" "(return u;|\})" "next field ${t}"
gdb_test "print u" " = {i = 1, j = 1, k = 1}" "old field ${t}"
gdb_test "set variable u = F_${t}"
gdb_test_no_output "set variable u = F_${t}"
gdb_test "print u" " = {i = 0, j = 0, k = 0}" "new field ${t}"
gdb_test "set variable u = F_${t}, u.i = f_${t}.i"
gdb_test_no_output "set variable u = F_${t}, u.i = f_${t}.i"
gdb_test "print u" " = {i = 1, j = 0, k = 0}" "f_${t}.i"
gdb_test "set variable u = F_${t}, u.j = f_${t}.j"
gdb_test_no_output "set variable u = F_${t}, u.j = f_${t}.j"
gdb_test "print u" " = {i = 0, j = 1, k = 0}" "f_${t}.j"
gdb_test "set variable u = F_${t}, u.k = f_${t}.k"
gdb_test_no_output "set variable u = F_${t}, u.k = f_${t}.k"
gdb_test "print u" " = {i = 0, j = 0, k = 1}" "f_${t}.k"
gdb_test "set variable u = f_${t}, u.i = F_${t}.i"
gdb_test_no_output "set variable u = f_${t}, u.i = F_${t}.i"
gdb_test "print u" " = {i = 0, j = 1, k = 1}" "F_${t}.i"
gdb_test "set variable u = f_${t}, u.j = F_${t}.j"
gdb_test_no_output "set variable u = f_${t}, u.j = F_${t}.j"
gdb_test "print u" " = {i = 1, j = 0, k = 1}" "F_${t}.j"
gdb_test "set variable u = f_${t}, u.k = F_${t}.k"
gdb_test_no_output "set variable u = f_${t}, u.k = F_${t}.k"
gdb_test "print u" " = {i = 1, j = 1, k = 0}" "F_${t}.k"
}

14
gdb/testsuite/gdb.base/structs.exp
View File

@ -89,14 +89,10 @@ proc start_structs_test { types } {
gdb_load ${binfile}
# Make certain that the output is consistent
gdb_test "set print sevenbit-strings" "" \
"set print sevenbit-strings; ${testfile}"
gdb_test "set print address off" "" \
"set print address off; ${testfile}"
gdb_test "set width 0" "" \
"set width 0; ${testfile}"
gdb_test "set print elements 300" "" \
"set print elements 300; ${testfile}"
gdb_test_no_output "set print sevenbit-strings"
gdb_test_no_output "set print address off"
gdb_test_no_output "set width 0"
gdb_test_no_output "set print elements 300"
# Advance to main
if { ![runto_main] } then {
@ -261,7 +257,7 @@ proc test_struct_calls { n } {
# stores its parameter in the global variable "L$N". GDB then
# examining that global to confirm that the value is as expected.
gdb_test "call Fun${n}(foo${n})" "" "call Fun<n>(foo<n>); ${tests}"
gdb_test_no_output "call Fun${n}(foo${n})" "call Fun<n>(foo<n>); ${tests}"
setup_compiler_kfails structs-tc-tll gcc-3-3-* "DWARF 2" i*86-*-* gdb/1455
setup_compiler_kfails structs-tc-td gcc-3-3-* "DWARF 2" i*86-*-* gdb/1455
gdb_test "p/c L${n}" [foo ${n}] "p/c L<n>; ${tests}"

2
gdb/testsuite/gdb.base/structs2.exp
View File

@ -45,7 +45,7 @@ gdb_start
gdb_reinitialize_dir $srcdir/$subdir
gdb_load ${binfile}
gdb_test "set width 0" ""
gdb_test_no_output "set width 0"
if { ![runto_main] } then {
gdb_suppress_tests

33
gdb/testsuite/gdb.base/subst.exp
View File

@ -24,8 +24,7 @@ gdb_reinitialize_dir $srcdir/$subdir
# Do a bunch of testing of the set/unset/show substitute-path
# commands that do not require the presence of an executable.
gdb_test "set confirm off" \
"" \
gdb_test_no_output "set confirm off" \
"deactivate GDB's confirmation interface"
gdb_test "show substitute-path" \
@ -44,8 +43,7 @@ gdb_test "unset substitute-path from" \
"No substitution rule defined for `from'" \
"unset substitute-path from, no rule entered yet"
gdb_test "unset substitute-path" \
"" \
gdb_test_no_output "unset substitute-path" \
"unset substitute-path, no rule entered yet"
gdb_test "unset substitute-path from" \
@ -68,24 +66,19 @@ gdb_test "set substitute-path '' to" \
"First argument must be at least one character long" \
"set substitute-path, first argument is empty string"
gdb_test "set substitute-path from to" \
"" \
gdb_test_no_output "set substitute-path from to" \
"add from -> to substitution rule"
gdb_test "set substitute-path from1 to1/" \
"" \
gdb_test_no_output "set substitute-path from1 to1/" \
"add from1 -> to1 substitution rule"
gdb_test "set substitute-path source destination" \
"" \
gdb_test_no_output "set substitute-path source destination" \
"add source -> destination substitution rule"
gdb_test "set substitute-path depuis/ vers" \
"" \
gdb_test_no_output "set substitute-path depuis/ vers" \
"add depuis -> vers substitution rule"
gdb_test "set substitute-path empty ''" \
"" \
gdb_test_no_output "set substitute-path empty ''" \
"add substitution rule to empty string"
gdb_test "show substitute-path" \
@ -104,8 +97,7 @@ gdb_test "show substitute-path garbage" \
"Source path substitution rule matching `garbage':" \
"show substitute-path garbage, after all paths added"
gdb_test "unset substitute-path from" \
"" \
gdb_test_no_output "unset substitute-path from" \
"unset substitute-path from"
gdb_test "show substitute-path from" \
@ -120,24 +112,21 @@ gdb_test "unset substitute-path from" \
"No substitution rule defined for `from'" \
"unset substitute-path from after the rule was removed"
gdb_test "unset substitute-path depuis" \
"" \
gdb_test_no_output "unset substitute-path depuis" \
"unset substitute-path depuis (middle of list)"
gdb_test "show substitute-path" \
"List of all source path substitution rules:\r\n +`from1' -> `to1'.\r\n +`source' -> `destination'.\r\n\ +`empty' -> `'." \
"show substitute-path after depuis rule removed"
gdb_test "unset substitute-path empty" \
"" \
gdb_test_no_output "unset substitute-path empty" \
"unset substitute-path empty (end of list)"
gdb_test "show substitute-path" \
"List of all source path substitution rules:\r\n +`from1' -> `to1'.\r\n +`source' -> `destination'." \
"show substitute-path after empty rule removed"
gdb_test "unset substitute-path" \
"" \
gdb_test_no_output "unset substitute-path" \
"remove all remaining substitution rules"
gdb_test "show substitute-path" \

6
gdb/testsuite/gdb.base/symbol-without-target_section.exp
View File

@ -33,7 +33,9 @@ if {[build_executable ${testfile}.exp ${binmainfile} ${srcmainfile} {debug}] ==
}
clean_restart ${binlibfile}
gdb_test "add-symbol-file ${objdir}/${subdir}/${binmainfile} 0" "" "add-symbol-file" \
"add symbol table from file \".*\" at.*\\(y or n\\) " "y"
gdb_test "add-symbol-file ${objdir}/${subdir}/${binmainfile} 0" \
"Reading symbols from .*" \
"add-symbol-file" \
"add symbol table from file \".*\" at.*\\(y or n\\) " "y"
gdb_test "list main"
gdb_test "print symbol_without_target_section"

7
gdb/testsuite/gdb.base/term.exp
View File

@ -40,9 +40,10 @@ if { [prepare_for_testing term.exp term run.c] } {
return -1
}
gdb_test "set print sevenbit-strings" "" "test set print sevenbit-strings"
gdb_test "set print address off" "" "test set print address off"
gdb_test "set width 0" "" "test set width 0"
gdb_test_no_output "set print sevenbit-strings"
gdb_test_no_output "set print address off"
gdb_test_no_output "set width 0"
gdb_test "info terminal" "No saved terminal information.*" "test info terminal"
gdb_run_cmd 5
gdb_expect {

2
gdb/testsuite/gdb.base/trace-commands.exp
View File

@ -62,7 +62,7 @@ gdb_expect_list "source -v" ".*$gdb_prompt $" {
}
# Turn on command tracing.
gdb_test "set trace-commands" "" "set trace-commands"
gdb_test_no_output "set trace-commands" "set trace-commands"
# Make sure show trace-commands now gives 'on'.
gdb_test "show trace-commands" \

4
gdb/testsuite/gdb.base/unwindonsignal.exp
View File

@ -62,9 +62,9 @@ gdb_test "continue" "Continuing.*Breakpoint \[0-9\]*, stop_here.*" \
"continue to breakpoint at stop_here"
# Turn on unwindonsignal.
gdb_test "set unwindonsignal on" \
"" \
gdb_test_no_output "set unwindonsignal on" \
"setting unwindonsignal"
gdb_test "show unwindonsignal" \
"Unwinding of stack .* is on." \
"showing unwindonsignal"

4
gdb/testsuite/gdb.base/valgrind-db-attach.exp
View File

@ -74,7 +74,7 @@ gdb_test_multiple "" $test {
gdb_test "" "" "eat first prompt"
# Initialization from default_gdb_start.
gdb_test "set height 0"
gdb_test "set width 0"
gdb_test_no_output "set height 0"
gdb_test_no_output "set width 0"
gdb_test "bt" "in main \\(.*\\) at .*${srcfile}:$double_free"

2
gdb/testsuite/gdb.base/varargs.exp
View File

@ -87,7 +87,7 @@ if { $hp_aCC_compiler } {
# even though the overload resolution mechanism says that the types
# don't match.
# - guo
gdb_test "set overload-resolution 0" ""
gdb_test_no_output "set overload-resolution 0"
}
gdb_test "print find_max1(5,1,2,3,4,5)" \

3
gdb/testsuite/gdb.base/watch-cond.exp
View File

@ -69,8 +69,7 @@ gdb_test "continue" \
"Old value = 0.*New value = 1.*" \
"watchpoint on global2 variable triggers"
gdb_test "condition 2 *foo > 10" \
"" \
gdb_test_no_output "condition 2 *foo > 10" \
"condition of watchpoint 2 changes"
gdb_test "continue" \

4
gdb/testsuite/gdb.base/watch_thread_num.exp
View File

@ -55,7 +55,7 @@ if [target_info exists gdb,no_hardware_watchpoints] {
gdb_test "watch shared_var thread 0" "Unknown thread 0\." "Watchpoint on invalid thread"
gdb_test "watch shared_var thread" "A syntax error in expression, near `thread'\." "Invalid watch syntax"
gdb_test "Next 5" ""
gdb_test "Next 5" ".*"
gdb_test "break thread_function" "Breakpoint \[0-9\].*" \
"Set breakpoint at thread_function"
@ -70,7 +70,7 @@ gdb_test_multiple "thread" "Thread command" {
set thread_num "$expect_out(1,string)"
gdb_test "disable 2" "" "Disable breakpoint 2"
gdb_test_no_output "disable 2" "Disable breakpoint 2"
gdb_test "watch shared_var thread $thread_num" "atchpoint 3: shared_var" "Watchpoint on shared variable"
gdb_test "info breakpoint 3" "stop only in thread $thread_num"

4
gdb/testsuite/gdb.base/watchpoint-cond-gone.exp
View File

@ -32,7 +32,7 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfilestripped}" "${objfilestripped}"
clean_restart ${testfile}
# Problem does not occur otherwise.
gdb_test "set can-use-hw-watchpoints 0"
gdb_test_no_output "set can-use-hw-watchpoints 0"
if ![runto_main] {
return -1
@ -42,7 +42,7 @@ gdb_breakpoint [gdb_get_line_number "watchpoint-here"]
gdb_continue_to_breakpoint "Place to set the watchpoint"
# The condition `c == 30' is the subject being tested.
gdb_test "watch c if c == 30" "" "Place the watchpoint"
gdb_test "watch c if c == 30" "atchpoint \[0-9\]*.*" "Place the watchpoint"
# We may stay either in the function itself or only at the first instruction of
# its caller depending on the epilogue unwinder (or valid epilogue CFI) presence.

14
gdb/testsuite/gdb.base/watchpoint.exp
View File

@ -186,7 +186,7 @@ proc test_simple_watchpoint {} {
gdb_test "break func1" "Breakpoint.*at.*"
gdb_test "set \$func1_breakpoint_number = \$bpnum" ""
gdb_test_no_output "set \$func1_breakpoint_number = \$bpnum"
gdb_test "continue" "Continuing.*Breakpoint \[0-9\]*, func1.*" \
"continue to breakpoint at func1"
@ -201,7 +201,7 @@ proc test_simple_watchpoint {} {
-re "Continuing.*Breakpoint.*func1.*$gdb_prompt $" {
setup_xfail "m68*-*-*" 2597
fail "thought it hit breakpoint at func1 twice"
gdb_test "delete \$func1_breakpoint_number" ""
gdb_test_no_output "delete \$func1_breakpoint_number"
gdb_test "continue" "\
Continuing.*\[Ww\]atchpoint.*ival3.*Old value = -1.*New value = 0.*ival3 = count;" \
"watchpoint hit, first time"
@ -214,7 +214,7 @@ Continuing.*\[Ww\]atchpoint.*ival3.*Old value = -1.*New value = 0.*ival3 = count
# Check that the hit count is reported correctly
gdb_test "info break" ".*watchpoint\[ \t\]+keep\[ \t\]+y\[ \t\]+ival3\r\n\[ \t]+breakpoint already hit 1 time.*" "Watchpoint hit count is 1"
gdb_test "delete \$func1_breakpoint_number" ""
gdb_test_no_output "delete \$func1_breakpoint_number"
# Continue until the next change, from 0 to 1.
gdb_test "cont" "Continuing.*\[Ww\]atchpoint.*ival3.*Old value = 0.*New value = 1.*ival3 = count; ival4 = count;.*" "watchpoint hit, second time"
@ -431,7 +431,7 @@ proc test_watchpoint_triggered_in_syscall {} {
gdb_test "watch buf\[4\]" ".*\[Ww\]atchpoint \[0-9\]*: buf\\\[4\\\]"
gdb_test "break marker4" ".*Breakpoint.*"
gdb_test "set doread = 1" ""
gdb_test_no_output "set doread = 1"
# If we send_gdb "123\n" before gdb has switched the tty, then it goes
# to gdb, not the inferior, and we lose. So that is why we have
@ -498,7 +498,7 @@ proc test_watchpoint_triggered_in_syscall {} {
"continue to marker4"
# Disable everything so we can finish the program at full speed
gdb_test "disable" "" "disable in test_watchpoint_triggered_in_syscall"
gdb_test_no_output "disable" "disable in test_watchpoint_triggered_in_syscall"
if [target_info exists gdb,noresults] { return }
@ -528,7 +528,7 @@ proc test_complex_watchpoint {} {
# In particular, test that a watch of stack-based things
# is deleted when the stack-based things go out of scope.
#
gdb_test "disable" "" "disable in test_complex_watchpoint"
gdb_test_no_output "disable" "disable in test_complex_watchpoint"
gdb_test "break marker6" ".*Breakpoint.*"
gdb_test "cont" "Continuing.*Breakpoint.*marker6 \\(\\).*" \
"continue to marker6"
@ -589,7 +589,7 @@ proc test_complex_watchpoint {} {
"self-delete local watch in recursive call"
# Disable everything so we can finish the program at full speed
gdb_test "disable" "" "disable in test_complex_watchpoint"
gdb_test_no_output "disable" "disable in test_complex_watchpoint"
if [target_info exists gdb,noresults] { return }

8
gdb/testsuite/gdb.base/whatis-exp.exp
View File

@ -50,10 +50,10 @@ if ![runto_main] then {
# test expressions with "int" types
#
gdb_test "set variable x=14" "" "set variable x=14"
gdb_test "set variable y=2" "" "set variable y=2"
gdb_test "set variable z=2" "" "set variable z=2"
gdb_test "set variable w=3" "" "set variable w=3"
gdb_test_no_output "set variable x=14" "set variable x=14"
gdb_test_no_output "set variable y=2" "set variable y=2"
gdb_test_no_output "set variable z=2" "set variable z=2"
gdb_test_no_output "set variable w=3" "set variable w=3"
gdb_test "print x" " = 14" "print value of x"
gdb_test "print y" " = 2" "print value of y"