Lines Matching refs:psptr
64 int psptr; /* the stack index of the current procedure */
359 for (psptr=0; psptr<PSMAX; psptr++) {
360 pstack[psptr][0] = NULL;
361 plstack[psptr] = 0;
363 psptr = -1;
408 if (prccont && (psptr >= 0))
409 printf("'FC %s\n", pstack[psptr]);
411 printf ("com %o str %o chr %o ptr %d\n", incomm, instr, inchr, psptr);
447 if (psptr < PSMAX-1) {
448 ++psptr;
449 strncpy (pstack[psptr], pname, PNAMELEN);
450 pstack[psptr][PNAMELEN] = NULL;
451 plstack[psptr] = blklevel;
537 if (psptr >= 0 && plstack[psptr] >= blklevel) {
543 blklevel = plstack[psptr];
546 if (--psptr >= 0)
549 psptr = -1;