Index: gdb/testsuite/gdb.reverse/i387-env-reverse.exp |
diff --git a/gdb/testsuite/gdb.reverse/i387-env-reverse.exp b/gdb/testsuite/gdb.reverse/i387-env-reverse.exp |
index 097df644bf061127ddce905c20ba78b9ab88d498..3e9774a2548f15520dd03844bfff22a497d0e04f 100644 |
--- a/gdb/testsuite/gdb.reverse/i387-env-reverse.exp |
+++ b/gdb/testsuite/gdb.reverse/i387-env-reverse.exp |
@@ -15,34 +15,22 @@ |
# This file is part of the gdb testsuite. |
-if $tracelevel { |
- strace $tracelevel |
-} |
- |
if ![istarget "i?86-*linux*"] then { |
verbose "Skipping i387 reverse float tests." |
return |
} |
-set testfile "i387-env-reverse" |
-set srcfile ${testfile}.c |
-set binfile ${objdir}/${subdir}/${testfile} |
+standard_testfile |
# some targets have leading underscores on assembly symbols. |
set additional_flags [gdb_target_symbol_prefix_flags] |
-if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable [list debug $additional_flags]] != "" } { |
- untested ${testfile}.exp |
+if {[prepare_for_testing $testfile.exp $testfile $srcfile \ |
+ [list debug $additional_flags]]} { |
return -1 |
} |
-# Get things started. |
- |
-gdb_exit |
-gdb_start |
-gdb_reinitialize_dir $srcdir/$subdir |
-gdb_load ${binfile} |
runto main |
# Record to end of main |