| 1 | /* Portable version of strchr() |
| 2 | This function is in the public domain. */ |
| 3 | |
| 4 | /* |
| 5 | |
| 6 | @deftypefn Supplemental char* strchr (const char *@var{s}, int @var{c}) |
| 7 | |
| 8 | Returns a pointer to the first occurrence of the character @var{c} in |
| 9 | the string @var{s}, or @code{NULL} if not found. If @var{c} is itself the |
| 10 | null character, the results are undefined. |
| 11 | |
| 12 | @end deftypefn |
| 13 | |
| 14 | */ |
| 15 | |
| 16 | #include <ansidecl.h> |
| 17 | |
| 18 | char * |
| 19 | strchr (s, c) |
| 20 | register const char *s; |
| 21 | int c; |
| 22 | { |
| 23 | do { |
| 24 | if (*s == c) |
| 25 | { |
| 26 | return (char*)s; |
| 27 | } |
| 28 | } while (*s++); |
| 29 | return (0); |
| 30 | } |