home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1993 July / Internet Tools.iso / RockRidge / mail / mmdf / mmdf-IIb.43 / lib / util / strindex.c < prev    next >
Encoding:
C/C++ Source or Header  |  1986-02-01  |  333 b   |  17 lines
  1. strindex (str, target)           /* return column str starts in target */
  2. register char   *str,
  3.         *target;
  4. {
  5.     char *otarget;
  6.     register short slen;
  7.  
  8.     for (otarget = target, slen = strlen (str); ; target++)
  9.     {
  10.     if (*target == '\0')
  11.         return (-1);
  12.  
  13.     if (equal (str, target, slen))
  14.         return (target - otarget);
  15.     }
  16. }
  17.