aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJoel Brobecker <brobecker@gnat.com>2009-03-13 01:51:17 +0000
committerJoel Brobecker <brobecker@gnat.com>2009-03-13 01:51:17 +0000
commite22dccb54c00bd39b48bbcf07cafc13b522ab857 (patch)
tree67e7f72e8692880614d45c18551c4fd507f31497
parentfacc390f025eafceabfe087e0fb241a8f2d90e32 (diff)
downloadgdb-e22dccb54c00bd39b48bbcf07cafc13b522ab857.zip
gdb-e22dccb54c00bd39b48bbcf07cafc13b522ab857.tar.gz
gdb-e22dccb54c00bd39b48bbcf07cafc13b522ab857.tar.bz2
* ada-tasks.c (ada_task_is_alive): Move up and make static.
* ada-lang.h (ada_task_is_alive): Remove declaration.
-rw-r--r--gdb/ChangeLog5
-rw-r--r--gdb/ada-lang.h2
-rw-r--r--gdb/ada-tasks.c18
3 files changed, 14 insertions, 11 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 985f46d..4733c17 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 946ffcc..50f90fb 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 599a17b..d0ce5ab 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. */