blisti
while ((j = blist[blisti(j)]) != (unsigned) ~0) {
while (blist[j = blisti(i)] != (unsigned) ~0) {
j = blisti(--offset);
if ((ip = blist[blisti(p-1)]) == (unsigned) ~0) {
if ((p = blist[blisti(p-1)]) == (unsigned) ~0) {