home *** CD-ROM | disk | FTP | other *** search
- /*
- * strchr - find first occurrence of a character in a string
- */
-
- #define NULL 0
-
- char * /* found char, or NULL if none */
- strchr(s, charwanted)
- CONST char *s;
- register char charwanted;
- {
- register CONST 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);
- }
-