Lines Matching refs:psptr
90 static int psptr; /* the stack index of the current procedure */ variable
276 for (psptr=0; psptr<PSMAX; psptr++) { in main()
277 pstack[psptr][0] = '\0'; in main()
278 plstack[psptr] = 0; in main()
280 psptr = -1; in main()
320 if (prccont && (psptr >= 0)) { in main()
322 ps(pstack[psptr]); in main()
326 printf ("com %o str %o chr %o ptr %d\n", incomm, instr, inchr, psptr); in main()
358 if (psptr < PSMAX) { in putScp()
359 ++psptr; in putScp()
360 strncpy (pstack[psptr], pname, PNAMELEN); in putScp()
361 pstack[psptr][PNAMELEN] = '\0'; in putScp()
362 plstack[psptr] = blklevel; in putScp()
449 if (psptr >= 0 && plstack[psptr] >= blklevel) { in putScp()
455 blklevel = plstack[psptr]; in putScp()
458 if (--psptr >= 0) in putScp()
461 psptr = -1; in putScp()