mirror of
https://sourceware.org/git/binutils-gdb.git
synced 2024-11-26 19:44:11 +08:00
2002-10-03 Jeff Johnston <jjohnstn@redhat.com>
* mi-var-block.exp: Change expected output from -var-update command to expect list format for "changelist". Fix for PR gdb/672. * mi-var-cmd.exp: Ditto. * mi-var-child: Ditto.
This commit is contained in:
parent
3a387118eb
commit
93cae4bfd9
@ -1,3 +1,11 @@
|
|||||||
|
2002-10-03 Jeff Johnston <jjohnstn@redhat.com>
|
||||||
|
|
||||||
|
* mi-var-block.exp: Change expected output from -var-update
|
||||||
|
command to expect list format for "changelist". Fix for
|
||||||
|
PR gdb/672.
|
||||||
|
* mi-var-cmd.exp: Ditto.
|
||||||
|
* mi-var-child: Ditto.
|
||||||
|
|
||||||
2002-09-25 Keith Seitz <keiths@redhat.com>
|
2002-09-25 Keith Seitz <keiths@redhat.com>
|
||||||
|
|
||||||
* mi-pthreads.exp (get_mi_thread_list): Check if expect_out
|
* mi-pthreads.exp (get_mi_thread_list): Check if expect_out
|
||||||
|
@ -104,7 +104,7 @@ gdb_expect {
|
|||||||
# Test: c_variable-3.4
|
# Test: c_variable-3.4
|
||||||
# Desc: check foo, cb changed
|
# Desc: check foo, cb changed
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"foo\",in_scope=\"true\",type_changed=\"false\",name=\"cb\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"foo\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"cb\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars: cb foo changed"
|
"update all vars: cb foo changed"
|
||||||
|
|
||||||
# step to "foo = 321;"
|
# step to "foo = 321;"
|
||||||
@ -155,7 +155,7 @@ mi_gdb_test "-var-evaluate-expression inner_foo" \
|
|||||||
clear_xfail *-*-*
|
clear_xfail *-*-*
|
||||||
|
|
||||||
mi_gdb_test "-var-update foo" \
|
mi_gdb_test "-var-update foo" \
|
||||||
"\\^done,changelist=\{\}" \
|
"\\^done,changelist=\\\[\\\]" \
|
||||||
"update foo: did not change"
|
"update foo: did not change"
|
||||||
|
|
||||||
mi_gdb_test "-var-delete inner_foo" \
|
mi_gdb_test "-var-delete inner_foo" \
|
||||||
@ -193,7 +193,7 @@ gdb_expect {
|
|||||||
# Desc: check that only cb is in scope (known gdb problem)
|
# Desc: check that only cb is in scope (known gdb problem)
|
||||||
setup_xfail *-*-*
|
setup_xfail *-*-*
|
||||||
mi_gdb_test "-var-update foo2" \
|
mi_gdb_test "-var-update foo2" \
|
||||||
"\\^done,changelist=\{FIXME\}" \
|
"\\^done,changelist=\\\[FIXME\\\]" \
|
||||||
"update foo2 should be out of scope: KNOWN PROBLEM"
|
"update foo2 should be out of scope: KNOWN PROBLEM"
|
||||||
clear_xfail *-*-*
|
clear_xfail *-*-*
|
||||||
setup_xfail *-*-*
|
setup_xfail *-*-*
|
||||||
@ -202,7 +202,7 @@ mi_gdb_test "-var-update foo" \
|
|||||||
"update foo should be out of scope: KNOWN PROBLEM"
|
"update foo should be out of scope: KNOWN PROBLEM"
|
||||||
clear_xfail *-*-*
|
clear_xfail *-*-*
|
||||||
mi_gdb_test "-var-update cb" \
|
mi_gdb_test "-var-update cb" \
|
||||||
"\\^done,changelist=\{\}" \
|
"\\^done,changelist=\\\[\\\]" \
|
||||||
"update cb"
|
"update cb"
|
||||||
|
|
||||||
# Test: c_variable-3.10
|
# Test: c_variable-3.10
|
||||||
|
@ -750,7 +750,7 @@ mi_gdb_test "-var-delete weird" \
|
|||||||
# Test: c_variable-5.1
|
# Test: c_variable-5.1
|
||||||
# Desc: check that nothing changed
|
# Desc: check that nothing changed
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{\}" \
|
"\\^done,changelist=\\\[\\\]" \
|
||||||
"update all vars. None changed"
|
"update all vars. None changed"
|
||||||
|
|
||||||
# Step over "struct_declarations.integer = 123;"
|
# Step over "struct_declarations.integer = 123;"
|
||||||
@ -760,7 +760,7 @@ mi_step_to do_children_tests {} {.*var-cmd.c} $line "step $line"
|
|||||||
# Test: c_variable-5.2
|
# Test: c_variable-5.2
|
||||||
# Desc: check that integer changed
|
# Desc: check that integer changed
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"struct_declarations.integer\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"struct_declarations.integer\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars struct_declarations.integer"
|
"update all vars struct_declarations.integer"
|
||||||
|
|
||||||
# Step over:
|
# Step over:
|
||||||
@ -773,7 +773,7 @@ mi_execute_to "exec-step 3" "end-stepping-range" do_children_tests {} {.*var-cmd
|
|||||||
# Test: c_variable-5.3
|
# Test: c_variable-5.3
|
||||||
# Desc: check that char_ptr changed
|
# Desc: check that char_ptr changed
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"struct_declarations.char_ptr\",in_scope=\"true\",type_changed=\"false\",name=\"struct_declarations.char_ptr.\\*char_ptr\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"struct_declarations.char_ptr\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"struct_declarations.char_ptr.\\*char_ptr\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars struct_declarations.char_ptr"
|
"update all vars struct_declarations.char_ptr"
|
||||||
|
|
||||||
# Step over "struct_declarations.int_ptr_ptr = &foo;"
|
# Step over "struct_declarations.int_ptr_ptr = &foo;"
|
||||||
@ -783,7 +783,7 @@ mi_step_to do_children_tests {} {.*var-cmd.c} $line "step $line"
|
|||||||
# Test: c_variable-5.4
|
# Test: c_variable-5.4
|
||||||
# Desc: check that int_ptr_ptr and children changed
|
# Desc: check that int_ptr_ptr and children changed
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"weird->int_ptr_ptr\",in_scope=\"true\",type_changed=\"false\",name=\"weird->int_ptr_ptr.\\*weird->int_ptr_ptr\",in_scope=\"true\",type_changed=\"false\",name=\"weird->int_ptr_ptr.\\*weird->int_ptr_ptr.\\*\\*weird->int_ptr_ptr\",in_scope=\"true\",type_changed=\"false\",name=\"struct_declarations.int_ptr_ptr\",in_scope=\"true\",type_changed=\"false\",name=\"struct_declarations.int_ptr_ptr.\\*int_ptr_ptr\",in_scope=\"true\",type_changed=\"false\",name=\"struct_declarations.int_ptr_ptr.\\*int_ptr_ptr.\\*\\*int_ptr_ptr\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"weird->int_ptr_ptr\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"weird->int_ptr_ptr.\\*weird->int_ptr_ptr\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"weird->int_ptr_ptr.\\*weird->int_ptr_ptr.\\*\\*weird->int_ptr_ptr\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"struct_declarations.int_ptr_ptr\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"struct_declarations.int_ptr_ptr.\\*int_ptr_ptr\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"struct_declarations.int_ptr_ptr.\\*int_ptr_ptr.\\*\\*int_ptr_ptr\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars int_ptr_ptr and children changed"
|
"update all vars int_ptr_ptr and children changed"
|
||||||
|
|
||||||
# Step over "weird->long_array[0] = 1234;"
|
# Step over "weird->long_array[0] = 1234;"
|
||||||
@ -793,7 +793,7 @@ mi_step_to do_children_tests {} {.*var-cmd.c} $line "step $line"
|
|||||||
# Test: c_variable-5.5
|
# Test: c_variable-5.5
|
||||||
# Desc: check that long_array[0] changed
|
# Desc: check that long_array[0] changed
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"struct_declarations.long_array.0\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"struct_declarations.long_array.0\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars struct_declarations.long_array.0 changed"
|
"update all vars struct_declarations.long_array.0 changed"
|
||||||
|
|
||||||
# Step over "struct_declarations.long_array[1] = 2345;"
|
# Step over "struct_declarations.long_array[1] = 2345;"
|
||||||
@ -803,7 +803,7 @@ mi_step_to do_children_tests {} {.*var-cmd.c} $line "step $line"
|
|||||||
# Test: c_variable-5.6
|
# Test: c_variable-5.6
|
||||||
# Desc: check that long_array[1] changed
|
# Desc: check that long_array[1] changed
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"struct_declarations.long_array.1\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"struct_declarations.long_array.1\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars struct_declarations.long_array.1 changed"
|
"update all vars struct_declarations.long_array.1 changed"
|
||||||
|
|
||||||
# Step over "weird->long_array[2] = 3456;"
|
# Step over "weird->long_array[2] = 3456;"
|
||||||
@ -813,7 +813,7 @@ mi_step_to do_children_tests {} {.*var-cmd.c} $line "step $line"
|
|||||||
# Test: c_variable-5.7
|
# Test: c_variable-5.7
|
||||||
# Desc: check that long_array[2] changed
|
# Desc: check that long_array[2] changed
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"struct_declarations.long_array.2\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"struct_declarations.long_array.2\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars struct_declarations.long_array.2 changed"
|
"update all vars struct_declarations.long_array.2 changed"
|
||||||
|
|
||||||
# Step over:
|
# Step over:
|
||||||
@ -830,7 +830,7 @@ mi_execute_to "exec-step 7" "end-stepping-range" do_children_tests {} {.*var-cmd
|
|||||||
# Test: c_variable-5.8
|
# Test: c_variable-5.8
|
||||||
# Desc: check that long_array[3-9] changed
|
# Desc: check that long_array[3-9] changed
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"struct_declarations.long_array.3\",in_scope=\"true\",type_changed=\"false\",name=\"struct_declarations.long_array.4\",in_scope=\"true\",type_changed=\"false\",name=\"struct_declarations.long_array.5\",in_scope=\"true\",type_changed=\"false\",name=\"struct_declarations.long_array.6\",in_scope=\"true\",type_changed=\"false\",name=\"struct_declarations.long_array.7\",in_scope=\"true\",type_changed=\"false\",name=\"struct_declarations.long_array.8\",in_scope=\"true\",type_changed=\"false\",name=\"struct_declarations.long_array.9\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"struct_declarations.long_array.3\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"struct_declarations.long_array.4\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"struct_declarations.long_array.5\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"struct_declarations.long_array.6\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"struct_declarations.long_array.7\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"struct_declarations.long_array.8\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"struct_declarations.long_array.9\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars struct_declarations.long_array.3-9 changed"
|
"update all vars struct_declarations.long_array.3-9 changed"
|
||||||
|
|
||||||
|
|
||||||
@ -841,7 +841,7 @@ mi_step_to do_children_tests {} {.*var-cmd.c} $line "step $line"
|
|||||||
# Test: c_variable-5.9
|
# Test: c_variable-5.9
|
||||||
# Desc: check that func_ptr changed
|
# Desc: check that func_ptr changed
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"struct_declarations.func_ptr\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"struct_declarations.func_ptr\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars struct_declarations.func_ptr changed"
|
"update all vars struct_declarations.func_ptr changed"
|
||||||
|
|
||||||
# Delete all variables
|
# Delete all variables
|
||||||
@ -1133,7 +1133,7 @@ mi_step_to do_children_tests {} {.*var-cmd.c} $line "step $line"
|
|||||||
# Test: c_variable-5.47
|
# Test: c_variable-5.47
|
||||||
# Desc: check that psnp->char_ptr (and [0].char_ptr) changed
|
# Desc: check that psnp->char_ptr (and [0].char_ptr) changed
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"psnp->ptrs.0.char_ptr\",in_scope=\"true\",type_changed=\"false\",name=\"psnp->char_ptr\",in_scope=\"true\",type_changed=\"false\",name=\"psnp->char_ptr.\\*psnp->char_ptr\",in_scope=\"true\",type_changed=\"false\",name=\"psnp->char_ptr.\\*psnp->char_ptr.\\*\\*psnp->char_ptr\",in_scope=\"true\",type_changed=\"false\",name=\"psnp->char_ptr.\\*psnp->char_ptr.\\*\\*psnp->char_ptr.\\*\\*\\*psnp->char_ptr\",in_scope=\"true\",type_changed=\"false\",name=\"psnp->char_ptr.\\*psnp->char_ptr.\\*\\*psnp->char_ptr.\\*\\*\\*psnp->char_ptr.\\*\\*\\*\\*psnp->char_ptr\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"psnp->ptrs.0.char_ptr\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"psnp->char_ptr\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"psnp->char_ptr.\\*psnp->char_ptr\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"psnp->char_ptr.\\*psnp->char_ptr.\\*\\*psnp->char_ptr\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"psnp->char_ptr.\\*psnp->char_ptr.\\*\\*psnp->char_ptr.\\*\\*\\*psnp->char_ptr\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"psnp->char_ptr.\\*psnp->char_ptr.\\*\\*psnp->char_ptr.\\*\\*\\*psnp->char_ptr.\\*\\*\\*\\*psnp->char_ptr\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars psnp->char_ptr (and 0.char_ptr) changed"
|
"update all vars psnp->char_ptr (and 0.char_ptr) changed"
|
||||||
|
|
||||||
# Step over "snp1.char_ptr = &c3;"
|
# Step over "snp1.char_ptr = &c3;"
|
||||||
@ -1143,7 +1143,7 @@ mi_step_to do_children_tests {} {.*var-cmd.c} $line "step $line"
|
|||||||
# Test: c_variable-5.48
|
# Test: c_variable-5.48
|
||||||
# Desc: check that psnp->next->char_ptr (and [1].char_ptr) changed
|
# Desc: check that psnp->next->char_ptr (and [1].char_ptr) changed
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"psnp->ptrs.0.next.char_ptr\",in_scope=\"true\",type_changed=\"false\",name=\"psnp->ptrs.0.next.char_ptr.\\*char_ptr\",in_scope=\"true\",type_changed=\"false\",name=\"psnp->ptrs.0.next.char_ptr.\\*char_ptr.\\*\\*char_ptr\",in_scope=\"true\",type_changed=\"false\",name=\"psnp->ptrs.0.next.char_ptr.\\*char_ptr.\\*\\*char_ptr.\\*\\*\\*char_ptr\",in_scope=\"true\",type_changed=\"false\",name=\"psnp->ptrs.0.next.char_ptr.\\*char_ptr.\\*\\*char_ptr.\\*\\*\\*char_ptr.\\*\\*\\*\\*char_ptr\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"psnp->ptrs.0.next.char_ptr\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"psnp->ptrs.0.next.char_ptr.\\*char_ptr\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"psnp->ptrs.0.next.char_ptr.\\*char_ptr.\\*\\*char_ptr\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"psnp->ptrs.0.next.char_ptr.\\*char_ptr.\\*\\*char_ptr.\\*\\*\\*char_ptr\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"psnp->ptrs.0.next.char_ptr.\\*char_ptr.\\*\\*char_ptr.\\*\\*\\*char_ptr.\\*\\*\\*\\*char_ptr\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars psnp->next->char_ptr (and 1.char_ptr) changed"
|
"update all vars psnp->next->char_ptr (and 1.char_ptr) changed"
|
||||||
|
|
||||||
|
|
||||||
@ -1154,7 +1154,7 @@ mi_step_to do_children_tests {} {.*var-cmd.c} $line "step $line"
|
|||||||
# Test: c_variable-5.49
|
# Test: c_variable-5.49
|
||||||
# Desc: check that psnp->next->next->char_ptr (and [2].char_ptr) changed
|
# Desc: check that psnp->next->next->char_ptr (and [2].char_ptr) changed
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"psnp->ptrs.0.next.next.char_ptr\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"psnp->ptrs.0.next.next.char_ptr\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars psnp->next->next->char_ptr (and 2.char_ptr) changed"
|
"update all vars psnp->next->next->char_ptr (and 2.char_ptr) changed"
|
||||||
|
|
||||||
|
|
||||||
@ -1165,7 +1165,7 @@ mi_step_to do_children_tests {} {.*var-cmd.c} $line "step $line"
|
|||||||
# Test: c_variable-5.50
|
# Test: c_variable-5.50
|
||||||
# Desc: check that psnp->long_ptr (and [0].long_ptr) changed
|
# Desc: check that psnp->long_ptr (and [0].long_ptr) changed
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"psnp->ptrs.0.long_ptr\",in_scope=\"true\",type_changed=\"false\",name=\"psnp->long_ptr\",in_scope=\"true\",type_changed=\"false\",name=\"psnp->long_ptr.\\*psnp->long_ptr\",in_scope=\"true\",type_changed=\"false\",name=\"psnp->long_ptr.\\*psnp->long_ptr.\\*\\*psnp->long_ptr\",in_scope=\"true\",type_changed=\"false\",name=\"psnp->long_ptr.\\*psnp->long_ptr.\\*\\*psnp->long_ptr.\\*\\*\\*psnp->long_ptr\",in_scope=\"true\",type_changed=\"false\",name=\"psnp->long_ptr.\\*psnp->long_ptr.\\*\\*psnp->long_ptr.\\*\\*\\*psnp->long_ptr.\\*\\*\\*\\*psnp->long_ptr\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"psnp->ptrs.0.long_ptr\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"psnp->long_ptr\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"psnp->long_ptr.\\*psnp->long_ptr\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"psnp->long_ptr.\\*psnp->long_ptr.\\*\\*psnp->long_ptr\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"psnp->long_ptr.\\*psnp->long_ptr.\\*\\*psnp->long_ptr.\\*\\*\\*psnp->long_ptr\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"psnp->long_ptr.\\*psnp->long_ptr.\\*\\*psnp->long_ptr.\\*\\*\\*psnp->long_ptr.\\*\\*\\*\\*psnp->long_ptr\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars psnp->long_ptr (and 0.long_ptr) changed"
|
"update all vars psnp->long_ptr (and 0.long_ptr) changed"
|
||||||
|
|
||||||
|
|
||||||
@ -1178,7 +1178,7 @@ mi_step_to do_children_tests {} {.*var-cmd.c} $line "step $line"
|
|||||||
# Why does this have a FIXME?
|
# Why does this have a FIXME?
|
||||||
setup_xfail *-*-*
|
setup_xfail *-*-*
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"FIXME\\^done,changelist=\{name=\"psnp->ptrs.0.next.long_ptr\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"FIXME\\^done,changelist=\\\[\{name=\"psnp->ptrs.0.next.long_ptr\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars psnp->next->long_ptr (and 1.long_ptr) changed"
|
"update all vars psnp->next->long_ptr (and 1.long_ptr) changed"
|
||||||
clear_xfail *-*-*
|
clear_xfail *-*-*
|
||||||
|
|
||||||
@ -1193,7 +1193,7 @@ mi_step_to do_children_tests {} {.*var-cmd.c} $line "step $line"
|
|||||||
# Test: c_variable-5.52
|
# Test: c_variable-5.52
|
||||||
# Desc: check that psnp->next->next->long_ptr (and [2].long_ptr) changed
|
# Desc: check that psnp->next->next->long_ptr (and [2].long_ptr) changed
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"psnp->ptrs.0.next.next.long_ptr\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"psnp->ptrs.0.next.next.long_ptr\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars psnp->next->next->long_ptr (and 2.long_ptr) changed"
|
"update all vars psnp->next->next->long_ptr (and 2.long_ptr) changed"
|
||||||
|
|
||||||
|
|
||||||
|
@ -176,7 +176,7 @@ mi_gdb_test "-var-create int * int" \
|
|||||||
# Test: c_variable-2.1
|
# Test: c_variable-2.1
|
||||||
# Desc: check whether values changed at do_block_tests
|
# Desc: check whether values changed at do_block_tests
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{\}" \
|
"\\^done,changelist=\\\[\\\]" \
|
||||||
"update all vars"
|
"update all vars"
|
||||||
|
|
||||||
# Step over "linteger = 1234;"
|
# Step over "linteger = 1234;"
|
||||||
@ -185,7 +185,7 @@ mi_step_to "do_locals_tests" "" "var-cmd.c" "107" "step at do_locals_test"
|
|||||||
# Test: c_variable-2.2
|
# Test: c_variable-2.2
|
||||||
# Desc: check whether only linteger changed values
|
# Desc: check whether only linteger changed values
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"linteger\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"linteger\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars: linteger changed"
|
"update all vars: linteger changed"
|
||||||
|
|
||||||
# Step over "lpinteger = &linteger;"
|
# Step over "lpinteger = &linteger;"
|
||||||
@ -194,7 +194,7 @@ mi_step_to "do_locals_tests" "" "var-cmd.c" 108 "step at do_locals_tests (2)"
|
|||||||
# Test: c_variable-2.3
|
# Test: c_variable-2.3
|
||||||
# Desc: check whether only lpinteger changed
|
# Desc: check whether only lpinteger changed
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"lpinteger\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"lpinteger\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars: lpinteger changed"
|
"update all vars: lpinteger changed"
|
||||||
|
|
||||||
# Step over "lcharacter = 'a';"
|
# Step over "lcharacter = 'a';"
|
||||||
@ -203,7 +203,7 @@ mi_step_to "do_locals_tests" "" "var-cmd.c" "109" "step at do_locals_tests (3)"
|
|||||||
# Test: c_variable-2.4
|
# Test: c_variable-2.4
|
||||||
# Desc: check whether only lcharacter changed
|
# Desc: check whether only lcharacter changed
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"lcharacter\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"lcharacter\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars: lcharacter changed"
|
"update all vars: lcharacter changed"
|
||||||
|
|
||||||
# Step over "lpcharacter = &lcharacter;"
|
# Step over "lpcharacter = &lcharacter;"
|
||||||
@ -212,7 +212,7 @@ mi_step_to "do_locals_tests" "" "var-cmd.c" "110" "step at do_locals_tests (4)"
|
|||||||
# Test: c_variable-2.5
|
# Test: c_variable-2.5
|
||||||
# Desc: check whether only lpcharacter changed
|
# Desc: check whether only lpcharacter changed
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"lpcharacter\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"lpcharacter\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars: lpcharacter changed"
|
"update all vars: lpcharacter changed"
|
||||||
|
|
||||||
|
|
||||||
@ -234,7 +234,7 @@ mi_execute_to "exec-step 9" "end-stepping-range" "do_locals_tests" "" \
|
|||||||
# Desc: check whether llong, lplong, lfloat, lpfloat, ldouble, lpdouble, lsimple.integer,
|
# Desc: check whether llong, lplong, lfloat, lpfloat, ldouble, lpdouble, lsimple.integer,
|
||||||
# lsimple.unsigned_character lsimple.integer lsimple.character changed
|
# lsimple.unsigned_character lsimple.integer lsimple.character changed
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"lsimple.integer\",in_scope=\"true\",type_changed=\"false\",name=\"lsimple->integer\",in_scope=\"true\",type_changed=\"false\",name=\"lsimple.character\",in_scope=\"true\",type_changed=\"false\",name=\"lpdouble\",in_scope=\"true\",type_changed=\"false\",name=\"ldouble\",in_scope=\"true\",type_changed=\"false\",name=\"lpfloat\",in_scope=\"true\",type_changed=\"false\",name=\"lfloat\",in_scope=\"true\",type_changed=\"false\",name=\"lplong\",in_scope=\"true\",type_changed=\"false\",name=\"llong\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"lsimple.integer\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"lsimple->integer\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"lsimple.character\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"lpdouble\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"ldouble\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"lpfloat\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"lfloat\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"lplong\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"llong\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars: many changed"
|
"update all vars: many changed"
|
||||||
|
|
||||||
# Step over:
|
# Step over:
|
||||||
@ -249,7 +249,7 @@ mi_execute_to "exec-step 4" "end-stepping-range" "do_locals_tests" "" \
|
|||||||
# Test: c_variable-2.7
|
# Test: c_variable-2.7
|
||||||
# Desc: check whether (lsimple.signed_character, lsimple.char_ptr) lpsimple, func changed
|
# Desc: check whether (lsimple.signed_character, lsimple.char_ptr) lpsimple, func changed
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"func\",in_scope=\"true\",type_changed=\"false\",name=\"lpsimple\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"func\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"lpsimple\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars: func and lpsimple changed"
|
"update all vars: func and lpsimple changed"
|
||||||
|
|
||||||
# Step over
|
# Step over
|
||||||
@ -271,7 +271,7 @@ mi_execute_to "exec-step 8" "end-stepping-range" "do_locals_tests" "" \
|
|||||||
# Note: this test also checks that lpsimple->integer and lsimple.integer have
|
# Note: this test also checks that lpsimple->integer and lsimple.integer have
|
||||||
# changed (they are the same)
|
# changed (they are the same)
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"lsimple.integer\",in_scope=\"true\",type_changed=\"false\",name=\"lsimple->integer\",in_scope=\"true\",type_changed=\"false\",name=\"lsimple.character\",in_scope=\"true\",type_changed=\"false\",name=\"ldouble\",in_scope=\"true\",type_changed=\"false\",name=\"lfloat\",in_scope=\"true\",type_changed=\"false\",name=\"llong\",in_scope=\"true\",type_changed=\"false\",name=\"lcharacter\",in_scope=\"true\",type_changed=\"false\",name=\"linteger\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"lsimple.integer\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"lsimple->integer\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"lsimple.character\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"ldouble\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"lfloat\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"llong\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"lcharacter\",in_scope=\"true\",type_changed=\"false\"\},\{name=\"linteger\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars: func and lpsimple changed"
|
"update all vars: func and lpsimple changed"
|
||||||
|
|
||||||
|
|
||||||
@ -421,7 +421,7 @@ mi_step_to "subroutine1" "\{name=\"i\",value=\".*\"\},\{name=\"l\",value=\".*\"\
|
|||||||
# Test: c_variable-2.13
|
# Test: c_variable-2.13
|
||||||
# Desc: change subroutine1 local i
|
# Desc: change subroutine1 local i
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"i\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"i\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars: i changed"
|
"update all vars: i changed"
|
||||||
|
|
||||||
mi_step_to "subroutine1" "\{name=\"i\",value=\".*\"\},\{name=\"l\",value=\".*\"\}" \
|
mi_step_to "subroutine1" "\{name=\"i\",value=\".*\"\},\{name=\"l\",value=\".*\"\}" \
|
||||||
@ -430,7 +430,7 @@ mi_step_to "subroutine1" "\{name=\"i\",value=\".*\"\},\{name=\"l\",value=\".*\"\
|
|||||||
# Test: c_variable-2.14
|
# Test: c_variable-2.14
|
||||||
# Desc: change do_locals_tests local llong
|
# Desc: change do_locals_tests local llong
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"llong\",in_scope=\"true\",type_changed=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"llong\",in_scope=\"true\",type_changed=\"false\"\}\\\]" \
|
||||||
"update all vars: llong changed"
|
"update all vars: llong changed"
|
||||||
|
|
||||||
mi_next_to "do_locals_tests" "" "var-cmd.c" "136" "next out of subroutine1"
|
mi_next_to "do_locals_tests" "" "var-cmd.c" "136" "next out of subroutine1"
|
||||||
@ -438,7 +438,7 @@ mi_next_to "do_locals_tests" "" "var-cmd.c" "136" "next out of subroutine1"
|
|||||||
# Test: c_variable-2.15
|
# Test: c_variable-2.15
|
||||||
# Desc: check for out of scope subroutine1 locals
|
# Desc: check for out of scope subroutine1 locals
|
||||||
mi_gdb_test "-var-update *" \
|
mi_gdb_test "-var-update *" \
|
||||||
"\\^done,changelist=\{name=\"l\",in_scope=\"false\",name=\"i\",in_scope=\"false\"\}" \
|
"\\^done,changelist=\\\[\{name=\"l\",in_scope=\"false\"\},\{name=\"i\",in_scope=\"false\"\}\\\]" \
|
||||||
"update all vars: all now out of scope"
|
"update all vars: all now out of scope"
|
||||||
|
|
||||||
# Done with locals/globals tests. Erase all variables
|
# Done with locals/globals tests. Erase all variables
|
||||||
@ -538,15 +538,15 @@ mi_gdb_test "-break-insert incr_a" \
|
|||||||
mi_continue_to {.*} incr_a {.*} {.*var-cmd.c} {.*} {stop in incr_a}
|
mi_continue_to {.*} incr_a {.*} {.*var-cmd.c} {.*} {stop in incr_a}
|
||||||
|
|
||||||
mi_gdb_test "-var-update selected_a" \
|
mi_gdb_test "-var-update selected_a" \
|
||||||
{\^done,changelist=\{name="selected_a",in_scope="true",new_type="char",new_num_children="0"\}} \
|
"\\^done,changelist=\\\[\{name=\"selected_a\",in_scope=\"true\",new_type=\"char\",new_num_children=\"0\"\}\\\]" \
|
||||||
"update selected_a in incr_a"
|
"update selected_a in incr_a"
|
||||||
|
|
||||||
mi_next "step a line in incr_a"
|
mi_next "step a line in incr_a"
|
||||||
mi_next "return from incr_a to do_special_tests"
|
mi_next "return from incr_a to do_special_tests"
|
||||||
|
|
||||||
mi_gdb_test "-var-update selected_a" \
|
mi_gdb_test "-var-update selected_a" \
|
||||||
{\^done,changelist=\{name="selected_a",in_scope="true",new_type="int",new_num_children="0"\}} \
|
"\\^done,changelist=\\\[\{name=\"selected_a\",in_scope=\"true\",new_type=\"int\",new_num_children=\"0\"\}\\\]" \
|
||||||
"update selected_a in do_special_tests"
|
"update selected_a in do_special_tests"
|
||||||
|
|
||||||
mi_gdb_exit
|
mi_gdb_exit
|
||||||
return 0
|
return 0
|
||||||
|
Loading…
Reference in New Issue
Block a user