mirror of
https://sourceware.org/git/binutils-gdb.git
synced 2025-03-01 13:26:47 +08:00
* gdb.modula2/unbounded-array.exp: Use standard_testfile,
prepare_for_testing.
This commit is contained in:
parent
efc9d70a28
commit
a884434d19
@ -1,3 +1,8 @@
|
||||
2012-06-25 Tom Tromey <tromey@redhat.com>
|
||||
|
||||
* gdb.modula2/unbounded-array.exp: Use standard_testfile,
|
||||
prepare_for_testing.
|
||||
|
||||
2012-06-25 Tom Tromey <tromey@redhat.com>
|
||||
|
||||
* gdb.opt/clobbered-registers-O2.exp: Use standard_testfile,
|
||||
|
@ -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
|
||||
|
Loading…
Reference in New Issue
Block a user