9base

revived minimalist port of Plan 9 userland to Unix
git clone git://git.suckless.org/9base
Log | Files | Refs | README | LICENSE

getcallerpc-ppc.c (79B)

      1 #include <lib9.h>
      2 
      3 ulong
      4 getcallerpc(void *x)
      5 {
      6 	return (((ulong*)(x))[-4]);
      7 }