is_in_name
while (buf++, is_in_name(*buf))
if (is_in_name(*end)) {
while (is_in_name(*++end))
if (!is_in_name(*p)) /* '_' is a local extension */
holdnl = is_in_name(*p); /* letters, digits, _ */
} while (is_in_name(c));
if (! is_in_name(*p))
if (*p == '\0' || !is_in_name(*p))
if (!is_in_name(*p))