diff options
Diffstat (limited to 'gdb/testsuite/lib/perftest.exp')
| -rw-r--r-- | gdb/testsuite/lib/perftest.exp | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/gdb/testsuite/lib/perftest.exp b/gdb/testsuite/lib/perftest.exp index 7ecd796..14dd057 100644 --- a/gdb/testsuite/lib/perftest.exp +++ b/gdb/testsuite/lib/perftest.exp @@ -129,9 +129,9 @@ namespace eval PerfTest { } } -# Return true if performance tests are skipped. +# Return true if performance tests are to be run. -proc skip_perf_tests { } { +proc allow_perf_tests { } { global GDB_PERFTEST_MODE if [info exists GDB_PERFTEST_MODE] { @@ -139,13 +139,13 @@ proc skip_perf_tests { } { && "$GDB_PERFTEST_MODE" != "run" && "$GDB_PERFTEST_MODE" != "both" } { error "Unknown value of GDB_PERFTEST_MODE." - return 1 + return 0 } - return 0 + return 1 } - return 1 + return 0 } # Given a list of tcl strings, return the same list as the text form of a |