From a555820564d9f2e95ca8c97871339d3a5a2081c3 Mon Sep 17 00:00:00 2001
From: Ankit Raj
Date: Wed, 21 Jun 2017 10:26:59 +0530
Subject: Updated Scilab2C

---
 2.3-1/src/c/string/strrchr/gstrrchra.c | 32 ++++++++++++++++++++++++++++++++
 1 file changed, 32 insertions(+)
 create mode 100644 2.3-1/src/c/string/strrchr/gstrrchra.c

(limited to '2.3-1/src/c/string/strrchr/gstrrchra.c')

diff --git a/2.3-1/src/c/string/strrchr/gstrrchra.c b/2.3-1/src/c/string/strrchr/gstrrchra.c
new file mode 100644
index 00000000..6a55fbd3
--- /dev/null
+++ b/2.3-1/src/c/string/strrchr/gstrrchra.c
@@ -0,0 +1,32 @@
+/* Copyright (C) 2017 - IIT Bombay - FOSSEE
+
+ This file must be used under the terms of the CeCILL.
+ This source file is licensed as described in the file COPYING, which
+ you should have received as part of this distribution.  The terms
+ are also available at
+ http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+ Organization: FOSSEE, IIT Bombay
+ Author: Shamik Guha
+ Email: toolbox@scilab.in
+*/
+#include <stdio.h>
+#include <string.h>
+#include "strrchr.h"
+
+void gstrrchra(char* str,int size,char* key,int size2,char* out)
+{
+    int i,j, k=0, pos2;
+   
+    for (i = 0;i<size;i++)
+    {
+        if (key[0] == str[i])
+        {
+            pos2 = i;
+        }
+    }
+	for(j=pos2;j<i;j++)
+	{
+		out[k]=str[j];
+		k++;
+	}
+}
-- 
cgit