49e8dbd7 BJ |
1 | /* Copyright (c) 1979 Regents of the University of California */ |
2 | # |
3 | /* |
4 | * pxp - Pascal execution profiler |
5 | * |
6 | * Bill Joy UCB |
7 | * Version 1.2 January 1979 |
8 | */ |
9 | |
10 | #include "0.h" |
11 | #include "tree.h" |
12 | |
13 | proc(r) |
14 | int *r; |
15 | { |
16 | |
17 | call(r[2], r[3]); |
18 | } |