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

* ada-lang.h (ada_task_is_alive): Remove declaration.
This commit is contained in:
Joel Brobecker 2009-03-13 01:51:17 +00:00
parent facc390f02
commit e22dccb54c
3 changed files with 14 additions and 11 deletions

View file

@ -1,3 +1,8 @@
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

View file

@ -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. */

View file

@ -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. */