summaryrefslogtreecommitdiff
path: root/lib9/utfrrune.c
diff options
context:
space:
mode:
Diffstat (limited to 'lib9/utfrrune.c')
-rw-r--r--lib9/utfrrune.c30
1 files changed, 30 insertions, 0 deletions
diff --git a/lib9/utfrrune.c b/lib9/utfrrune.c
new file mode 100644
index 00000000..b6e8f2fc
--- /dev/null
+++ b/lib9/utfrrune.c
@@ -0,0 +1,30 @@
+#include "lib9.h"
+
+char*
+utfrrune(char *s, long c)
+{
+ long c1;
+ Rune r;
+ char *s1;
+
+ if(c < Runesync) /* not part of utf sequence */
+ return strrchr(s, c);
+
+ s1 = 0;
+ for(;;) {
+ c1 = *(uchar*)s;
+ if(c1 < Runeself) { /* one byte rune */
+ if(c1 == 0)
+ return s1;
+ if(c1 == c)
+ s1 = s;
+ s++;
+ continue;
+ }
+ c1 = chartorune(&r, s);
+ if(r == c)
+ s1 = s;
+ s += c1;
+ }
+ return 0;
+}