From: Joel Brobecker <brobecker@gnat.com>
Date: Sat, 8 May 2010 18:23:42 +0000 (+0000)
Subject: Implement task switching on pa-hpux.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=fa07e785f20d0ffea5ac13eb46399b1f301a983e;p=binutils-gdb.git

Implement task switching on pa-hpux.

gdb/ChangeLog:

        * inf-ttrace.c (inf_ttrace_get_ada_task_ptid): New function.
        (inf_ttrace_target): Set t->to_get_ada_task_ptid.
---

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 1725c3bd5cc..f4b6639dc27 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,9 @@
+2010-05-08  Joel Brobecker  <brobecker@adacore.com>
+
+	Implement task switching on pa-hpux.
+	* inf-ttrace.c (inf_ttrace_get_ada_task_ptid): New function.
+	(inf_ttrace_target): Set t->to_get_ada_task_ptid.
+
 2010-05-08  Pierre Muller  <muller@ics.u-strasbg.fr>
 
 	* valops.c (find_overload_match): Add missing i18n markup.
diff --git a/gdb/inf-ttrace.c b/gdb/inf-ttrace.c
index 708a07c5875..199ceb9f175 100644
--- a/gdb/inf-ttrace.c
+++ b/gdb/inf-ttrace.c
@@ -1243,6 +1243,15 @@ inf_ttrace_pid_to_str (struct target_ops *ops, ptid_t ptid)
 }
 
 
+/* Implement the get_ada_task_ptid target_ops method.  */
+
+static ptid_t
+inf_ttrace_get_ada_task_ptid (long lwp, long thread)
+{
+  return ptid_build (ptid_get_pid (inferior_ptid), lwp, 0);
+}
+
+
 struct target_ops *
 inf_ttrace_target (void)
 {
@@ -1267,6 +1276,7 @@ inf_ttrace_target (void)
   t->to_extra_thread_info = inf_ttrace_extra_thread_info;
   t->to_pid_to_str = inf_ttrace_pid_to_str;
   t->to_xfer_partial = inf_ttrace_xfer_partial;
+  t->to_get_ada_task_ptid = inf_ttrace_get_ada_task_ptid;
 
   return t;
 }