diplodocus.org Git - nmh/blob - 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 }