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