home *** CD-ROM | disk | FTP | other *** search
/ Power Programmierung 2 / Power-Programmierung CD 2 (Tewi)(1994).iso / c / library / dos / diverses / csubrtns / index.c < prev    next >
Encoding:
Text File  |  1987-05-17  |  384 b   |  16 lines
  1. /* index.c by Michael Hanson */
  2. /* you may use this, but not for profit, and give me credit */ 
  3. /* find index of char c in string str */
  4.  
  5. index(str,c)
  6. char c;
  7. char str[];
  8. {
  9.     int ind;
  10.  
  11.     for(ind = 0; str[ind] != EOS ; ++ind)
  12.         if(str[ind] == c)
  13.             return(ind);
  14.     return(-1);
  15. }
  16.