diff options
| author | Marcin Kościelnicki <koriakin@0x04.net> | 2015-11-09 14:52:13 +0100 |
|---|---|---|
| committer | Marcin Kościelnicki <koriakin@0x04.net> | 2016-03-29 23:08:05 +0200 |
| commit | a4105d04e19efdf89d0fa56b62675d7d7ee82a9b (patch) | |
| tree | d98932a5e0a2a8c44dbf9b7d477f2a25475d5b18 /gdb/testsuite/gdb.trace/mi-trace-frame-collected.exp | |
| parent | 444bca650a302ae800bd7e7d3fba50e072f555df (diff) | |
| download | binutils-gdb-a4105d04e19efdf89d0fa56b62675d7d7ee82a9b.tar.gz | |
gdbserver/s390: Switch on tracepoint support.
Also adds s390 support to gdb.trace testsuite.
gdb/gdbserver/ChangeLog:
* linux-s390-low.c (s390_supports_tracepoints): New function.
(struct linux_target_ops): Fill supports_tracepoints hook.
gdb/testsuite/ChangeLog:
* gdb.trace/ftrace.exp: Set arg0exp for s390.
* gdb.trace/mi-trace-frame-collected.exp: Expect 4 registers on s390.
* gdb.trace/mi-trace-unavailable.exp: Set pcnum for s390, add gpr0num
variable for GPR 0 instead of assuming it is register 0.
* gdb.trace/trace-common.h: Add s390 fast tracepoint placeholder.
* lib/trace-support.exp: Add s390 registers.
Diffstat (limited to 'gdb/testsuite/gdb.trace/mi-trace-frame-collected.exp')
| -rw-r--r-- | gdb/testsuite/gdb.trace/mi-trace-frame-collected.exp | 15 |
1 files changed, 14 insertions, 1 deletions
diff --git a/gdb/testsuite/gdb.trace/mi-trace-frame-collected.exp b/gdb/testsuite/gdb.trace/mi-trace-frame-collected.exp index 0daaa257d80..a69c329a54e 100644 --- a/gdb/testsuite/gdb.trace/mi-trace-frame-collected.exp +++ b/gdb/testsuite/gdb.trace/mi-trace-frame-collected.exp @@ -91,10 +91,23 @@ proc test_trace_frame_collected { data_source } { ".*\\^done,found=\"1\",tracepoint=\"${decimal}\",traceframe=\"0\",frame=\{.*" \ "-trace-find frame-number 0" + set reg_pattern "\{number=\"$decimal\",value=\"$hex\"\}" + # Test MI command '-trace-frame-collected' dumps only # collected registers. + if { [istarget "s390*-*-*"] } { + # Only PC is collected, but on s390 PC is a pseudo-register - + # collecting it also collects the underlying PSWA register. + if { "$data_source" != "tfile" } { + set reg_pattern "$reg_pattern,$reg_pattern" + } else { + # For tfile, PSWM and CC are also guessed. + set reg_pattern "$reg_pattern,$reg_pattern,$reg_pattern,$reg_pattern" + } + } + mi_gdb_test "-trace-frame-collected" \ - "\\^done,explicit-variables=\\\[\{name=\"gdb_char_test\",value=\".*\"\}\\\],computed-expressions=\\\[\\\],registers=\\\[\{number=\"$decimal\",value=\"$hex\"\}\\\],tvars=\\\[\\\],memory=\\\[\{address=\"$hex\",length=\"1\"\}\\\]"\ + "\\^done,explicit-variables=\\\[\{name=\"gdb_char_test\",value=\".*\"\}\\\],computed-expressions=\\\[\\\],registers=\\\[$reg_pattern\\\],tvars=\\\[\\\],memory=\\\[\{address=\"$hex\",length=\"1\"\}\\\]"\ "-trace-frame-collected (register)" mi_gdb_test "-trace-find frame-number 1" \ |