From a884434d1976a833c15c08bb82fd29def21333ee Mon Sep 17 00:00:00 2001 From: Tom Tromey Date: Mon, 25 Jun 2012 20:28:23 +0000 Subject: [PATCH] * gdb.modula2/unbounded-array.exp: Use standard_testfile, prepare_for_testing. --- gdb/testsuite/ChangeLog | 5 +++++ gdb/testsuite/gdb.modula2/unbounded-array.exp | 13 +++---------- 2 files changed, 8 insertions(+), 10 deletions(-) diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 0f59fac5427..240cd50f29c 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2012-06-25 Tom Tromey + + * gdb.modula2/unbounded-array.exp: Use standard_testfile, + prepare_for_testing. + 2012-06-25 Tom Tromey * gdb.opt/clobbered-registers-O2.exp: Use standard_testfile, diff --git a/gdb/testsuite/gdb.modula2/unbounded-array.exp b/gdb/testsuite/gdb.modula2/unbounded-array.exp index 3ab17f6a855..38dcf8fb0d5 100644 --- a/gdb/testsuite/gdb.modula2/unbounded-array.exp +++ b/gdb/testsuite/gdb.modula2/unbounded-array.exp @@ -17,20 +17,13 @@ # the elements of an unbounded array using the Modula-2 language mode of # gdb. -set testfile "unbounded1" -set srcfile ${testfile}.c -set binfile ${objdir}/${subdir}/${testfile} +standard_testfile unbounded1.c -if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug quiet}] != "" } { - untested "Couldn't compile ${srcfile}" +if {[prepare_for_testing $testfile.exp $testfile $srcfile {debug quiet}]} { + untested $testfile.exp return -1 } -gdb_exit -gdb_start -gdb_reinitialize_dir $srcdir/$subdir -gdb_load ${binfile} - if ![runto foo] then { perror "couldn't run to breakpoint foo" continue -- 2.30.2