Fix more cases of improper test names

[deliverable/binutils-gdb.git] / gdb / testsuite / gdb.btrace / delta.exp

diff --git a/gdb/testsuite/gdb.btrace/delta.exp b/gdb/testsuite/gdb.btrace/delta.exp
index 5c3505c8f425565723b91d28ed0a4efd8cf913aa..58d017e194b9cc8cb1ede1dd449150e8b9f38757 100644 (file)
--- a/gdb/testsuite/gdb.btrace/delta.exp
+++ b/gdb/testsuite/gdb.btrace/delta.exp
@@ -1,6 +1,6 @@
 # This testcase is part of GDB, the GNU debugger.
 #
-# Copyright 2013 Free Software Foundation, Inc.
+# Copyright 2013-2016 Free Software Foundation, Inc.
 #
 # Contributed by Intel Corp. <markus.t.metzger@intel.com>
 #
@@ -21,8 +21,8 @@
 if { [skip_btrace_tests] } { return -1 }
 
 # start inferior
-standard_testfile x86-record_goto.S
-if [prepare_for_testing delta.exp $testfile $srcfile] {
+standard_testfile record_goto.c
+if [prepare_for_testing "failed to prepare" $testfile $srcfile] {
     return -1
 }
 if ![runto_main] {
@@ -37,10 +37,11 @@ gdb_test_no_output "record btrace"
 
 # we start without trace
 with_test_prefix "no trace" {
-  gdb_test "info record" [join [list \
+  gdb_test "info record" [multi_line \
     "Active record target: record-btrace" \
-    "Recorded 0 instructions in 0 functions for .*" \
-    ] "\r\n"]
+    "Recording format: .*" \
+    "Recorded 0 instructions in 0 functions \\\(0 gaps\\\) for .*" \
+    ]
   gdb_test "record instruction-history" "No trace\."
   gdb_test "record function-call-history" "No trace\."
 }
@@ -49,10 +50,11 @@ with_test_prefix "no trace" {
 gdb_test "stepi"
 
 proc check_trace {} {
-  gdb_test "info record" [join [list \
+  gdb_test "info record" [multi_line \
     "Active record target: record-btrace" \
-    "Recorded 1 instructions in 1 functions for .*" \
-    ] "\r\n"]
+    "Recording format: .*" \
+    "Recorded 1 instructions in 1 functions \\\(0 gaps\\\) for .*" \
+    ]
   gdb_test "record instruction-history /f 1" \
     "1\t   0x\[0-9a-f\]+ <\\+\[0-9\]+>:\tmov *\\\$0x0,%eax\r"
   gdb_test "record function-call-history /c 1" "1\tmain"
@@ -69,15 +71,17 @@ with_test_prefix "twice" {
 
 # check that we can reverse-stepi that instruction
 gdb_test "reverse-stepi"
-gdb_test "info record" [join [list \
+gdb_test "info record" [multi_line \
   "Active record target: record-btrace" \
-  "Recorded 1 instructions in 1 functions for .*" \
+  "Recording format: .*" \
+  "Recorded 1 instructions in 1 functions \\\(0 gaps\\\) for .*" \
   "Replay in progress\.  At instruction 1\." \
-  ] "\r\n"] "reverse-stepi"
+  ] "reverse-stepi"
 
 # and back
 gdb_test "stepi"
-gdb_test "info record" [join [list \
+gdb_test "info record" [multi_line \
   "Active record target: record-btrace" \
-  "Recorded 1 instructions in 1 functions for .*" \
-  ] "\r\n"] "and back"
+  "Recording format: .*" \
+  "Recorded 1 instructions in 1 functions \\\(0 gaps\\\) for .*" \
+  ] "and back"