/* 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" /* * A function call */ funccod(r) register int *r; { call(r[2], r[3]); }