diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 2ea6940ac1..1e1ee53674 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+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.
diff --git a/gdb/testsuite/gdb.base/solib-corrupted.exp b/gdb/testsuite/gdb.base/solib-corrupted.exp
index 33192bc971..3e3a6bb86f 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]