gdb/testsuite: Make test names unique in gdb.reverse tests

[deliverable/binutils-gdb.git] / gdb / testsuite / gdb.reverse / break-reverse.exp

diff --git a/gdb/testsuite/gdb.reverse/break-reverse.exp b/gdb/testsuite/gdb.reverse/break-reverse.exp
index db8f351b0890aa35fcfa9d45a249d7cab2902311..602b6e6317a9058d8dd5de8fa659c2e50d7fb2be 100644 (file)
--- a/gdb/testsuite/gdb.reverse/break-reverse.exp
+++ b/gdb/testsuite/gdb.reverse/break-reverse.exp
@@ -1,4 +1,4 @@
-#   Copyright 2008, 2009 Free Software Foundation, Inc.
+#   Copyright 2008-2019 Free Software Foundation, Inc.
 
 # This program is free software; you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
@@ -16,14 +16,13 @@
 # This file is part of the GDB testsuite.  It tests reverse debugging
 # with breakpoints.
 
-if ![target_info exists gdb,can_reverse] {
+if ![supports_reverse] {
     return
 }
 
-set testfile "break-reverse"
-set srcfile  ${testfile}.c
+standard_testfile
 
-if { [prepare_for_testing $testfile.exp $testfile $srcfile] } {
+if { [prepare_for_testing "failed to prepare" $testfile $srcfile] } {
     return -1
 }
 
@@ -34,10 +33,9 @@ set end_location  [gdb_get_line_number "end of main"  ]
 
 runto main
 
-if [target_info exists gdb,use_precord] {
+if [supports_process_record] {
     # Activate process record/replay
-    gdb_test "record" "" "Turn on process record"
-    # FIXME: command ought to acknowledge, so we can test if it succeeded.
+    gdb_test_no_output "record" "turn on process record"
 }
 
 gdb_test "break foo" \
@@ -50,20 +48,22 @@ gdb_test "break bar" \
 
 gdb_test "break $end_location" \
     "Breakpoint $decimal at .* line $end_location\." \
-    set breakpoint at end of main"
+    "set breakpoint at end of main"
 
-gdb_continue_to_breakpoint "foo" ".*/$srcfile:$foo_location.*"
-gdb_continue_to_breakpoint "bar" ".*/$srcfile:$bar_location.*"
-gdb_continue_to_breakpoint "end" ".*/$srcfile:$end_location.*"
+gdb_continue_to_breakpoint "foo forward, the first time" \
+    ".*$srcfile:$foo_location.*"
+gdb_continue_to_breakpoint "bar forward, the first time" \
+    ".*$srcfile:$bar_location.*"
+gdb_continue_to_breakpoint "end forward, the first time" \
+    ".*$srcfile:$end_location.*"
 
-# FIXME 'set exec-dir' command should give some output so we can test.
-gdb_test "set exec-direction reverse" "" "set reverse"
+gdb_test_no_output "set exec-direction reverse" "set reverse"
 
-gdb_continue_to_breakpoint "bar backward"  ".*/$srcfile:$bar_location.*"
-gdb_continue_to_breakpoint "foo backward"  ".*/$srcfile:$foo_location.*"
+gdb_continue_to_breakpoint "bar backward"  ".*$srcfile:$bar_location.*"
+gdb_continue_to_breakpoint "foo backward"  ".*$srcfile:$foo_location.*"
 
 gdb_test_multiple "continue" "main backward" {
-    -re ".*Breakpoint $decimal,.*/$srcfile:$main_location.*$gdb_prompt $" {
+    -re ".*Breakpoint $decimal,.*$srcfile:$main_location.*$gdb_prompt $" {
        pass "main backward"
     }
     -re "No more reverse-execution history.* break in main .*$gdb_prompt $" {
@@ -71,13 +71,15 @@ gdb_test_multiple "continue" "main backward" {
     }
 }
 
-gdb_test "set exec-direction forward" "" "set forward"
+gdb_test_no_output "set exec-direction forward" "set forward"
 
-gdb_continue_to_breakpoint "foo" ".*/$srcfile:$foo_location.*"
-gdb_continue_to_breakpoint "bar" ".*/$srcfile:$bar_location.*"
+gdb_continue_to_breakpoint "foo forward again" \
+    ".*$srcfile:$foo_location.*"
+gdb_continue_to_breakpoint "bar forward again" \
+    ".*$srcfile:$bar_location.*"
 
 gdb_test_multiple "continue" "end of record log" {
-    -re ".*Breakpoint $decimal,.*/$srcfile:$end_location.*$gdb_prompt $" {
+    -re ".*Breakpoint $decimal,.*$srcfile:$end_location.*$gdb_prompt $" {
        pass "end of record log"
     }
     -re "No more reverse-execution history.* end of main .*$gdb_prompt $" {