exp2l: Work around a NetBSD 10.0/i386 bug.
[gnulib.git] / lib / strpbrk.c
blob9e6d35eaa61d9c71f83cccef84fd3e22d5ad8b46
1 /* Copyright (C) 1991, 1994, 2000, 2002-2003, 2006, 2009-2024 Free Software
2 Foundation, Inc.
4 NOTE: The canonical source of this file is maintained with the GNU C Library.
5 Bugs can be reported to bug-glibc@prep.ai.mit.edu.
7 This file is free software: you can redistribute it and/or modify
8 it under the terms of the GNU Lesser General Public License as
9 published by the Free Software Foundation; either version 2.1 of the
10 License, or (at your option) any later version.
12 This file is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU Lesser General Public License for more details.
17 You should have received a copy of the GNU Lesser General Public License
18 along with this program. If not, see <https://www.gnu.org/licenses/>. */
20 #include <config.h>
22 #include <stddef.h>
23 #include <string.h>
25 #if _LIBC
26 # undef strpbrk
27 #endif
29 /* Find the first occurrence in S of any character in ACCEPT. */
30 char *
31 strpbrk (const char *s, const char *accept)
33 while (*s != '\0')
35 const char *a = accept;
36 while (*a != '\0')
37 if (*a++ == *s)
38 return (char *) s;
39 ++s;
42 return NULL;