/* Portable version of strrchr().

/* Portable version of strrchr().
This function is in the public domain. */

/*

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

Returns a pointer to the last 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 *
strrchr (register const char *s, int c)
{
char *rtnval = 0;

do {
if (*s == c)
rtnval = (char*) s;
} while (*s++);
return (rtnval);
}