This is the mail archive of the
gdb-patches@sourceware.org
mailing list for the GDB project.
[pushed] Fix gdb.base/solib-corrupted.exp after dtrace probes changes
- From: Pedro Alves <palves at redhat dot com>
- To: gdb-patches at sourceware dot org
- Date: Fri, 20 Feb 2015 23:26:04 +0000
- Subject: [pushed] Fix gdb.base/solib-corrupted.exp after dtrace probes changes
- Authentication-results: sourceware.org; auth=none
Commit 6f9b8491 (Adapt `info probes' to support printing probes of
different types.) added a new type column to "info probes". That
caused a solib-corrupted.exp regression:
~~~~~~~~~~~~~~~~~~~~~
Running /home/pedro/gdb/mygit/src/gdb/testsuite/gdb.base/solib-corrupted.exp ...
FAIL: gdb.base/solib-corrupted.exp: corrupted list
=== gdb Summary ===
# of expected passes 2
# of unexpected failures 1
~~~~~~~~~~~~~~~~~~~~~
Tested on x86_64 Fedora 20.
gdb/testsuite/ChangeLog:
2015-02-20 Pedro Alves <palves@redhat.com>
* gdb.base/solib-corrupted.exp: Expect "stap" as first column of
info probes.
---
gdb/testsuite/ChangeLog | 5 +++++
gdb/testsuite/gdb.base/solib-corrupted.exp | 2 +-
2 files changed, 6 insertions(+), 1 deletion(-)
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 2ea6940..1e1ee53 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,5 +1,10 @@
2015-02-20 Pedro Alves <palves@redhat.com>
+ * gdb.base/solib-corrupted.exp: Expect "stap" as first column of
+ info probes.
+
+2015-02-20 Pedro Alves <palves@redhat.com>
+
* gdb.threads/multi-create-ns-info-thr.exp: New file.
2015-02-20 Pedro Alves <palves@redhat.com>
diff --git a/gdb/testsuite/gdb.base/solib-corrupted.exp b/gdb/testsuite/gdb.base/solib-corrupted.exp
index 33192bc..3e3a6bb 100644
--- a/gdb/testsuite/gdb.base/solib-corrupted.exp
+++ b/gdb/testsuite/gdb.base/solib-corrupted.exp
@@ -44,7 +44,7 @@ set probes { init_start init_complete map_start reloc_complete unmap_start
unmap_complete }
set test "info probes"
gdb_test_multiple $test $test {
- -re "^rtld\[ \t\]+(?:rtld_)?(\[a-z_\]+)\[ \t\]" {
+ -re "^stap\[ \t\]+rtld\[ \t\]+(?:rtld_)?(\[a-z_\]+)\[ \t\]" {
set idx [lsearch -exact $probes $expect_out(1,string)]
if { $idx >= 0 } {
set probes [lreplace $probes $idx $idx]
--
1.9.3