From: Richard Henderson <rth@redhat.com>
Date: Wed, 18 Jun 2003 22:53:06 +0000 (-0700)
Subject: unwind-ia64.c (_Unwind_GetCFA): New.
X-Git-Tag: releases/gcc-3.4.0~5673
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=61193e7bb1d4a3922456b597244517f727ffbb8c;p=thirdparty%2Fgcc.git

unwind-ia64.c (_Unwind_GetCFA): New.

        * config/ia64/unwind-ia64.c (_Unwind_GetCFA): New.
        (_Unwind_FindEnclosingFunction): Implement.

From-SVN: r68168
---

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 1e942f6d2a98..c78a88340de1 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2003-06-18  Richard Henderson  <rth@redhat.com>
+
+        * config/ia64/unwind-ia64.c (_Unwind_GetCFA): New.
+        (_Unwind_FindEnclosingFunction): Implement.
+
 2003-06-18  Kazu Hirata  <kazu@cs.umass.edu>
 
 	* toplev.c (rest_of_handle_sched): Hide the entire function if
diff --git a/gcc/config/ia64/unwind-ia64.c b/gcc/config/ia64/unwind-ia64.c
index 573a84a75cef..9b6023da58af 100644
--- a/gcc/config/ia64/unwind-ia64.c
+++ b/gcc/config/ia64/unwind-ia64.c
@@ -1647,7 +1647,24 @@ _Unwind_GetRegionStart (struct _Unwind_Context *context)
 void *
 _Unwind_FindEnclosingFunction (void *pc)
 {
-  return NULL;
+  struct unw_table_entry *ent;
+  unsigned long segment_base, gp;
+
+  ent = _Unwind_FindTableEntry (pc, &segment_base, &gp);
+  if (ent == NULL)
+    return NULL;
+  else
+    return (void *)(segment_base + ent->start_offset);
+}
+
+/* Get the value of the CFA as saved in CONTEXT.  In GCC/Dwarf2 parlance,
+   the CFA is the value of the stack pointer on entry; In IA-64 unwind
+   parlance, this is the PSP.  */
+
+_Unwind_Word
+_Unwind_GetCFA (struct _Unwind_Context *context)
+{
+  return (_Unwind_Ptr) context->psp;
 }