Assertion failure after Ada task switch (target remote).

        * remote.c (remote_get_ada_task_ptid): New function.
        (init_remote_ops): Set remote_ops.to_get_ada_task_ptid.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index b9407ee6b46dad4737e6fd2bfec0e12d531179ca..b8a45306bc935eb46b4acf829bcdf1658fd017ac 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,8 @@
+2010-03-07  Joel Brobecker  <brobecker@adacore.com>
+
+       * remote.c (remote_get_ada_task_ptid): New function.
+        (init_remote_ops): Set remote_ops.to_get_ada_task_ptid.
+
 2010-03-05  Ulrich Weigand  <uweigand@de.ibm.com>
 
        * symfile.c (build_section_addr_info_from_objfile): Do not mask

diff --git a/gdb/remote.c b/gdb/remote.c
index 6b1a27bf4fac96b1978f92f5ddcb1386b27188a3..280d8afef0df387329a281d8e585a058c2d4307a 100644 (file)
--- a/gdb/remote.c
+++ b/gdb/remote.c
@@ -2682,6 +2682,15 @@ remote_threads_extra_info (struct thread_info *tp)
 }
 \f
 
+/* Implement the to_get_ada_task_ptid function for the remote targets.  */
+
+static ptid_t
+remote_get_ada_task_ptid (long lwp, long thread)
+{
+  return ptid_build (ptid_get_pid (inferior_ptid), 0, lwp);
+}
+\f
+
 /* Restart the remote side; this is an extended protocol operation.  */
 
 static void
@@ -9675,6 +9684,7 @@ Specify the serial device it is connected to\n\
   remote_ops.to_find_new_threads = remote_threads_info;
   remote_ops.to_pid_to_str = remote_pid_to_str;
   remote_ops.to_extra_thread_info = remote_threads_extra_info;
+  remote_ops.to_get_ada_task_ptid = remote_get_ada_task_ptid;
   remote_ops.to_stop = remote_stop;
   remote_ops.to_xfer_partial = remote_xfer_partial;
   remote_ops.to_rcmd = remote_rcmd;
@@ -10234,3 +10244,4 @@ Show the remote pathname for \"run\""), NULL, NULL, NULL,
   target_buf_size = 2048;
   target_buf = xmalloc (target_buf_size);
 }
+