diff options
author | Pierre-Marie de Rodat <derodat@adacore.com> | 2015-03-10 09:51:27 +0100 |
---|---|---|
committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2015-04-01 15:06:39 +0200 |
commit | 3c724c8ca91ee8304ba355f681ccd906f0e9725b (patch) | |
tree | 2ee5d701d9e3c104c6088a138777aff673140d6a /gdb/testsuite/gdb.btrace/exception.exp | |
parent | 5445da1b7656f82e7892d862895dfd9e7c16889c (diff) | |
download | gdb-3c724c8ca91ee8304ba355f681ccd906f0e9725b.zip gdb-3c724c8ca91ee8304ba355f681ccd906f0e9725b.tar.gz gdb-3c724c8ca91ee8304ba355f681ccd906f0e9725b.tar.bz2 |
Share the "multi_line" helper among all testcases
gdb/testsuite/ChangeLog:
* gdb.ada/complete.exp: Remove "multi_line".
* gdb.ada/info_exc.exp: Remove "multi_line".
* gdb.ada/packed_tagged.exp: Remove "multi_line".
* gdb.ada/ptype_field.exp: Remove "multi_line".
* gdb.ada/sym_print_name.exp: Remove "multi_line".
* gdb.ada/tagged.exp: Remove "multi_line".
* gdb.btrace/buffer-size.exp: Replace [join [list ...]] with
[multi_line ...]
* gdb.btrace/delta.exp: Likewise.
* gdb.btrace/exception.exp: Likewise.
* gdb.btrace/function_call_history.exp: Likewise.
* gdb.btrace/instruction_history.exp: Likewise.
* gdb.btrace/nohist.exp: Likewise.
* gdb.btrace/record_goto.exp: Likewise.
* gdb.btrace/segv.exp: Likewise.
* gdb.btrace/stepi.exp: Likewise.
* gdb.btrace/tailcall.exp: Likewise.
* gdb.btrace/unknown_functions.exp: Likewise.
* gdb.dwarf2/dw2-undefined-ret-addr.exp: Likewise.
* lib/gdb.exp: Add the "multi_line" helper.
Diffstat (limited to 'gdb/testsuite/gdb.btrace/exception.exp')
-rwxr-xr-x | gdb/testsuite/gdb.btrace/exception.exp | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/gdb/testsuite/gdb.btrace/exception.exp b/gdb/testsuite/gdb.btrace/exception.exp index 0c43273..075e6cf 100755 --- a/gdb/testsuite/gdb.btrace/exception.exp +++ b/gdb/testsuite/gdb.btrace/exception.exp @@ -48,25 +48,25 @@ gdb_continue_to_breakpoint "cont to bp.2" ".*$srcfile:$bp_2\r\n.*" # show the flat branch trace send_gdb "record function-call-history 1\n" gdb_expect_list "flat" "\r\n$gdb_prompt $" [list \ - [join [list \ + [multi_line \ "1\tmain\\(\\)" \ "2\ttest\\(\\)" \ "3\tfoo\\(\\)" \ "4\tbar\\(\\)" \ "5\tbad\\(\\)\r" \ - ] "\r\n"] \ + ] \ "" \ "\[0-9\]*\ttest\\(\\)"] # show the branch trace with calls indented send_gdb "record function-call-history /c 1\n" gdb_expect_list "indented" "\r\n$gdb_prompt $" [list \ - [join [list \ + [multi_line \ "1\tmain\\(\\)" \ "2\t test\\(\\)" \ "3\t foo\\(\\)" \ "4\t bar\\(\\)" \ "5\t bad\\(\\)\r" \ - ] "\r\n"] \ + ] \ "" \ "\[0-9\]*\t test\\(\\)"] |