restore creation of y.tab.c

[unix-history] / usr / src / usr.bin / pascal / pxp / proc.c

static  char *sccsid = "@(#)proc.c      1.1 (Berkeley) %G%";
/* Copyright (c) 1979 Regents of the University of California */
#
/*
* pxp - Pascal execution profiler
*
* Bill Joy UCB
* Version 1.2 January 1979
*/

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

proc(r)
       int *r;
{

       call(r[2], r[3]);
}