11 lines
125 B
C
11 lines
125 B
C
/* $Id$ */
|
|
char *strchr(s, c)
|
|
register char *s, c;
|
|
{
|
|
do {
|
|
if (*s == c)
|
|
return(s);
|
|
} while (*s++ != 0);
|
|
return(0);
|
|
}
|