Remove RCS keywords, since they no longer work after git migration.
[mmh] / sbr / r1bindex.c
1
2 /*
3  * r1bindex.c -- Given a string and a character, return a pointer
4  *            -- to the right of the rightmost occurrence of the
5  *            -- character.  If the character doesn't occur, the
6  *            -- pointer will be at the beginning of the string.
7  *
8  * This code is Copyright (c) 2002, by the authors of nmh.  See the
9  * COPYRIGHT file in the root directory of the nmh distribution for
10  * complete copyright information.
11  */
12
13 #include <h/mh.h>
14
15
16 char *
17 r1bindex(char *str, int chr)
18 {
19     char *cp;
20
21     /* find null at the end of the string */
22     for (cp = str; *cp; cp++)
23         continue;
24
25     /* backup to the rightmost character */
26     --cp;
27
28     /* now search for the rightmost occurrence of the character */
29     while (cp >= str && *cp != chr)
30         --cp;
31
32     /* now move one to the right */
33     return (++cp);
34 }