2012-11-09 Yao Qi <yao@codesourcery.com>

[deliverable/binutils-gdb.git] / gdb / testsuite / gdb.mi / mi-break.exp

diff --git a/gdb/testsuite/gdb.mi/mi-break.exp b/gdb/testsuite/gdb.mi/mi-break.exp
index 573f484c6c66afdd96fbf58683aff981f5c1ed1e..999fef0989ec04c2d4c2bccb200c81410da9f8ae 100644 (file)
--- 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