[unix-history] / .ref-BSD-1 / pxp / func.c

#
/*
 * pxp - Pascal execution profiler
 *
 * Bill Joy UCB
 * Version 1.0 August 1977
 */

#include "whoami"
#include "0.h"
#include "tree.h"

/*
 * A function call
 */
funccod(r)
	int *r;
{

	call(r[1], r[2]);
}
Commit	Line	Data
4a9bdf3d BJ	1	#
	2	/*
	3	* pxp - Pascal execution profiler
	4	*
	5	* Bill Joy UCB
	6	* Version 1.0 August 1977
	7	*/
	8
	9	#include "whoami"
	10	#include "0.h"
	11	#include "tree.h"
	12
	13	/*
	14	* A function call
	15	*/
	16	funccod(r)
	17	int *r;
	18	{
	19
	20	call(r[1], r[2]);
	21	}