chiark / gitweb /
klibc: update to version 1.1.1
[elogind.git] / klibc / klibc / strchr.c
1 /*
2  * strchr.c
3  */
4
5 #include <string.h>
6 #include <klibc/compiler.h>
7
8 char *strchr(const char *s, int c)
9 {
10   while ( *s != (char)c ) {
11     if ( ! *s )
12       return NULL;
13     s++;
14   }
15
16   return (char *)s;
17 }
18
19 __ALIAS(char *, index, (const char *, int), strchr)