BA_DELIM
if (BA_DELIM(*cp)) {
for (cp++; *cp != '\0' && !BA_DELIM(*cp); cp++)
for (cp += 5; *cp != '\0' && !BA_DELIM(*cp) &&
for (cp += 8; *cp != '\0' && !BA_DELIM(*cp) &&
while (*cp != '\0' && !BA_DELIM(*cp))