diff options
| -rw-r--r-- | gdb/testsuite/ChangeLog | 6 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.ada/ptype_arith_binop.exp | 19 |
2 files changed, 6 insertions, 19 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index c86189e..5d2be4d 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,5 +1,11 @@ 2009-03-12 Joel Brobecker <brobecker@adacore.com> + * gdb.ada/ptype_arith_binop.exp: Remove some commented-out code + that was checked in by mistake. Remove loading of ada.exp, since + this is not necessary in this case. + +2009-03-12 Joel Brobecker <brobecker@adacore.com> + * gdb.ada/ptype_arith_binop.exp: New testcase. 2009-03-12 Joel Brobecker <brobecker@adacore.com> diff --git a/gdb/testsuite/gdb.ada/ptype_arith_binop.exp b/gdb/testsuite/gdb.ada/ptype_arith_binop.exp index ec752b5..4fb61e0 100644 --- a/gdb/testsuite/gdb.ada/ptype_arith_binop.exp +++ b/gdb/testsuite/gdb.ada/ptype_arith_binop.exp @@ -17,28 +17,9 @@ if $tracelevel then { strace $tracelevel } -load_lib "ada.exp" - -# set testdir "array_bounds" -# set testfile "${testdir}/bar" -# set srcfile ${srcdir}/${subdir}/${testfile}.adb -# set binfile ${objdir}/${subdir}/${testfile} -# -# file mkdir ${objdir}/${subdir}/${testdir} -# if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug ]] != "" } { -# return -1 -# } - gdb_exit gdb_start gdb_reinitialize_dir $srcdir/$subdir -# gdb_load ${binfile} - -#set bp_location [gdb_get_line_number "STOP" ${testdir}/bar.adb] -#if ![runto "bar.adb:$bp_location" ] then { -# perror "Couldn't run ${testfile}" -# return -#} gdb_test "set lang ada" \ "" \ |