diff options
Diffstat (limited to 'gdb/testsuite/gdb.mi/mi-dprintf.exp')
-rw-r--r-- | gdb/testsuite/gdb.mi/mi-dprintf.exp | 41 |
1 files changed, 26 insertions, 15 deletions
diff --git a/gdb/testsuite/gdb.mi/mi-dprintf.exp b/gdb/testsuite/gdb.mi/mi-dprintf.exp index 983acce..d60d66c 100644 --- a/gdb/testsuite/gdb.mi/mi-dprintf.exp +++ b/gdb/testsuite/gdb.mi/mi-dprintf.exp @@ -36,27 +36,38 @@ set dp_location1 [gdb_get_line_number "set dprintf 1 here"] mi_run_to_main -mi_gdb_test "1-dprintf-insert" \ - "1\\^error,msg=\"-dprintf-insert: Missing <location>\"" "mi insert without location" +set i 0 +mi_gdb_test "[incr i]-dprintf-insert" \ + "$i\\^error,msg=\"-dprintf-insert: Missing <location>\"" "mi insert without location" -mi_gdb_test "2-dprintf-insert foo" \ - "2\\^error,msg=\"-dprintf-insert: Missing <format>\"" "mi insert breakpoint without format string" +mi_gdb_test "[incr i]-dprintf-insert foo" \ + "$i\\^error,msg=\"-dprintf-insert: Missing <format>\"" "mi insert breakpoint without format string" -mi_gdb_test "3-dprintf-insert 29" \ - "3\\^error,msg=\"-dprintf-insert: Missing <format>\"" "mi insert second breakpoint without format string" +mi_gdb_test "[incr i]-dprintf-insert 29" \ + "$i\\^error,msg=\"-dprintf-insert: Missing <format>\"" "mi insert second breakpoint without format string" mi_gdb_test "-break-insert main" ".*" "mi insert breakpoint main" mi_delete_breakpoints -mi_gdb_test "4-dprintf-insert foo \"\\\"foobarbazqux\\\" At foo entry\\n\"" \ - "4\\^done,bkpt=\{number=\".*\",type=\"dprintf\".*func=\"foo\",file=\".*mi-dprintf.c\",fullname=\".*mi-dprintf.c\",line=\".*\".*" "mi insert dprintf foo" - -mi_gdb_test "5-dprintf-insert $dp_location1 \"arg=%d, g=%d\\n\" arg g" \ - "5\\^done,bkpt=\{number=\".*\",type=\"dprintf\".*func=\"foo\",file=\".*mi-dprintf.c\",fullname=\".*mi-dprintf.c\",line=\"$dp_location1\".*" \ - "mi insert dprintf dp_location1" - -mi_gdb_test "6-break-info" \ - "6\\^done,BreakpointTable=\{nr_rows=\".\",nr_cols=\".\",hdr=\\\[\{width=\".*\",alignment=\".*\",col_name=\"number\",colhdr=\"Num\"\},\{width=\".*\",alignment=\".*\",col_name=\"type\",colhdr=\"Type\"\},\{width=\".*\",alignment=\".*\",col_name=\"disp\",colhdr=\"Disp\"\},\{width=\".*\",alignment=\".*\",col_name=\"enabled\",colhdr=\"Enb\"\},\{width=\".*\",alignment=\".*\",col_name=\"addr\",colhdr=\"Address\"\},\{width=\".*\",alignment=\".*\",col_name=\"what\",colhdr=\"What\"\}\\\],body=\\\[bkpt=\{number=\"3\",type=\"dprintf\".*func=\"foo\",file=\".*mi-dprintf.c\",fullname=\".*mi-dprintf.c\",line=\".*\".*,bkpt=\{number=\".*\",type=\"dprintf\".*func=\"foo\",file=\".*mi-dprintf.c\",fullname=\".*mi-dprintf.c\",line=\"$dp_location1\".*" \ +set bps [mi_make_breakpoint -type dprintf -func foo -file ".*mi-dprintf.c" \ + -fullname ".*mi-dprintf.c"] +mi_gdb_test "[incr i]-dprintf-insert foo \"\\\"foobarbazqux\\\" At foo entry\\n\"" \ + "$i\\^done,$bps" "mi insert dprintf foo" + +set bps [mi_make_breakpoint -type dprintf -func foo \ + -file ".*mi-dprintf.c" -fullname ".*mi-dprintf.c" \ + -line $dp_location1] +mi_gdb_test "[incr i]-dprintf-insert $dp_location1 \"arg=%d, g=%d\\n\" arg g" \ + "$i\\^done,$bps" "mi insert dprintf dp_location1" + +set bps {} +lappend bps [mi_make_breakpoint -number 3 -type dprintf -func foo \ + -file ".*mi-dprintf.c" -fullname ".*mi-dprintf.c"] +lappend bps [mi_make_breakpoint -type dprintf -func foo \ + -file ".*mi-dprintf.c" -fullname ".*mi-dprintf.c" \ + -line $dp_location1] +mi_gdb_test "[incr i]-break-info" \ + "$i\\^done,[mi_make_breakpoint_table $bps]" \ "mi info dprintf" mi_gdb_test "-break-insert $bp_location1" ".*" "mi insert breakpoint bp_location1" |