Commit | Line | Data |
---|---|---|
80ab5aaf DW |
1 | /* |
2 | * "@(#)h_indx.c 1.1" | |
3 | */ | |
4 | ||
5 | short h_indx(a, b, la, lb) | |
6 | char *a, *b; | |
7 | long int la, lb; | |
8 | { | |
9 | int i, n; | |
10 | char *s, *t, *bend; | |
11 | ||
12 | n = la - lb + 1; | |
13 | bend = b + lb; | |
14 | ||
15 | for(i = 0 ; i < n ; ++i) | |
16 | { | |
17 | s = a + i; | |
18 | t = b; | |
19 | while(t < bend) | |
20 | if(*s++ != *t++) | |
21 | goto no; | |
22 | return(i+1); | |
23 | no: ; | |
24 | } | |
25 | return(0); | |
26 | } |