home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 509.lha / DES / src / index.c < prev    next >
C/C++ Source or Header  |  1991-05-06  |  213b  |  30 lines
  1.  
  2. /* Lattice for some reason doesn't have an index function in its
  3.     libraries. Irritating. --SRP */
  4.  
  5. char *index(s,t)
  6. char* s, t;
  7. {
  8.  
  9.  
  10.     for(;*s!='\0';s++){
  11.         if(*s == t)
  12.             return(s);
  13.     }
  14.     return(0);
  15. }
  16.  
  17.  
  18.  
  19.  
  20.  
  21.  
  22.  
  23.  
  24.  
  25.  
  26.  
  27.  
  28.  
  29.  
  30.