FreeCalypso > hg > freecalypso-tools
view target-utils/libc/index.c @ 569:dddcd55883fe
README: Bitbucket link changed to new location (freecalypso-docs)
| author | Mychaela Falconia <falcon@freecalypso.org> |
|---|---|
| date | Sat, 01 Feb 2020 22:24:55 +0000 |
| parents | 7fb62fc724dc |
| children |
line wrap: on
line source
char * index(p, ch) register char *p, ch; { for (;; ++p) { if (*p == ch) return(p); if (!*p) return((char *)0); } /* NOTREACHED */ }
