ftp.nice.ch/pub/next/unix/mail/mh.6.7.s.tar.gz#/mh/support/pop/mmdfII/pop/r1bindex.c

This is r1bindex.c in view mode; [Download] [Up]

/* r1bindex.c - right plus 1 or beginning index */


char *r1bindex(str, chr)
register char *str;
register int chr;
{
    register char  *cp;

    for (cp = str; *cp; cp++)
	continue;
    --cp;
    while (cp >= str && *cp != chr)
	--cp;
    return (++cp);
}

These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.