diff options
-rw-r--r-- | gdb/testsuite/ChangeLog | 8 | ||||
-rw-r--r-- | gdb/testsuite/gdb.ada/Makefile.in | 16 | ||||
-rw-r--r-- | gdb/testsuite/gdb.ada/char_param.exp | 2 | ||||
-rw-r--r-- | 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 3b816aa..8f561e4 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 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 <http://www.gnu.org/licenses/>. -with System; - package Pck is Procedure_Result : Character := ' '; |