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

Fix clean_restart <absolute filename> in the test-cases in gdb.perf.

Tested on x86_64-linux using check-perf.

diff --git a/gdb/testsuite/gdb.perf/backtrace.exp b/gdb/testsuite/gdb.perf/backtrace.exp
index 9ec099ffe01081b08966f78b5bd1097773f0a28e..212298e55d6fa5c167c3312a16787034800aeb1b 100644 (file)
--- a/gdb/testsuite/gdb.perf/backtrace.exp
+++ b/gdb/testsuite/gdb.perf/backtrace.exp
@@ -47,7 +47,7 @@ PerfTest::assemble {
 } {
     global binfile
 
-    clean_restart $binfile
+    clean_restart $::testfile
 
     if ![runto_main] {
        return -1

diff --git a/gdb/testsuite/gdb.perf/single-step.exp b/gdb/testsuite/gdb.perf/single-step.exp
index 920cf9d83d1b4f3ee98a634c46b985fa0acb5cc7..354203ed136d7d128113e83f013f5c98f2fa140d 100644 (file)
--- a/gdb/testsuite/gdb.perf/single-step.exp
+++ b/gdb/testsuite/gdb.perf/single-step.exp
@@ -39,7 +39,7 @@ PerfTest::assemble {
     return 0
 } {
     global binfile
-    clean_restart $binfile
+    clean_restart $::testfile
 
     if ![runto_main] {
        return -1

diff --git a/gdb/testsuite/gdb.perf/skip-command.exp b/gdb/testsuite/gdb.perf/skip-command.exp
index b82d31824ac8de80a5e02c1aa7003178a7bbce24..99ecad8f88902dbcca8508cb9d0e885db6bb4c1d 100644 (file)
--- a/gdb/testsuite/gdb.perf/skip-command.exp
+++ b/gdb/testsuite/gdb.perf/skip-command.exp
@@ -120,7 +120,7 @@ PerfTest::assemble {
     return 0
 } {
     global binfile
-    clean_restart $binfile
+    clean_restart $::testfile
     return 0
 } {
     global SKIP_STEP_COUNT SKIP_DIRECTIVE_COUNT

diff --git a/gdb/testsuite/gdb.perf/skip-prologue.exp b/gdb/testsuite/gdb.perf/skip-prologue.exp
index 50df93a1018aded21ac32e3e7710faeeefbc8e5c..dbeb9f8ecb358e41251ad1616b884dfbd2e7f188 100644 (file)
--- a/gdb/testsuite/gdb.perf/skip-prologue.exp
+++ b/gdb/testsuite/gdb.perf/skip-prologue.exp
@@ -51,7 +51,7 @@ PerfTest::assemble {
     global binfile
     global gdb_prompt
 
-    clean_restart $binfile
+    clean_restart $::testfile
 
     if ![runto_main] {
        return -1

diff --git a/gdb/testsuite/gdb.perf/solib.exp b/gdb/testsuite/gdb.perf/solib.exp
index 45f9330d600eec5b81f6c43cfbce8a5a1d114886..1775bf6b8567ae3815b1c8159be4e99d9818f2db 100644 (file)
--- a/gdb/testsuite/gdb.perf/solib.exp
+++ b/gdb/testsuite/gdb.perf/solib.exp
@@ -72,7 +72,7 @@ PerfTest::assemble {
 } {
     global binfile
 
-    clean_restart $binfile
+    clean_restart $::testfile
 
     if ![runto_main] {
        return -1

diff --git a/gdb/testsuite/gdb.perf/template-breakpoints.exp b/gdb/testsuite/gdb.perf/template-breakpoints.exp
index 7d66e0f12e73da3bf2e5ede73acbeb877589b8be..db57731f4029038ad3ae736a88adc4eef0c8367e 100644 (file)
--- a/gdb/testsuite/gdb.perf/template-breakpoints.exp
+++ b/gdb/testsuite/gdb.perf/template-breakpoints.exp
@@ -47,7 +47,7 @@ PerfTest::assemble {
 } {
        global binfile
 
-       clean_restart $binfile
+       clean_restart $::testfile
 
        if ![runto_main] {
                return -1