diff options
author | Tom de Vries <tdevries@suse.de> | 2019-11-02 06:55:10 +0100 |
---|---|---|
committer | Tom de Vries <tdevries@suse.de> | 2019-11-02 06:55:10 +0100 |
commit | 11af934b5cdba71d14f8ea7905b484c8a6ba0561 (patch) | |
tree | 8f3f9303975c94a58bd00685f6025cf12e6b8eba /gdb/testsuite/gdb.base/printcmds.exp | |
parent | e96ec2bab75a943e1666497b1389e297775af5a8 (diff) | |
download | binutils-gdb-11af934b5cdba71d14f8ea7905b484c8a6ba0561.tar.gz |
[gdb/testsuite] Remove superfluous 3rd argument from gdb_test call (4)
There's a pattern:
...
gdb_test <command> <pattern> <command>
...
that can be written shorter as:
...
gdb_test <command> <pattern>
...
Detect this pattern in proc gdb_test:
...
global gdb_prompt
upvar timeout timeout
if [llength $args]>2 then {
set message [lindex $args 2]
+ if { $message == [lindex $args 0] && [llength $args] == 3 } {
+ error "HERE"
+ }
} else {
set message [lindex $args 0]
}
...
and fix all occurrences in the testsuite/gdb.base subdir.
Tested on x86_64-linux.
gdb/testsuite/ChangeLog:
2019-11-02 Tom de Vries <tdevries@suse.de>
* gdb.base/advance.exp: Drop superfluous 3rd argument to gdb_test.
* gdb.base/anon.exp: Same.
* gdb.base/auto-connect-native-target.exp: Same.
* gdb.base/call-ar-st.exp: Same.
* gdb.base/catch-syscall.exp: Same.
* gdb.base/commands.exp: Same.
* gdb.base/default.exp: Same.
* gdb.base/display.exp: Same.
* gdb.base/float.exp: Same.
* gdb.base/foll-fork.exp: Same.
* gdb.base/help.exp: Same.
* gdb.base/info-macros.exp: Same.
* gdb.base/info-proc.exp: Same.
* gdb.base/info-target.exp: Same.
* gdb.base/long_long.exp: Same.
* gdb.base/macscp.exp: Same.
* gdb.base/memattr.exp: Same.
* gdb.base/nofield.exp: Same.
* gdb.base/pointers.exp: Same.
* gdb.base/printcmds.exp: Same.
* gdb.base/ptype.exp: Same.
* gdb.base/restore.exp: Same.
* gdb.base/return.exp: Same.
* gdb.base/scope.exp: Same.
* gdb.base/set-noassign.exp: Same.
* gdb.base/setshow.exp: Same.
* gdb.base/shlib-call.exp: Same.
* gdb.base/signals.exp: Same.
* gdb.base/sigstep.exp: Same.
* gdb.base/skip.exp: Same.
* gdb.base/solib-symbol.exp: Same.
* gdb.base/stap-probe.exp: Same.
* gdb.base/step-line.exp: Same.
* gdb.base/step-test.exp: Same.
* gdb.base/style.exp: Same.
* gdb.base/varargs.exp: Same.
* gdb.base/vla-datatypes.exp: Same.
* gdb.base/vla-ptr.exp: Same.
* gdb.base/vla-sideeffect.exp: Same.
* gdb.base/volatile.exp: Same.
* gdb.base/watch-cond-infcall.exp: Same.
* gdb.base/watchpoint.exp: Same.
Change-Id: Ifd24dc13d552e7dd03f9049db419b08c6adc4112
Diffstat (limited to 'gdb/testsuite/gdb.base/printcmds.exp')
-rw-r--r-- | gdb/testsuite/gdb.base/printcmds.exp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gdb/testsuite/gdb.base/printcmds.exp b/gdb/testsuite/gdb.base/printcmds.exp index edd5b31fd4c..7e56e08d527 100644 --- a/gdb/testsuite/gdb.base/printcmds.exp +++ b/gdb/testsuite/gdb.base/printcmds.exp @@ -948,7 +948,7 @@ proc test_printf_convenience_var {prefix} { # Without a target, the below produces no output # but with a target, it gives a warning. # So, use gdb_test expecting ".*" instead of gdb_test_no_output. - gdb_test "set language ada" ".*" "set language ada" + gdb_test "set language ada" ".*" gdb_test_no_output "set var \$astr := \"fghij\"" "set \$astr" gdb_test "printf \"astr val = %s\\n\", \$astr" "astr val = fghij" \ "printf \$astr" @@ -959,7 +959,7 @@ proc test_printf_convenience_var {prefix} { # Switch to c++ for the wide strings tests, as wchar_t is predefined # when current language is c++. # See above "set language ada" about why we use gdb_test. - gdb_test "set language c++" ".*" "set language c++" + gdb_test "set language c++" ".*" gdb_test_no_output "set var \$wstr = L\"facile\"" \ "set \$wstr" gdb_test "printf \"wstr val = %ls\\n\", \$wstr" \ |