files
kolibrios/programs/develop/ktcc/libc.obj/source/string/strpbrk.c
Andrew 42e77931bf
Some checks failed
Build system / Check kernel codestyle (pull_request) Successful in 25s
Build system / Build (pull_request) Failing after 27s
develop/ktcc: Post-SVN tidy
- Move source code from `trunk` into program root directory.
- Update build files.
2025-05-24 11:48:18 +01:00

17 lines
382 B
C

/* Copyright (C) 1994 DJ Delorie, see COPYING.DJ for details */
#include "unconst.h"
#include <string.h>
char* strpbrk(const char* s1, const char* s2)
{
const char* scanp;
int c, sc;
while ((c = *s1++) != 0) {
for (scanp = s2; (sc = *scanp++) != 0;)
if (sc == c)
return unconst(s1 - 1, char*);
}
return 0;
}