forked from Imagelibrary/binutils-gdb
Fix break *FUN'address task NUM.
* ada-lex.l (task): New rule.
* ada-lang.c (valid_task_id): Make sure the Ada task list has
been built before using it.
This commit is contained in:
@@ -1,3 +1,10 @@
|
||||
2010-01-01 Joel Brobecker <brobecker@adacore.com>
|
||||
|
||||
Fix break *FUN'address task NUM.
|
||||
* ada-lex.l (task): New rule.
|
||||
* ada-lang.c (valid_task_id): Make sure the Ada task list has
|
||||
been built before using it.
|
||||
|
||||
2009-12-31 Stan Shebs <stan@codesourcery.com>
|
||||
|
||||
Add new tracepoint action teval.
|
||||
|
||||
@@ -160,6 +160,13 @@ if {
|
||||
return 0;
|
||||
}
|
||||
|
||||
task {
|
||||
while (*lexptr != 't' && *lexptr != 'T')
|
||||
lexptr--;
|
||||
yyrestart(NULL);
|
||||
return 0;
|
||||
}
|
||||
|
||||
/* ADA KEYWORDS */
|
||||
|
||||
abs { return ABS; }
|
||||
|
||||
@@ -198,6 +198,7 @@ get_task_number_from_id (CORE_ADDR task_id)
|
||||
int
|
||||
valid_task_id (int task_num)
|
||||
{
|
||||
ada_build_task_list (0);
|
||||
return (task_num > 0
|
||||
&& task_num <= VEC_length (ada_task_info_s, task_list));
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user