/*
 * strchr - find first occurrence of a character in a string
 */

#define	NULL	0

char *				/* found char, or NULL if none */
strchr(s, charwanted)
 char *s;
register char charwanted;
{
	register  char *scan;

	/*
	 * The odd placement of the two tests is so NUL is findable.
	 */
	for (scan = s; *scan != charwanted;)	/* ++ moved down for opt. */
		if (*scan++ == '\0')
			return(NULL);
	return(scan);
}