]> git.ipfire.org Git - thirdparty/gcc.git/blame - libiberty/strrchr.c
[Ada] Improved support for aspect alignment in CCG
[thirdparty/gcc.git] / libiberty / strrchr.c
CommitLineData
6599da04
JM
1/* Portable version of strrchr().
2 This function is in the public domain. */
3
4/*
aaa5f039
DD
5
6@deftypefn Supplemental char* strrchr (const char *@var{s}, int @var{c})
7
e922f978 8Returns a pointer to the last occurrence of the character @var{c} in
7f8fa05d 9the string @var{s}, or @code{NULL} if not found. If @var{c} is itself the
aaa5f039
DD
10null character, the results are undefined.
11
12@end deftypefn
13
6599da04
JM
14*/
15
16#include <ansidecl.h>
17
18char *
7a17ef5e 19strrchr (register const char *s, int c)
6599da04
JM
20{
21 char *rtnval = 0;
22
23 do {
24 if (*s == c)
25 rtnval = (char*) s;
26 } while (*s++);
27 return (rtnval);
28}