From af8335dc7a0f885f7716e1e5b256d80a7e07966f Mon Sep 17 00:00:00 2001
From: Jan Nieuwenhuizen <janneke@gnu.org>
Date: Sun, 30 Jul 2017 13:09:19 +0200
Subject: [PATCH] mescc: Tinycc support: strrchr.

* mlibc/libc-mes+tcc.c (strrchr): Implement.
---
 mlibc/libc-mes+tcc.c | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/mlibc/libc-mes+tcc.c b/mlibc/libc-mes+tcc.c
index 1b917d2f..b704302c 100644
--- a/mlibc/libc-mes+tcc.c
+++ b/mlibc/libc-mes+tcc.c
@@ -289,7 +289,14 @@ strchr (char const *s, int c)
 char *
 strrchr (char const *s, int c)
 {
-  eputs ("strrchr stub\n");
+  int n = strlen (s);
+  if (!n) return 0;
+  char const *p = s + n - 1;
+  while (*p || !c)
+    {
+      if (c == *p) return p;
+      *p--;
+    }
   return 0;
 }
 
-- 
2.31.1