Open64: osprey/cygnus/libiberty/index.c Source File

00001 /* Stub implementation of (obsolete) index(). */
00002 
00003 /*
00004 
00005 @deftypefn Supplemental char* index (char *@var{s}, int @var{c})
00006 
00007 Returns a pointer to the first occurrence of the character @var{c} in
00008 the string @var{s}, or @code{NULL} if not found.  The use of @code{index} is
00009 deprecated in new programs in favor of @code{strchr}.
00010 
00011 @end deftypefn
00012 
00013 */
00014 
00015 extern char * strchr();
00016 
00017 char *
00018 index (s, c)
00019   char *s;
00020   int c;
00021 {
00022   return strchr (s, c);
00023 }