59 tchar	*argtop;
64 	tchar *wbuf;
65 	tchar corebuf[(ENV_BLK + NBLIST + 1) * BLK];
67 	tchar wbuf[BLK];
68 	tchar rbuf[BLK];
242 		wbt((tchar) IMP);  in casede()
338 	tchar i;  in skip()
351 	tchar ii;  in copyb()
408 		wbt((tchar)0);  in copyb()
418 	tchar i;  in copys()
428 	wbt((tchar)0);  in copys()
485 tchar i;  in wbt()
496 tchar i;  in wbf()
539 	lseek(ibf, ((long)woff) * sizeof(tchar), 0);  in wbfl()
540 	write(ibf, (char *)wbuf, wbfi * sizeof(tchar));  in wbfl()
550 tchar rbf()		/*return next char from blist[] block*/  in rbf()
552 	tchar i;  in rbf()
567 		lseek(ibf, (long)j * sizeof(tchar), 0);  in rbf()
568 		if (read(ibf, (char *)rbuf, BLK * sizeof(tchar)) <= 0)  in rbf()
604 tchar rbf0(p)  in rbf0()
612 		lseek(ibf, (long)roff * sizeof(tchar), 0);
613 		if (read(ibf, (char *)rbuf, BLK * sizeof(tchar)) == 0)
637 tchar popi()  in popi()
753 	tchar i;  in collect()
754 	tchar *strp;  in collect()
755 	tchar * lim;  in collect()
756 	tchar * *argpp, **argppend;  in collect()
782 		memp += APERMAC * sizeof(tchar *);  in collect()
783 		memp += CPERMAC * sizeof(tchar);  in collect()
786 	lim = (tchar *)nxf;  in collect()
787 	argpp = (tchar **)(savnxf + 1);  in collect()
789 	SPACETEST(argppend, sizeof(tchar *));  in collect()
790 	strp = (tchar *)argppend;  in collect()
795 		argpp[j] = (tchar *)0;  in collect()
829 			SPACETEST(strp, 3 * sizeof(tchar));  in collect()
834 	nxf->nargs = argpp - (tchar **)(savnxf + 1);  in collect()
850 		pushback(*(((tchar **)(frame + 1)) + i - 1));  in seta()
875 			wbt((tchar)0);  in casedi()
890 		wbt((tchar)0);  in casedi()
928 	tchar buf[LNSIZE];  in casetl()
929 	tchar *tp;  in casetl()
930 	tchar i, delim;  in casetl()