xref: /netbsd-src/external/gpl3/gcc.old/dist/libgcc/config/darwin10-unwind-find-enc-func.c (revision 9fb66d812c00ebfb445c0b47dea128f32aa6fe96)
1 #include "tconfig.h"
2 #include "tsystem.h"
3 #include "unwind-dw2-fde.h"
4 
5 void *
6 _darwin10_Unwind_FindEnclosingFunction (void *pc)
7 {
8   struct dwarf_eh_bases bases;
9   const struct dwarf_fde *fde = _Unwind_Find_FDE (pc-1, &bases);
10   if (fde)
11     return bases.func;
12   return NULL;
13 }
14