From 383ace49f83190d96ec47b7d8b65e57ff4375c0d Mon Sep 17 00:00:00 2001 From: Joel Brobecker Date: Fri, 13 Mar 2009 02:24:38 +0000 Subject: [PATCH] * 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. --- gdb/testsuite/ChangeLog | 6 ++++++ 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 + * 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 + * gdb.ada/ptype_arith_binop.exp: New testcase. 2009-03-12 Joel Brobecker 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" \ "" \ -- 2.7.4