* 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.

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index c86189e..5d2be4d 100644 (file)
--- 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 (file)
--- 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" \
          "" \