1*1969Swnj /* @(#)index.c 4.1 (Berkeley) 12/21/80 */ 2*1969Swnj /* 3*1969Swnj * Return the ptr in sp at which the character c appears; 4*1969Swnj * NULL if not found 5*1969Swnj */ 6*1969Swnj 7*1969Swnj #define NULL 0 8*1969Swnj 9*1969Swnj char * 10*1969Swnj index(sp, c) 11*1969Swnj register char *sp, c; 12*1969Swnj { 13*1969Swnj do { 14*1969Swnj if (*sp == c) 15*1969Swnj return(sp); 16*1969Swnj } while (*sp++); 17*1969Swnj return(NULL); 18*1969Swnj } 19