lang/cem/libcc.ansi/string/strrchr.c

   1 /*
   2  * (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
   3  * See the copyright notice in the ACK home directory, in the file "Copyright".
   4  */
   5 /* $Id: strrchr.c,v 1.4 1994/06/24 11:57:13 ceriel Exp $ */
   6
   7 #include        <string.h>
   8
   9 char *
  10 strrchr(register const char *s, int c)
  11 {
  12         register const char *result = NULL;
  13
  14         c = (char) c;
  15
  16         do {
  17                 if (c == *s)
  18                         result = s;
  19         } while (*s++ != '\0');
  20
  21         return (char *)result;
  22 }