Index: gdb/testsuite/gdb.cp/try_catch.exp |
diff --git a/gdb/testsuite/gdb.cp/try_catch.exp b/gdb/testsuite/gdb.cp/try_catch.exp |
index 474d674bc31caf9677faea2f85a380b681de83d4..f6810d02d15400f5d6316ac8e3324314b6461052 100644 |
--- a/gdb/testsuite/gdb.cp/try_catch.exp |
+++ b/gdb/testsuite/gdb.cp/try_catch.exp |
@@ -18,35 +18,22 @@ |
# This file is part of the gdb testsuite |
-if $tracelevel then { |
- strace $tracelevel |
- } |
- |
if { [skip_stl_tests] } { continue } |
# |
# test running programs |
# |
-set testfile "try_catch" |
-set srcfile ${testfile}.cc |
-set binfile ${objdir}/${subdir}/${testfile} |
+standard_testfile .cc |
-if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug c++}] != "" } { |
- untested try_catch.exp |
- return -1 |
+if [get_compiler_info "c++"] { |
+ return -1 |
} |
-if [get_compiler_info ${binfile} "c++"] { |
+if {[prepare_for_testing $testfile.exp $testfile $srcfile {debug c++}]} { |
return -1 |
} |
-gdb_exit |
-gdb_start |
-gdb_reinitialize_dir $srcdir/$subdir |
-gdb_load ${binfile} |
- |
- |
if ![runto_main] then { |
perror "couldn't run to breakpoint" |
continue |