Import ada-lang.c, ada-tasks.c and ada-valprint.c from mainline.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index c496b513db63fdb839d018cedb8fd0b1b38794c1..4b2ef1b53f7b7a301ece36338c1f8b70e9571202 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,5 +1,7 @@
 2002-09-18  Andrew Cagney  <ac131313@redhat.com>
 
+       * ada-lang.c, ada-tasks.c, ada-valprint.c: Import from mainline.
+
        * infrun.c (signal_stop_update): Convert definition to ISO C.
        (signal_print_update): Ditto.
        (signal_pass_update): Ditto.

diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index c58d46338ea48c56ffc99775232a837901c2f303..2838df7e68c667f0f2235e00df186a1d6a65f345 100644 (file)
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -1852,10 +1852,7 @@ ada_array_bound_from_type (struct type * arr_type, int n, int which,
    supplied by run-time quantities other than discriminants. */
 
 struct value *
-ada_array_bound (arr, n, which)
-     struct value *arr;
-     int n;
-     int which;
+ada_array_bound (struct value *arr, int n, int which)
 {
   struct type *arr_type = VALUE_TYPE (arr);
 
@@ -2334,10 +2331,7 @@ ada_resolve_subexp (struct expression **expp, int *pos, int deprocedure_p,
    liberal.  FIXME: TOO liberal, in fact. */
 
 static int
-ada_type_match (ftype, atype, may_deref)
-     struct type *ftype;
-     struct type *atype;
-     int may_deref;
+ada_type_match (struct type *ftype, struct type *atype, int may_deref)
 {
   CHECK_TYPEDEF (ftype);
   CHECK_TYPEDEF (atype);
@@ -8104,7 +8098,7 @@ const struct language_defn ada_language_defn = {
 };
 
 void
-_initialize_ada_language ()
+_initialize_ada_language (void)
 {
   builtin_type_ada_int =
     init_type (TYPE_CODE_INT, TARGET_INT_BIT / TARGET_CHAR_BIT,

diff --git a/gdb/ada-tasks.c b/gdb/ada-tasks.c
index eccd5a1c2146ab3e3a51a34469a628cda700f91d..2e6bff3b18e7809766c2a31c2fff2493a442c61f 100644 (file)
--- a/gdb/ada-tasks.c
+++ b/gdb/ada-tasks.c
@@ -270,7 +270,7 @@ get_self_id (void)
 }
 
 int
-get_current_task ()
+get_current_task (void)
 {
   int result;
 

diff --git a/gdb/ada-valprint.c b/gdb/ada-valprint.c
index fc2db70303592a79a53e59b3d9bf67ab672a0564..0a0c99add1eb59f097e86dcfcd14a4a508425f32 100644 (file)
--- a/gdb/ada-valprint.c
+++ b/gdb/ada-valprint.c
@@ -75,8 +75,7 @@ static int ada_val_print_1 (struct type *, char *, int, CORE_ADDR,
 
 /* Make TYPE unsigned if its range of values includes no negatives. */
 static void
-adjust_type_signedness (type)
-     struct type *type;
+adjust_type_signedness (struct type *type)
 {
   if (type != NULL && TYPE_CODE (type) == TYPE_CODE_RANGE
       && TYPE_LOW_BOUND (type) >= 0)