1 /* Stub implementation of (obsolete) index(). */
2 
3 /*
4 
5 @deftypefn Supplemental char* index (char *@var{s}, int @var{c})
6 
7 Returns a pointer to the first occurrence of the character @var{c} in
8 the string @var{s}, or @code{NULL} if not found.  The use of @code{index} is
9 deprecated in new programs in favor of @code{strchr}.
10 
11 @end deftypefn
12 
13 */
14 
15 extern char * strchr(const char *, int);
16 
17 char *
index(const char * s,int c)18 index (const char *s, int c)
19 {
20   return strchr (s, c);
21 }
22