home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Usenet 1994 January
/
usenetsourcesnewsgroupsinfomagicjanuary1994.iso
/
sources
/
unix
/
volume5
/
smallc
/
part3
/
lib
/
index.c
< prev
next >
Encoding:
Amiga
Atari
Commodore
DOS
FM Towns/JPY
Macintosh
Macintosh JP
Macintosh to JP
NeXTSTEP
RISC OS/Acorn
Shift JIS
UTF-8
Wrap
C/C++ Source or Header
|
1986-11-30
|
284 b
|
19 lines
/* index - find index of string t in s
* reference CPL 67.
*/
#include <stdio.h>
#define EOS 0
index(s, t)
char s[], t[];{
int i, j, k;
for (i = 0; s[i] != EOS; i++){
k=0;
for (j=i;t[k]!=EOS & s[j]==t[k]; i++)
j++;
;
if (t[k] == EOS)
return(i);
}
return(-1);
}