PSMAX
static int plstack[PSMAX]; /* the procedure nesting level stack */
static char pstack[PSMAX][PNAMELEN+1]; /* the procedure name stack */
for (psptr=0; psptr<PSMAX; psptr++) {
if (psptr < PSMAX) {