#!/usr/sbin/dtrace -s

#pragma D option quiet

sched:::tick
/execname != "dtrace"/
{
	self->class = curthread->t_cid;

	@cl[args[1]->pr_fname,args[0]->pr_lwpid,self->class] = count();
}

END
{
	printf("%-16s %-8s %-8s %-16s\n","EXEC","LWP_ID","CLASS","CNT");
	printa("%-16s %-8d %-8d %-16@d\n",@cl);
}