File: strchr.c

package info (click to toggle)
ghdl 0.26%2Bsvn98%2Bgcc4.1.2~dfsg-1
  • links: PTS
  • area: main
  • in suites: lenny
  • size: 93,808 kB
  • ctags: 63,866
  • sloc: ansic: 645,601; ada: 91,832; makefile: 36,755; asm: 23,240; sh: 16,722; cpp: 3,121; perl: 685; yacc: 593; lex: 589; awk: 586; exp: 526; pascal: 86; lisp: 59
file content (28 lines) | stat: -rw-r--r-- 528 bytes parent folder | download | duplicates (99) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
 
/* Portable version of strchr()
   This function is in the public domain.  */

/*

@deftypefn Supplemental char* strchr (const char *@var{s}, int @var{c})

Returns a pointer to the first occurrence of the character @var{c} in
the string @var{s}, or @code{NULL} if not found.  If @var{c} is itself the
null character, the results are undefined.

@end deftypefn

*/

#include <ansidecl.h>

char *
strchr (register const char *s, int c)
{
  do {
    if (*s == c)
      {
	return (char*)s;
      }
  } while (*s++);
  return (0);
}