lang/cem/libcc.ansi/string/strchr.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: strchr.c,v 1.4 1994/06/24 11:56:40 ceriel Exp $ */
   6
   7 #include        <string.h>
   8
   9 char *
  10 strchr(register const char *s, register int c)
  11 {
  12         c = (char) c;
  13
  14         while (c != *s) {
  15                 if (*s++ == '\0') return NULL;
  16         }
  17         return (char *)s;
  18 }