#include "defs.h"


prtloc(fun) 
	INT (*fun)();
{
	CHP cptr;

	Lseek(file, limit+HDRSIZ, 0);
	scansym(symbol)
	{
		if (symbol->type != CHIP && symbol->type != CLINK)
			continue;
		cptr = chp(symbol->value.v_adr+fdelta);
		(*fun)(cptr);
	}
}