source: buchla-68k/orig/CLIBRARY/MEMCHR.C@ cbe2c15

Last change on this file since cbe2c15 was 3ae31e9, checked in by Thomas Lopatic <thomas@…>, 7 years ago

Imported original source code.

  • Property mode set to 100755
File size: 553 bytes
RevLine 
[3ae31e9]1/*
2 =============================================================================
3 memchr.c -- search a string for a character
4 Version 1 -- 1987-06-12
5
6 Return the ptr in sp at which the character c appears;
7 NULL if not found in n chars; don't stop at \0.
8 =============================================================================
9*/
10
11char *
12memchr(sp, c, n)
13register char *sp, c;
14register int n;
15{
16 while (--n >= 0)
17 if (*sp++ == c)
18 return(--sp);
19 return((char *)0);
20}
Note: See TracBrowser for help on using the repository browser.