source: buchla-68k/libsm/strpbrk.c@ 0580615

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

Point of no return.

  • Property mode set to 100644
File size: 576 bytes
Line 
1/*
2 =============================================================================
3 strpbrk.c -- find a 'break' character in a string
4 Version 1 -- 1987-06-12
5
6 Return ptr to first occurance of any character from `brkset'
7 in the character string `string'; NULL if none exists.
8 =============================================================================
9*/
10
11char *strpbrk(char *string, char *brkset)
12{
13 register char *p;
14
15 do {
16
17 for (p = brkset; *p != '\0' && *p != *string; ++p)
18 ;
19
20 if (*p != '\0')
21 return(string);
22 }
23
24 while(*string++)
25 ;
26
27 return((char *)0);
28}
Note: See TracBrowser for help on using the repository browser.