1169695Skan/* Stub implementation of (obsolete) index(). */ 2169695Skan 3169695Skan/* 4169695Skan 5169695Skan@deftypefn Supplemental char* index (char *@var{s}, int @var{c}) 6169695Skan 7169695SkanReturns a pointer to the first occurrence of the character @var{c} in 8169695Skanthe string @var{s}, or @code{NULL} if not found. The use of @code{index} is 9169695Skandeprecated in new programs in favor of @code{strchr}. 10169695Skan 11169695Skan@end deftypefn 12169695Skan 13169695Skan*/ 14169695Skan 15169695Skanextern char * strchr(const char *, int); 16169695Skan 17169695Skanchar * 18169695Skanindex (const char *s, int c) 19169695Skan{ 20169695Skan return strchr (s, c); 21169695Skan} 22