diff options
| author | Tom de Vries <tdevries@suse.de> | 2022-06-04 11:19:01 +0200 |
|---|---|---|
| committer | Tom de Vries <tdevries@suse.de> | 2022-06-04 11:19:01 +0200 |
| commit | 0c05610450e5f19f03245ac646587e35cab53e7b (patch) | |
| tree | b240727aea64289c651ab8f52199fed3506f6bb9 | |
| parent | de15377594391aa201fba1ce7d8924274e10abbf (diff) | |
| download | gdb-0c05610450e5f19f03245ac646587e35cab53e7b.zip gdb-0c05610450e5f19f03245ac646587e35cab53e7b.tar.gz gdb-0c05610450e5f19f03245ac646587e35cab53e7b.tar.bz2 | |
[gdb/testsuite] Fix ERROR in gdb.ctf/funcreturn.exp
On openSUSE Tumbleweed (with gcc-12, enabling ctf tests) I run into:
...
ERROR: tcl error sourcing src/gdb/testsuite/gdb.ctf/funcreturn.exp.
ERROR: tcl error code NONE
ERROR: Unexpected arguments: \
{print v_double_func} \
{[0-9]+ = {double \(\)} 0x[0-9a-z]+.*} \
{print double function} \
}
...
The problem is a curly brace as fourth argument to gdb_test, which errors out
due to recently introduced more strict argument checking in gdb_test.
Fix the error by removing the brace.
Though this fixes the error for me, due to PR29160 I get only FAILs, so I can't
claim proper testing on x86_64-linux.
| -rw-r--r-- | gdb/testsuite/gdb.ctf/funcreturn.exp | 26 |
1 files changed, 12 insertions, 14 deletions
diff --git a/gdb/testsuite/gdb.ctf/funcreturn.exp b/gdb/testsuite/gdb.ctf/funcreturn.exp index 8f2723b..fe4e045 100644 --- a/gdb/testsuite/gdb.ctf/funcreturn.exp +++ b/gdb/testsuite/gdb.ctf/funcreturn.exp @@ -106,14 +106,13 @@ if ![target_info exists no_long_long] { # Sun /bin/cc calls this a function returning double. if {!$gcc_compiled} then {setup_xfail "*-sun-sunos4*"} - gdb_test "print v_float_func" \ - "$decimal = \{float \\(\\)\} 0x\[0-9a-z\]+.*" \ - "print float function" +gdb_test "print v_float_func" \ + "$decimal = \{float \\(\\)\} 0x\[0-9a-z\]+.*" \ + "print float function" - gdb_test "print v_double_func" \ - "$decimal = \{double \\(\\)\} 0x\[0-9a-z\]+.*" \ - "print double function" \ -} +gdb_test "print v_double_func" \ + "$decimal = \{double \\(\\)\} 0x\[0-9a-z\]+.*" \ + "print double function" # test whatis command with functions return type gdb_test "whatis v_char_func" \ @@ -180,11 +179,10 @@ if ![target_info exists no_long_long] { # Sun /bin/cc calls this a function returning double. if {!$gcc_compiled} then {setup_xfail "*-sun-sunos4*"} - gdb_test "whatis v_float_func" \ - "type = float \\($void\\)" \ - "whatis float function" +gdb_test "whatis v_float_func" \ + "type = float \\($void\\)" \ + "whatis float function" - gdb_test "whatis v_double_func" \ - "type = double \\($void\\)" \ - "whatis double function" \ -} +gdb_test "whatis v_double_func" \ + "type = double \\($void\\)" \ + "whatis double function" |