* ada-tasks.c (ada_task_is_alive): Move up and make static.

        * ada-lang.h (ada_task_is_alive): Remove declaration.

3 files changed, 14 insertions, 11 deletions

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 985f46da7e..4733c177d0 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,5 +1,10 @@
 2009-03-12  Jerome Guitton  <guitton@adacore.com>
 
+	* ada-tasks.c (ada_task_is_alive): Move up and make static.
+	* ada-lang.h (ada_task_is_alive): Remove declaration.
+
+2009-03-12  Jerome Guitton  <guitton@adacore.com>
+
 	* ada-lang.c (ada_delta): Change the type of numerators and
 	denominators to DOUBLEST, as they may not fit into a long.
 	(scaling_factor): Ditto.
diff --git a/gdb/ada-lang.h b/gdb/ada-lang.h
index 946ffccc89..50f90fbcc4 100644
--- a/gdb/ada-lang.h
+++ b/gdb/ada-lang.h
@@ -226,8 +226,6 @@ struct ada_task_info
   CORE_ADDR caller_task;
 };
 
-int ada_task_is_alive (struct ada_task_info *task);
-
 /* Assuming V points to an array of S objects,  make sure that it contains at
    least M objects, updating V and S as necessary. */
 
diff --git a/gdb/ada-tasks.c b/gdb/ada-tasks.c
index 599a17b7fc..d0ce5ab1bd 100644
--- a/gdb/ada-tasks.c
+++ b/gdb/ada-tasks.c
@@ -202,6 +202,15 @@ valid_task_id (int task_num)
           && task_num <= VEC_length (ada_task_info_s, task_list));
 }
 
+/* Return non-zero iff the task STATE corresponds to a non-terminated
+   task state.  */
+
+static int
+ada_task_is_alive (struct ada_task_info *task_info)
+{
+  return (task_info->state != Terminated);
+}
+
 /* Extract the contents of the value as a string whose length is LENGTH,
    and store the result in DEST.  */
 
@@ -662,15 +671,6 @@ ada_build_task_list (int warn_if_null)
   return 1;
 }
 
-/* Return non-zero iff the task STATE corresponds to a non-terminated
-   task state.  */
-
-int
-ada_task_is_alive (struct ada_task_info *task_info)
-{
-  return (task_info->state != Terminated);
-}
-
 /* Print a one-line description of the task whose number is TASKNO.
    The formatting should fit the "info tasks" array.  */