Subversion Repositories scarts

/* Portable version of strchr()

   This function is in the public domain.  */

/*

@deftypefn Supplemental char* strchr (const char *@var{s}, int @var{c})

Returns a pointer to the first occurrence of the character @var{c} in

the string @var{s}, or @code{NULL} if not found.  If @var{c} is itself the

null character, the results are undefined.

@end deftypefn

*/

#include <ansidecl.h>

char *

strchr (register const char *s, int c)

{

  do {

    if (*s == c)

      {

        return (char*)s;

      }

  } while (*s++);

  return (0);

}