getcallerpc-power.c - 9base - revived minimalist port of Plan 9 userland to Unix
 (HTM) git clone git://git.suckless.org/9base
 (DIR) Log
 (DIR) Files
 (DIR) Refs
 (DIR) README
 (DIR) LICENSE
       ---
       getcallerpc-power.c (89B)
       ---
            1 #include <lib9.h>
            2 
            3 ulong
            4 getcallerpc(void *x)
            5 {
            6         ulong *lp;
            7 
            8         lp = x;
            9 
           10         return lp[-1];
           11 }