From 383ace49f83190d96ec47b7d8b65e57ff4375c0d Mon Sep 17 00:00:00 2001
From: Joel Brobecker <brobecker@gnat.com>
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 c86189e056a..5d2be4ddc36 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,9 @@
+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.
diff --git a/gdb/testsuite/gdb.ada/ptype_arith_binop.exp b/gdb/testsuite/gdb.ada/ptype_arith_binop.exp
index ec752b50477..4fb61e0cb66 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.30.2