summaryrefslogtreecommitdiff
path: root/gdb/testsuite/gdb.trace/collection.exp
diff options
context:
space:
mode:
authorYao Qi <yao@codesourcery.com>2013-08-09 00:35:40 +0000
committerYao Qi <yao@codesourcery.com>2013-08-09 00:35:40 +0000
commit1ed8d8006b916d7cda234df9660252545051c6fe (patch)
tree5e7f2fa9efb86e4ecfa462e3740772fcadf23de8 /gdb/testsuite/gdb.trace/collection.exp
parenta780258f0e9996592731fe594856f94ce7142001 (diff)
downloadbinutils-gdb-1ed8d8006b916d7cda234df9660252545051c6fe.tar.gz
gdb/
* stack.c (read_frame_arg): Set 'entryval_error' to NULL if 'entryval' is set. gdb/testsuite/ * gdb.trace/collection.exp (gdb_collect_args_test): Set "only" and "both" to 'print entry-values' before selecting trace frame.
Diffstat (limited to 'gdb/testsuite/gdb.trace/collection.exp')
-rw-r--r--gdb/testsuite/gdb.trace/collection.exp16
1 files changed, 16 insertions, 0 deletions
diff --git a/gdb/testsuite/gdb.trace/collection.exp b/gdb/testsuite/gdb.trace/collection.exp
index f6d44ced7e1..ba0ada59bab 100644
--- a/gdb/testsuite/gdb.trace/collection.exp
+++ b/gdb/testsuite/gdb.trace/collection.exp
@@ -128,6 +128,22 @@ proc gdb_collect_args_test { myargs msg } {
# Begin the test.
run_trace_experiment $msg args_test_func
+ # Frame arguments and their entry values are displayed correctly with
+ # various values of "print entry-values" when a trace frame is
+ # selected.
+
+ gdb_test "tfind -1" ".*" ""
+ gdb_test_no_output "set print entry-values only" ""
+ gdb_test "tfind 0" \
+ " \\(argc@entry=\[^,\]*, argi@entry=\[^,\]*, argf@entry=\[^,\]*, argd@entry=\[^,\]*, argstruct@entry=\[^,\]*, argarray@entry=\[^,\]*\\) .*" \
+ "collect $msg: tfind 0 with entry-values only"
+
+ gdb_test "tfind -1" ".*" ""
+ gdb_test_no_output "set print entry-values both" ""
+ gdb_test "tfind 0" \
+ " \\(argc=\[^,\]*, argc@entry=\[^,\]*, argi=\[^,\]*, argi@entry=\[^,\]*, argf=\[^,\]*, argf@entry=\[^,\]*, argd=\[^,\]*, argd@entry=\[^,\]*, argstruct=\[^,\]*, argstruct@entry=\[^,\]*, argarray=\[^,\]*, argarray@entry=\[^,\]*\\) .*" \
+ "collect $msg: tfind 0 with entry-values both"
+
gdb_test "print argc" \
"\\$\[0-9\]+ = 1 '.001'$cr" \
"collect $msg: collected arg char"