From fb5f3683c3984c670818d49ff90974e8476614ca Mon Sep 17 00:00:00 2001
From: Joel Brobecker <brobecker@gnat.com>
Date: Wed, 26 Dec 2007 14:21:53 +0000
Subject: [PATCH]         * gdb.ada/Makefile.in (EXECUTABLES): Update list.    
     * gdb.ada/char_param.exp: Do not compile our test program with        
 -gnata, this is unnecessary.         * gdb.ada/char_param/pck.ads: Remove
 unnecessary "with".

---
 gdb/testsuite/ChangeLog                  |  8 +++++++-
 gdb/testsuite/gdb.ada/Makefile.in        | 16 +++++++++++++++-
 gdb/testsuite/gdb.ada/char_param.exp     |  2 +-
 gdb/testsuite/gdb.ada/char_param/pck.ads |  2 --
 4 files changed, 23 insertions(+), 5 deletions(-)

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 3b816aa56e3..8f561e41fcf 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,10 @@
+2007-12-26  Joel Brobecker  <brobecker@adacore.com>
+
+	* gdb.ada/Makefile.in (EXECUTABLES): Update list.
+	* gdb.ada/char_param.exp: Do not compile our test program with
+	-gnata, this is unnecessary.
+	* gdb.ada/char_param/pck.ads: Remove unnecessary "with".
+
 2007-12-24  Joel Brobecker  <brobecker@adacore.com>
 
 	* gdb.ada/print_chars/pck.ads, gdb.ada/print_chars/pck.adb,
@@ -39,7 +46,6 @@
 	* gdb.base/expand-psymtabs.exp: New testcase
 	expect file.
 
-
 2007-12-17  Luis Machado  <luisgpm@br.ibm.com>
 
 	* testsuite/gdb.base/watch_thread_num.c: New testcase source file.
diff --git a/gdb/testsuite/gdb.ada/Makefile.in b/gdb/testsuite/gdb.ada/Makefile.in
index 3d2a99cd42f..cbde096f0a5 100644
--- a/gdb/testsuite/gdb.ada/Makefile.in
+++ b/gdb/testsuite/gdb.ada/Makefile.in
@@ -1,7 +1,21 @@
 VPATH = @srcdir@
 srcdir = @srcdir@
 
-EXECUTABLES = null_record/null_record fixed_points/fixed_points
+EXECUTABLES = \
+  array_return/p \
+  arrayidx/p \
+  catch_ex/foo \
+  char_param/foo \
+  exec_changed/common \
+  exec_changed/first \
+  exec_changed/second \
+  fixed_points/fixed_points \
+  frame_args/foo \
+  null_record/null_record \
+  packed_array/pa \
+  print_chars/foo \
+  start/dummy \
+  watch_arg/watch
 
 MISCELLANEOUS =
 
diff --git a/gdb/testsuite/gdb.ada/char_param.exp b/gdb/testsuite/gdb.ada/char_param.exp
index cb66d0e9c7f..d1ad9476780 100644
--- a/gdb/testsuite/gdb.ada/char_param.exp
+++ b/gdb/testsuite/gdb.ada/char_param.exp
@@ -25,7 +25,7 @@ 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 additional_flags=-gnata ]] != "" } {
+if {[gdb_compile_ada "${srcfile}" "${binfile}" executable [list debug]] != "" } {
   return -1
 }
 
diff --git a/gdb/testsuite/gdb.ada/char_param/pck.ads b/gdb/testsuite/gdb.ada/char_param/pck.ads
index 4ad66c6f012..4c61ae50fab 100644
--- a/gdb/testsuite/gdb.ada/char_param/pck.ads
+++ b/gdb/testsuite/gdb.ada/char_param/pck.ads
@@ -13,8 +13,6 @@
 --  You should have received a copy of the GNU General Public License
 --  along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
-with System;
-
 package Pck is
 
    Procedure_Result : Character := ' ';
-- 
2.30.2