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