1 | //===-- Implementation of wcsspn ------------------------------------------===// |
2 | // |
3 | // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions. |
4 | // See https://llvm.org/LICENSE.txt for license information. |
5 | // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception |
6 | // |
7 | //===----------------------------------------------------------------------===// |
8 | |
9 | #include "src/wchar/wcsspn.h" |
10 | |
11 | #include "hdr/types/size_t.h" |
12 | #include "hdr/types/wchar_t.h" |
13 | #include "src/__support/common.h" |
14 | #include "src/__support/macros/config.h" |
15 | |
16 | namespace LIBC_NAMESPACE_DECL { |
17 | |
18 | bool check(wchar_t c, const wchar_t *s2) { |
19 | for (int n = 0; s2[n]; ++n) { |
20 | if (s2[n] == c) |
21 | return true; |
22 | } |
23 | return false; |
24 | } |
25 | LLVM_LIBC_FUNCTION(size_t, wcsspn, (const wchar_t *s1, const wchar_t *s2)) { |
26 | size_t i = 0; |
27 | for (; s1[i]; ++i) { |
28 | if (!check(s1[i], s2)) |
29 | return i; |
30 | } |
31 | return i; |
32 | } |
33 | |
34 | } // namespace LIBC_NAMESPACE_DECL |
35 | |