FreeCalypso > hg > freecalypso-tools
view target-utils/libc/rindex.c @ 174:17523db6d1dc
e1-experiments: checking in test4.src
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Thu, 23 Mar 2017 16:05:55 +0000 |
parents | 7fb62fc724dc |
children |
line wrap: on
line source
char * rindex(p, ch) register char *p, ch; { register char *save; for (save = 0;; ++p) { if (*p == ch) save = p; if (!*p) return(save); } /* NOTREACHED */ }