From: Joel Brobecker <brobecker@gnat.com>
Date: Fri, 1 Jan 2010 06:06:49 +0000 (+0000)
Subject: Fix break *FUN'address task NUM.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=70575d34a7b50192b3cb94c384fa502e641e5607;p=binutils-gdb.git

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.
---

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 753fbb0cc0a..f9163588284 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -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.
diff --git a/gdb/ada-lex.l b/gdb/ada-lex.l
index 9886553e4b5..e16acb5f6e2 100644
--- a/gdb/ada-lex.l
+++ b/gdb/ada-lex.l
@@ -160,6 +160,13 @@ if		{
 		  return 0;
 		}
 
+task		{
+		  while (*lexptr != 't' && *lexptr != 'T')
+		    lexptr--;
+		  yyrestart(NULL);
+		  return 0;
+		}
+
 	/* ADA KEYWORDS */
 
 abs		{ return ABS; }
diff --git a/gdb/ada-tasks.c b/gdb/ada-tasks.c
index 68cc696d56e..62f44322708 100644
--- a/gdb/ada-tasks.c
+++ b/gdb/ada-tasks.c
@@ -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));
 }