blob: e33870609e4e8bdbe5730a911945b3e0a4dcd775 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
|
/* Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.
*/
#include <stdio.h>
#ifdef LINUX
#define NOINDEX
#endif
#ifdef MACOSX
/* The following effectively disables the local version. */
#define index strindex
#endif
/* index and rindex are provided by most systems and are redundantly defined
* here only in case they are missing (we probably should be using the more
* modern strchr etc. but that is another thing). Linux (slackware at least)
* defines these in the same libc.a object module as strchr etc. (this is a
* bug), which causes a library conflict. Hence on Linux systems we omit
* these functions.
*/
#ifndef NOINDEX
/* INDEX -- Return pointer to the first occurrence of a character in a string,
* or null if the char is not found.
*/
char *
index ( char *str, int ch)
{
register char *ip;
register int cch;
for (ip=str; (cch = *ip); ip++)
if (cch == ch)
return (ip);
return (NULL);
}
#endif
|
