diff options
author | Tom de Vries <tdevries@suse.de> | 2023-04-24 22:08:53 +0200 |
---|---|---|
committer | Tom de Vries <tdevries@suse.de> | 2023-04-24 22:08:53 +0200 |
commit | 6d5d644e3cece1b2bbfe50c9b7e5866d656f81fb (patch) | |
tree | 0d27e8f88ba2afa3ec505139c84642797fa51a01 /gdb/testsuite/gdb.gdb | |
parent | 60732b42936b322a30d2d08618432eabb94b5a67 (diff) | |
download | fsf-binutils-gdb-6d5d644e3cece1b2bbfe50c9b7e5866d656f81fb.zip fsf-binutils-gdb-6d5d644e3cece1b2bbfe50c9b7e5866d656f81fb.tar.gz fsf-binutils-gdb-6d5d644e3cece1b2bbfe50c9b7e5866d656f81fb.tar.bz2 |
[gdb/testsuite] Fix auto-indent in gdb.gdb/python-helper.exp
When editing gdb.gdb/python-helper.exp, auto-indent is broken in my editor
(emacs).
The problem is that this:
...
if { 1 } {
foo "{" "}"<ENTER>bar
}
...
produces this:
...
if { 1 } {
foo "{" "}"
bar
}
...
Note that this doesn't happen for "{}".
Fix this by using "\{" and "\}".
Tested on x86_64-linux.
Diffstat (limited to 'gdb/testsuite/gdb.gdb')
-rw-r--r-- | gdb/testsuite/gdb.gdb/python-helper.exp | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/gdb/testsuite/gdb.gdb/python-helper.exp b/gdb/testsuite/gdb.gdb/python-helper.exp index a2dbeee..217f123 100644 --- a/gdb/testsuite/gdb.gdb/python-helper.exp +++ b/gdb/testsuite/gdb.gdb/python-helper.exp @@ -132,22 +132,22 @@ proc test_python_helper {} { # pretty printers. set answer [multi_line \ "${decimal} = " \ - "{pointer_type = 0x0," \ + "\{pointer_type = 0x0," \ " reference_type = 0x0," \ " chain = 0x0," \ " instance_flags = 0," \ " length = $decimal," \ - " main_type = $hex}"] + " main_type = $hex\}"] gdb_test -prompt $outer_prompt_re "print *val->m_type" $answer "pretty print type" set answer [multi_line \ "$decimal = " \ - "{name = $hex \"int\"," \ + "\{name = $hex \"int\"," \ " code = TYPE_CODE_INT," \ " flags = \[^\r\n\]+," \ " owner = $hex \\(gdbarch\\)," \ " target_type = 0x0," \ - " int_stuff = { bit_size = $decimal, bit_offset = $decimal }}"] + " int_stuff = \{ bit_size = $decimal, bit_offset = $decimal \}\}"] gdb_test -prompt $outer_prompt_re "print *val->m_type->main_type" $answer "pretty print type->main_type" # Send the continue to the outer GDB, which resumes the inner GDB, @@ -170,12 +170,12 @@ proc test_python_helper {} { set answer [multi_line \ "$decimal = " \ - "{name = $hex \"int\"," \ + "\{name = $hex \"int\"," \ " code = TYPE_CODE_INT," \ " flags = \[^\r\n\]+," \ " owner = $hex \\(objfile\\)," \ " target_type = 0x0," \ - " int_stuff = { bit_size = $decimal, bit_offset = $decimal }}"] + " int_stuff = \{ bit_size = $decimal, bit_offset = $decimal \}\}"] gdb_test -prompt $outer_prompt_re "print *val->m_type->main_type" $answer "pretty print type->main_type for DWARF type" # Send the continue to the outer GDB, which resumes the inner GDB, @@ -227,18 +227,18 @@ proc test_python_helper {} { if { $cmd_supported } { set answer [multi_line \ "$decimal = " \ - "{name = $hex \"CC\"," \ + "\{name = $hex \"CC\"," \ " code = TYPE_CODE_STRUCT," \ " flags = \[^\r\n\]+," \ " owner = $hex \\(objfile\\)," \ " target_type = 0x0," \ " flds_bnds\\.fields\\\[0\\\]:" \ - " {m_name = $hex \"m_val\"," \ + " \{m_name = $hex \"m_val\"," \ " m_type = $hex," \ " m_loc_kind = FIELD_LOC_KIND_BITPOS," \ " bitsize = 0," \ - " bitpos = 0}," \ - " cplus_stuff = $hex}"] + " bitpos = 0\}," \ + " cplus_stuff = $hex\}"] gdb_test -prompt $outer_prompt_re $cmd $answer } else { unsupported $cmd |