1 | // -*- C++ -*- |
2 | //===-- remove_copy.pass.cpp ----------------------------------------------===// |
3 | // |
4 | // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions. |
5 | // See https://llvm.org/LICENSE.txt for license information. |
6 | // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception |
7 | // |
8 | //===----------------------------------------------------------------------===// |
9 | |
10 | // UNSUPPORTED: c++03, c++11, c++14 |
11 | |
12 | #include "support/pstl_test_config.h" |
13 | |
14 | #include <execution> |
15 | #include <algorithm> |
16 | |
17 | #include "support/utils.h" |
18 | |
19 | using namespace TestUtils; |
20 | |
21 | struct run_remove_copy |
22 | { |
23 | template <typename Policy, typename InputIterator, typename OutputIterator, typename OutputIterator2, typename Size, |
24 | typename T> |
25 | void |
26 | operator()(Policy&& exec, InputIterator first, InputIterator last, OutputIterator out_first, |
27 | OutputIterator out_last, OutputIterator2 expected_first, OutputIterator2, Size n, const T& value, |
28 | T trash) |
29 | { |
30 | // Cleaning |
31 | std::fill_n(expected_first, n, trash); |
32 | std::fill_n(out_first, n, trash); |
33 | |
34 | // Run copy_if |
35 | auto i = std::remove_copy(first, last, expected_first, value); |
36 | (void)i; |
37 | auto k = std::remove_copy(exec, first, last, out_first, value); |
38 | EXPECT_EQ_N(expected_first, out_first, n, "wrong remove_copy effect" ); |
39 | for (size_t j = 0; j < GuardSize; ++j) |
40 | { |
41 | ++k; |
42 | } |
43 | EXPECT_TRUE(out_last == k, "wrong return value from remove_copy" ); |
44 | } |
45 | }; |
46 | |
47 | template <typename T, typename Convert> |
48 | void |
49 | test(T trash, const T& value, Convert convert, bool check_weakness = true) |
50 | { |
51 | // Try sequences of various lengths. |
52 | for (size_t n = 0; n <= 100000; n = n <= 16 ? n + 1 : size_t(3.1415 * n)) |
53 | { |
54 | // count is number of output elements, plus a handful |
55 | // more for sake of detecting buffer overruns. |
56 | size_t count = GuardSize; |
57 | Sequence<T> in(n, [&](size_t k) -> T { |
58 | T x = convert(n ^ k); |
59 | count += !(x == value) ? 1 : 0; |
60 | return x; |
61 | }); |
62 | using namespace std; |
63 | |
64 | Sequence<T> out(count, [=](size_t) { return trash; }); |
65 | Sequence<T> expected(count, [=](size_t) { return trash; }); |
66 | if (check_weakness) |
67 | { |
68 | auto expected_result = remove_copy(in.cfbegin(), in.cfend(), expected.begin(), value); |
69 | size_t m = expected_result - expected.begin(); |
70 | EXPECT_TRUE(n / 4 <= m && m <= 3 * (n + 1) / 4, "weak test for remove_copy" ); |
71 | } |
72 | invoke_on_all_policies(run_remove_copy(), in.begin(), in.end(), out.begin(), out.end(), expected.begin(), |
73 | expected.end(), count, value, trash); |
74 | invoke_on_all_policies(run_remove_copy(), in.cbegin(), in.cend(), out.begin(), out.end(), expected.begin(), |
75 | expected.end(), count, value, trash); |
76 | } |
77 | } |
78 | |
79 | int |
80 | main() |
81 | { |
82 | |
83 | test<float64_t>(trash: -666.0, value: 8.5, convert: [](size_t j) { return ((j + 1) % 7 & 2) != 0 ? 8.5 : float64_t(j % 32 + j); }); |
84 | |
85 | test<int32_t>(trash: -666, value: 42, convert: [](size_t j) { return ((j + 1) % 5 & 2) != 0 ? 42 : -1 - int32_t(j); }); |
86 | |
87 | test<Number>(trash: Number(42, OddTag()), value: Number(2001, OddTag()), |
88 | convert: [](int32_t j) { return ((j + 1) % 3 & 2) != 0 ? Number(2001, OddTag()) : Number(j, OddTag()); }); |
89 | std::cout << done() << std::endl; |
90 | return 0; |
91 | } |
92 | |