newlib-2.4.0: wide character strings

git-svn-id: svn://kolibrios.org@6557 a494cfbc-eb01-0410-851d-a64ba20cac60

contrib/sdk/sources/newlib/libc/string/index.c

@@ -0,0 +1,45 @@
+/*
+FUNCTION
+	<<index>>---search for character in string
+
+INDEX
+	index
+
+ANSI_SYNOPSIS
+	#include <strings.h>
+	char * index(const char *<[string]>, int <[c]>);
+
+TRAD_SYNOPSIS
+	#include <strings.h>
+	char * index(<[string]>, <[c]>);
+	char *<[string]>;
+	int *<[c]>;
+
+DESCRIPTION
+	This function finds the first occurence of <[c]> (converted to
+	a char) in the string pointed to by <[string]> (including the
+	terminating null character).
+
+	This function is identical to <<strchr>>.
+
+RETURNS
+	Returns a pointer to the located character, or a null pointer
+	if <[c]> does not occur in <[string]>.
+
+PORTABILITY
+<<index>> requires no supporting OS subroutines.
+
+QUICKREF
+	index - pure
+*/
+
+#include <string.h>
+#include <strings.h>
+
+char *
+_DEFUN (index, (s, c),
+	_CONST char *s _AND
+	int c)
+{
+  return strchr (s, c);
+}