diff options
Diffstat (limited to 'gdb/testsuite/gdb.mi/mi-break.exp')
| -rw-r--r-- | gdb/testsuite/gdb.mi/mi-break.exp | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/gdb/testsuite/gdb.mi/mi-break.exp b/gdb/testsuite/gdb.mi/mi-break.exp index 573f484c6c6..999fef0989e 100644 --- a/gdb/testsuite/gdb.mi/mi-break.exp +++ b/gdb/testsuite/gdb.mi/mi-break.exp @@ -150,6 +150,24 @@ proc test_rbreak_creation_and_listing {} { "delete temp breakpoints" } +proc test_abreak_creation {} { + mi_create_varobj tpnum \$tpnum "create local variable tpnum" + # Test that $tpnum is not set before creating a tracepoint. + mi_gdb_test "521-var-evaluate-expression tpnum" \ + "521\\^done,value=\"void\"" "eval tpnum before tracepoint" + + mi_gdb_test "522-break-insert -a main" \ + "522\\^done,bkpt=\{number=\"10\",type=\"tracepoint\".*\"\}" \ + "break-insert -a operation" + + mi_gdb_test "523-var-update tpnum" \ + "523\\^done,changelist=\\\[\{name=\"tpnum\",in_scope=\"true\",type_changed=\"false\",has_more=\"0\"\}\\\]" \ + "update tpnum" + # Test that $tpnum is updated after creating a tracepoint. + mi_gdb_test "524-var-evaluate-expression tpnum" \ + "524\\^done,value=\"10\"" "eval tpnum after tracepoint" +} + proc test_ignore_count {} { global mi_gdb_prompt global line_callme_body @@ -256,5 +274,7 @@ test_disabled_creation test_breakpoint_commands +test_abreak_creation + mi_gdb_exit return 0 |