Chris@16
|
1 /*=============================================================================
|
Chris@16
|
2 Copyright (c) 2006-2007 Tobias Schwinger
|
Chris@16
|
3
|
Chris@16
|
4 Use modification and distribution are subject to the Boost Software
|
Chris@16
|
5 License, Version 1.0. (See accompanying file LICENSE_1_0.txt or copy at
|
Chris@16
|
6 http://www.boost.org/LICENSE_1_0.txt).
|
Chris@16
|
7 ==============================================================================*/
|
Chris@16
|
8
|
Chris@16
|
9 #if !defined(BOOST_FUSION_FUNCTIONAL_ADAPTER_FUSED_PROCEDURE_HPP_INCLUDED)
|
Chris@16
|
10 #define BOOST_FUSION_FUNCTIONAL_ADAPTER_FUSED_PROCEDURE_HPP_INCLUDED
|
Chris@16
|
11
|
Chris@101
|
12 #include <boost/fusion/support/config.hpp>
|
Chris@16
|
13 #include <boost/type_traits/add_reference.hpp>
|
Chris@16
|
14 #include <boost/config.hpp>
|
Chris@16
|
15
|
Chris@16
|
16 #include <boost/fusion/functional/adapter/detail/access.hpp>
|
Chris@16
|
17 #include <boost/fusion/functional/invocation/invoke_procedure.hpp>
|
Chris@16
|
18
|
Chris@16
|
19 #if defined (BOOST_MSVC)
|
Chris@16
|
20 # pragma warning(push)
|
Chris@16
|
21 # pragma warning (disable: 4512) // assignment operator could not be generated.
|
Chris@16
|
22 #endif
|
Chris@16
|
23
|
Chris@16
|
24 namespace boost { namespace fusion
|
Chris@16
|
25 {
|
Chris@16
|
26 template <typename Function> class fused_procedure;
|
Chris@16
|
27
|
Chris@16
|
28 //----- ---- --- -- - - - -
|
Chris@16
|
29
|
Chris@16
|
30 template <typename Function>
|
Chris@16
|
31 class fused_procedure
|
Chris@16
|
32 {
|
Chris@16
|
33 Function fnc_transformed;
|
Chris@16
|
34
|
Chris@16
|
35 typedef typename detail::qf_c<Function>::type & func_const_fwd_t;
|
Chris@16
|
36 typedef typename detail::qf<Function>::type & func_fwd_t;
|
Chris@16
|
37
|
Chris@16
|
38 public:
|
Chris@16
|
39
|
Chris@101
|
40 BOOST_CONSTEXPR BOOST_FUSION_GPU_ENABLED
|
Chris@16
|
41 inline explicit fused_procedure(func_const_fwd_t f = Function())
|
Chris@16
|
42 : fnc_transformed(f)
|
Chris@16
|
43 { }
|
Chris@16
|
44
|
Chris@16
|
45 template <class Seq>
|
Chris@101
|
46 BOOST_CXX14_CONSTEXPR BOOST_FUSION_GPU_ENABLED
|
Chris@16
|
47 inline void operator()(Seq const & s) const
|
Chris@16
|
48 {
|
Chris@16
|
49 fusion::invoke_procedure<
|
Chris@16
|
50 func_const_fwd_t >(this->fnc_transformed,s);
|
Chris@16
|
51 }
|
Chris@16
|
52
|
Chris@16
|
53 template <class Seq>
|
Chris@101
|
54 BOOST_CXX14_CONSTEXPR BOOST_FUSION_GPU_ENABLED
|
Chris@16
|
55 inline void operator()(Seq const & s)
|
Chris@16
|
56 {
|
Chris@16
|
57 fusion::invoke_procedure<
|
Chris@16
|
58 func_fwd_t >(this->fnc_transformed,s);
|
Chris@16
|
59 }
|
Chris@16
|
60
|
Chris@16
|
61 template <class Seq>
|
Chris@101
|
62 BOOST_CXX14_CONSTEXPR BOOST_FUSION_GPU_ENABLED
|
Chris@16
|
63 inline void operator()(Seq & s) const
|
Chris@16
|
64 {
|
Chris@16
|
65 fusion::invoke_procedure<
|
Chris@16
|
66 func_const_fwd_t >(this->fnc_transformed,s);
|
Chris@16
|
67 }
|
Chris@16
|
68
|
Chris@16
|
69 template <class Seq>
|
Chris@101
|
70 BOOST_CXX14_CONSTEXPR BOOST_FUSION_GPU_ENABLED
|
Chris@16
|
71 inline void operator()(Seq & s)
|
Chris@16
|
72 {
|
Chris@16
|
73 return fusion::invoke_procedure<
|
Chris@16
|
74 func_fwd_t >(this->fnc_transformed,s);
|
Chris@16
|
75 }
|
Chris@16
|
76
|
Chris@16
|
77 typedef void result_type;
|
Chris@16
|
78 };
|
Chris@16
|
79 }}
|
Chris@16
|
80
|
Chris@16
|
81 #if defined (BOOST_MSVC)
|
Chris@16
|
82 # pragma warning(pop)
|
Chris@16
|
83 #endif
|
Chris@16
|
84
|
Chris@16
|
85 #endif
|
Chris@16
|
86
|