static char *sccsid
= "@(#)lval.c 1.1 (Berkeley) %G%";
/* Copyright (c) 1979 Regents of the University of California */
* pxp - Pascal execution profiler
* Version 1.2 January 1979
for (c
= r
[3]; c
!= NIL
; c
= c
[2]) {
ppid("{unexpected argument list}");