home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d3xx / d306 / rexxplplot.lha / RexxPlPlot / src / src.zoo / stindex.c < prev    next >
Encoding:
C/C++ Source or Header  |  1990-01-06  |  431 b   |  20 lines
  1. #include "plplot.h"
  2.  
  3. int stindex(str1,str2)
  4. char *str1,*str2;
  5. {
  6.     int base;
  7.     int str1ind;
  8.     int str2ind;
  9.  
  10.     for(base=0; *(str1+base)!='\0'; base++) {
  11.         for(str1ind=base, str2ind=0; *(str2+str2ind)!='\0' &&
  12.             *(str2+str2ind) == *(str1+str1ind); str1ind++, str2ind++)
  13.             ;   /* no body */
  14.  
  15.         if(*(str2+str2ind) == '\0')
  16.             return(base);
  17.     }
  18.     return(-1);    /* search failed */
  19. }
  20.