[commit/testsuite/ada] minor cleanups

Joel Brobecker brobecker@adacore.com
Wed Dec 26 17:13:00 GMT 2007


I was looking at the testcases that we currently have in gdb.ada, and
found a few little nits that could be cleaned up:

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

Tested on x86-linux. Checked in.

-- 
Joel
-------------- next part --------------
Index: gdb.ada/Makefile.in
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.ada/Makefile.in,v
retrieving revision 1.2
diff -u -p -r1.2 Makefile.in
--- gdb.ada/Makefile.in	3 Feb 2005 03:58:52 -0000	1.2
+++ gdb.ada/Makefile.in	25 Dec 2007 03:54:51 -0000
@@ -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 =
 
Index: gdb.ada/char_param.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.ada/char_param.exp,v
retrieving revision 1.1
diff -u -p -r1.1 char_param.exp
--- gdb.ada/char_param.exp	24 Dec 2007 07:57:00 -0000	1.1
+++ gdb.ada/char_param.exp	25 Dec 2007 03:54:51 -0000
@@ -25,7 +25,7 @@ set srcfile ${srcdir}/${subdir}/${testfi
 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
 }
 
Index: gdb.ada/char_param/pck.ads
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.ada/char_param/pck.ads,v
retrieving revision 1.1
diff -u -p -r1.1 pck.ads
--- gdb.ada/char_param/pck.ads	24 Dec 2007 07:57:00 -0000	1.1
+++ gdb.ada/char_param/pck.ads	25 Dec 2007 03:54:51 -0000
@@ -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 := ' ';


More information about the Gdb-patches mailing list