filter.hpp
Go to the documentation of this file.
1 //
2 // Copyright (C) 2014, 2015 Ableton AG, Berlin. All rights reserved.
3 //
4 // Permission is hereby granted, free of charge, to any person obtaining a
5 // copy of this software and associated documentation files (the "Software"),
6 // to deal in the Software without restriction, including without limitation
7 // the rights to use, copy, modify, merge, publish, distribute, sublicense,
8 // and/or sell copies of the Software, and to permit persons to whom the
9 // Software is furnished to do so, subject to the following conditions:
10 //
11 // The above copyright notice and this permission notice shall be included in
12 // all copies or substantial portions of the Software.
13 //
14 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
15 // IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
16 // FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
17 // THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
18 // LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
19 // FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
20 // DEALINGS IN THE SOFTWARE.
21 //
22 
27 #pragma once
28 
30 #include <atria/xform/skip.hpp>
32 
33 namespace atria {
34 namespace xform {
35 
36 #if ABL_CXX14
37 
38 auto filter = [](auto predicate) mutable
39 {
40  return [=](auto step) mutable
41  {
42  return [=](auto&& s, auto&& ...is) mutable
43  {
44  return estd::invoke(predicate, is...)
45  ? call(step, ABL_FORWARD(s), ABL_FORWARD(is)...)
46  : skip(step, ABL_FORWARD(s), ABL_FORWARD(is)...);
47  };
48  };
49 };
50 
51 #else // ABL_CXX14
52 
53 namespace detail {
54 
55 struct filter_rf_gen
56 {
57  template <typename ReducingFnT,
58  typename PredicateT>
59  struct apply
60  {
61  ReducingFnT step;
62  PredicateT predicate;
63 
64  template <typename State, typename ...Inputs>
65  auto operator() (State&& s, Inputs&& ...is)
67  estd::invoke(predicate, is...)
68  ? call(step, std::forward<State>(s), std::forward<Inputs>(is)...)
69  : skip(step, std::forward<State>(s), std::forward<Inputs>(is)...))
70  };
71 };
72 
73 } // namespace detail
74 
75 template <typename T>
76 using filter_t = transducer_impl<detail::filter_rf_gen, T>;
77 
81 template <typename PredicateT>
82 auto filter(PredicateT&& predicate)
84 {
86  std::forward<PredicateT>(predicate) };
87 }
88 
89 #endif // ABL_CXX14
90 
91 } // namespace xform
92 } // namespace atria
auto call(ReducingFnT &&step, StateT &&state, InputTs &&...ins) -> estd::enable_if_t< is_skip_state< estd::decay_t< StateT > >
Call the next reducing function in a transducer that could otherwise skip calling the next reducing f...
Definition: skip.hpp:276
#define ABL_DECLTYPE_RETURN(body_expr)
Utility for defining generic functions with a deduced return type, that are composed of a single expr...
Definition: utils.hpp:109
Utility to write simple transducers easily.
C++ amazing templates and reusable implementations awesomeness.
Definition: _doc.hpp:35
auto filter(PredicateT &&predicate) -> filter_t< estd::decay_t< PredicateT > >
Similar to clojure.core/filter$1.
Definition: filter.hpp:82
auto skip(ReducingFnT &&, StateT &&state, InputTs &&...) -> skip_result_t< ReducingFnT, StateT, InputTs... >
Skip calling the next reducing function in a transducer.
Definition: skip.hpp:228
Fork me on GitHub