Fix break *FUN'address thread NUM.

* ada-lex.l (task): Expand rule to also match the thread keyword.
This commit is contained in:
Joel Brobecker 2010-01-01 06:29:10 +00:00
parent 70575d34a7
commit b9ee22330a
2 changed files with 8 additions and 1 deletions

View File

@ -1,3 +1,8 @@
2010-01-01 Joel Brobecker <brobecker@adacore.com>
Fix break *FUN'address thread NUM.
* ada-lex.l (task): Expand rule to also match the thread keyword.
2010-01-01 Joel Brobecker <brobecker@adacore.com>
Fix break *FUN'address task NUM.

View File

@ -160,7 +160,9 @@ if {
return 0;
}
task {
(task|thread) {
/* This keyword signals the end of the expression and
will be processed separately. */
while (*lexptr != 't' && *lexptr != 'T')
lexptr--;
yyrestart(NULL);