Lines Matching refs:psptr
62 int psptr; /* the stack index of the current procedure */ variable
357 for (psptr=0; psptr<PSMAX; psptr++) { in main()
358 pstack[psptr][0] = '\0'; in main()
359 plstack[psptr] = 0; in main()
361 psptr = -1; in main()
406 if (prccont && (psptr >= 0)) in main()
407 printf("'FC %s\n", pstack[psptr]); in main()
409 printf ("com %o str %o chr %o ptr %d\n", incomm, instr, inchr, psptr); in main()
445 if (psptr < PSMAX-1) { in putScp()
446 ++psptr; in putScp()
447 strncpy (pstack[psptr], pname, PNAMELEN); in putScp()
448 pstack[psptr][PNAMELEN] = '\0'; in putScp()
449 plstack[psptr] = blklevel; in putScp()
535 if (psptr >= 0 && plstack[psptr] >= blklevel) { in putScp()
541 blklevel = plstack[psptr]; in putScp()
544 if (--psptr >= 0) in putScp()
547 psptr = -1; in putScp()