FreeCalypso > hg > freecalypso-tools

diff target-utils/libc/rindex.c @ 87:7fb62fc724dc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
target-utils/libc: beginning of newlib-ectomy
author Mychaela Falconia <falcon@freecalypso.org>
date Fri, 28 Oct 2016 22:20:26 +0000
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/target-utils/libc/rindex.c	Fri Oct 28 22:20:26 2016 +0000
@@ -0,0 +1,14 @@
+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 */
+}