1 /* 2 * strrchr - find last occurrence of a character in a string 3 */ 4 5 #define NULL 0 6 7 char * /* found char, or NULL if none */ strrchr(s,charwanted)8strrchr(s, charwanted) 9 char *s; 10 register char charwanted; 11 { 12 register char *scan; 13 register char *place; 14 15 place = NULL; 16 for (scan = s; *scan != '\0'; scan++) 17 if (*scan == charwanted) 18 place = scan; 19 if (charwanted == '\0') 20 return(scan); 21 return(place); 22 } 23