NBLIST
for (i = 0; i < NBLIST; i++) {
if (i == NBLIST) {
if (j < 0 || j >= NBLIST) {
if (ip == NBLIST*BLK) { /* for rdtty */
filep blist[NBLIST];
tchar corebuf[(ENV_BLK + NBLIST + 1) * BLK];
pushi(NBLIST*BLK, PAIR('r','d'));
#define RD_OFFSET (NBLIST * BLK)