ack/lang/cem/libcc/gen/strchr.c

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