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