4.3BSD - /usr/src/new/mh/sbr/strindex.c

   1: /* strindex.c - "unsigned" lexical index */
   2: 
   3: 
   4: int  stringdex (p1, p2)
   5: register char  *p1,
   6:                *p2;
   7: {
   8:     register char  *p;
   9: 
  10:     for (p = p2; *p; p++)
  11:     if (uprf (p, p1))
  12:         return (p - p2);
  13: 
  14:     return (-1);
  15: }

Defined functions