annotate lib/strpbrk.c @ 2089:cd92072b7132

(strpbrk): Ansideclify. Use `#if' instead of `#ifdef' for `HAVE_CONFIG_H'.
author Jim Meyering <jim@meyering.net>
date Fri, 07 Jan 2000 07:01:45 +0000
parents 89f4c1937ac7
children e34e6bd35c66
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2089
cd92072b7132 (strpbrk): Ansideclify.
Jim Meyering <jim@meyering.net>
parents: 649
diff changeset
1 /* Copyright (C) 1991, 1994, 2000 Free Software Foundation, Inc.
494
e4bb4d9fc4ef Modified from glibc copy.
Jim Meyering <jim@meyering.net>
parents: 493
diff changeset
2 NOTE: The canonical source of this file is maintained with the GNU C Library.
e4bb4d9fc4ef Modified from glibc copy.
Jim Meyering <jim@meyering.net>
parents: 493
diff changeset
3 Bugs can be reported to bug-glibc@prep.ai.mit.edu.
493
Jim Meyering <jim@meyering.net>
parents:
diff changeset
4
494
e4bb4d9fc4ef Modified from glibc copy.
Jim Meyering <jim@meyering.net>
parents: 493
diff changeset
5 This program is free software; you can redistribute it and/or modify it
e4bb4d9fc4ef Modified from glibc copy.
Jim Meyering <jim@meyering.net>
parents: 493
diff changeset
6 under the terms of the GNU General Public License as published by the
e4bb4d9fc4ef Modified from glibc copy.
Jim Meyering <jim@meyering.net>
parents: 493
diff changeset
7 Free Software Foundation; either version 2, or (at your option) any
e4bb4d9fc4ef Modified from glibc copy.
Jim Meyering <jim@meyering.net>
parents: 493
diff changeset
8 later version.
493
Jim Meyering <jim@meyering.net>
parents:
diff changeset
9
494
e4bb4d9fc4ef Modified from glibc copy.
Jim Meyering <jim@meyering.net>
parents: 493
diff changeset
10 This program is distributed in the hope that it will be useful,
e4bb4d9fc4ef Modified from glibc copy.
Jim Meyering <jim@meyering.net>
parents: 493
diff changeset
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
e4bb4d9fc4ef Modified from glibc copy.
Jim Meyering <jim@meyering.net>
parents: 493
diff changeset
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
e4bb4d9fc4ef Modified from glibc copy.
Jim Meyering <jim@meyering.net>
parents: 493
diff changeset
13 GNU General Public License for more details.
493
Jim Meyering <jim@meyering.net>
parents:
diff changeset
14
494
e4bb4d9fc4ef Modified from glibc copy.
Jim Meyering <jim@meyering.net>
parents: 493
diff changeset
15 You should have received a copy of the GNU General Public License
649
89f4c1937ac7 update FSF address in copyright and remove any trailing blanks
Jim Meyering <jim@meyering.net>
parents: 494
diff changeset
16 along with this program; if not, write to the Free Software Foundation,
89f4c1937ac7 update FSF address in copyright and remove any trailing blanks
Jim Meyering <jim@meyering.net>
parents: 494
diff changeset
17 Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
493
Jim Meyering <jim@meyering.net>
parents:
diff changeset
18
2089
cd92072b7132 (strpbrk): Ansideclify.
Jim Meyering <jim@meyering.net>
parents: 649
diff changeset
19 #if HAVE_CONFIG_H
494
e4bb4d9fc4ef Modified from glibc copy.
Jim Meyering <jim@meyering.net>
parents: 493
diff changeset
20 # include <config.h>
e4bb4d9fc4ef Modified from glibc copy.
Jim Meyering <jim@meyering.net>
parents: 493
diff changeset
21 #endif
493
Jim Meyering <jim@meyering.net>
parents:
diff changeset
22
Jim Meyering <jim@meyering.net>
parents:
diff changeset
23 /* Find the first ocurrence in S of any character in ACCEPT. */
Jim Meyering <jim@meyering.net>
parents:
diff changeset
24 char *
2089
cd92072b7132 (strpbrk): Ansideclify.
Jim Meyering <jim@meyering.net>
parents: 649
diff changeset
25 strpbrk (const char *s, const char *accept)
493
Jim Meyering <jim@meyering.net>
parents:
diff changeset
26 {
Jim Meyering <jim@meyering.net>
parents:
diff changeset
27 while (*s != '\0')
Jim Meyering <jim@meyering.net>
parents:
diff changeset
28 {
Jim Meyering <jim@meyering.net>
parents:
diff changeset
29 const char *a = accept;
Jim Meyering <jim@meyering.net>
parents:
diff changeset
30 while (*a != '\0')
Jim Meyering <jim@meyering.net>
parents:
diff changeset
31 if (*a++ == *s)
Jim Meyering <jim@meyering.net>
parents:
diff changeset
32 return (char *) s;
Jim Meyering <jim@meyering.net>
parents:
diff changeset
33 ++s;
Jim Meyering <jim@meyering.net>
parents:
diff changeset
34 }
Jim Meyering <jim@meyering.net>
parents:
diff changeset
35
494
e4bb4d9fc4ef Modified from glibc copy.
Jim Meyering <jim@meyering.net>
parents: 493
diff changeset
36 return 0;
493
Jim Meyering <jim@meyering.net>
parents:
diff changeset
37 }