getcallerpc-PowerMacintosh.c « lib9 « src - plan9port - Plan 9 from User Space (with patches)

summary refs log tree commit diff stats

path: root/src/lib9/getcallerpc-PowerMacintosh.c

blob: 679a72cff856e1bd4371ce3153b37610838906e3 (plain)

#include <lib9.h>

ulong
getcallerpc(void *x)
{
	return (((ulong*)(x))[-4]);
}