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