From fb5f3683c3984c670818d49ff90974e8476614ca Mon Sep 17 00:00:00 2001 From: Joel Brobecker Date: Wed, 26 Dec 2007 14:21:53 +0000 Subject: * 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/gdb.ada/Makefile.in | 16 +++++++++++++++- gdb/testsuite/gdb.ada/char_param.exp | 2 +- gdb/testsuite/gdb.ada/char_param/pck.ads | 2 -- 3 files changed, 16 insertions(+), 4 deletions(-) (limited to 'gdb/testsuite/gdb.ada') diff --git a/gdb/testsuite/gdb.ada/Makefile.in b/gdb/testsuite/gdb.ada/Makefile.in index 3d2a99c..cbde096 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 cb66d0e..d1ad947 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 4ad66c6..4c61ae5 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 . -with System; - package Pck is Procedure_Result : Character := ' '; -- cgit v1.1