ack/lang/cem/libcc/gen/strchr.c
1987-03-31 10:45:53 +00:00

11 lines
129 B
C

/* $Header$ */
char *strchr(s, c)
register char *s, c;
{
do {
if (*s == c)
return(s);
} while (*s++ != 0);
return(0);
}