[gdb/testsuite] Fix clean_restart <absolute filename> in gdb.replay

Fix clean_restart <absolute filename> in the test-case in gdb.replay.

Tested on x86_64-linux, with target boards unix, native-gdbserver and
native-extended-gdbserver.

diff --git a/gdb/testsuite/gdb.replay/connect.exp b/gdb/testsuite/gdb.replay/connect.exp
index 26b7aa3dfe7f12e6cea16a2606960425f1776679..b25c372f85cbc6bc601c72ac6c84e8f040371e0f 100644 (file)
--- a/gdb/testsuite/gdb.replay/connect.exp
+++ b/gdb/testsuite/gdb.replay/connect.exp
@@ -70,9 +70,8 @@ proc_with_prefix record_initial_logfile {} {
 # Connect to gdbreply using the global REMOTELOG.  Runs to a breakpoint
 # in main.
 proc_with_prefix replay_without_error {} {
-    global binfile
     global remotelog
-    clean_restart $binfile
+    clean_restart $::testfile
     # Make sure we're disconnected, in case we're testing with an
     # extended-remote board, therefore already connected.
     gdb_test "disconnect" ".*"
@@ -97,7 +96,6 @@ proc_with_prefix replay_without_error {} {
 # copy of REMOTELOG.  Attempt to connect to the remote and expect to see
 # the error reported by GDB.
 proc_with_prefix replay_with_mustreplyempty_error {} {
-    global binfile
     global remotelog
     global testfile
     set newline E.errtext
@@ -107,7 +105,7 @@ proc_with_prefix replay_with_mustreplyempty_error {} {
     # the vMustReplayEmty packet to an error.
     update_log $remotelog $output_file "vMustReplyEmpty" $newline
 
-    clean_restart $binfile
+    clean_restart $::testfile
     # Make sure we're disconnected, in case we're testing with an
     # extended-remote board, therefore already connected.
     gdb_test "disconnect" ".*"