* 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:
parent
facc390f02
commit
e22dccb54c
3 changed files with 14 additions and 11 deletions
|
@ -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>
|
2009-03-12 Jerome Guitton <guitton@adacore.com>
|
||||||
|
|
||||||
* ada-lang.c (ada_delta): Change the type of numerators and
|
* ada-lang.c (ada_delta): Change the type of numerators and
|
||||||
|
|
|
@ -226,8 +226,6 @@ struct ada_task_info
|
||||||
CORE_ADDR caller_task;
|
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
|
/* Assuming V points to an array of S objects, make sure that it contains at
|
||||||
least M objects, updating V and S as necessary. */
|
least M objects, updating V and S as necessary. */
|
||||||
|
|
||||||
|
|
|
@ -202,6 +202,15 @@ valid_task_id (int task_num)
|
||||||
&& task_num <= VEC_length (ada_task_info_s, task_list));
|
&& 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,
|
/* Extract the contents of the value as a string whose length is LENGTH,
|
||||||
and store the result in DEST. */
|
and store the result in DEST. */
|
||||||
|
|
||||||
|
@ -662,15 +671,6 @@ ada_build_task_list (int warn_if_null)
|
||||||
return 1;
|
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.
|
/* Print a one-line description of the task whose number is TASKNO.
|
||||||
The formatting should fit the "info tasks" array. */
|
The formatting should fit the "info tasks" array. */
|
||||||
|
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue