1*2862Speter static char *sccsid = "@(#)proc.c 1.1 (Berkeley) 03/02/81"; 2*2862Speter /* Copyright (c) 1979 Regents of the University of California */ 3*2862Speter # 4*2862Speter /* 5*2862Speter * pxp - Pascal execution profiler 6*2862Speter * 7*2862Speter * Bill Joy UCB 8*2862Speter * Version 1.2 January 1979 9*2862Speter */ 10*2862Speter 11*2862Speter #include "0.h" 12*2862Speter #include "tree.h" 13*2862Speter 14*2862Speter proc(r) 15*2862Speter int *r; 16*2862Speter { 17*2862Speter 18*2862Speter call(r[2], r[3]); 19*2862Speter } 20