123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143 |
- //---------------------------------------------------------------------------//
- // Copyright (c) 2013 Kyle Lutz <kyle.r.lutz@gmail.com>
- //
- // Distributed under the Boost Software License, Version 1.0
- // See accompanying file LICENSE_1_0.txt or copy at
- // http://www.boost.org/LICENSE_1_0.txt
- //
- // See http://boostorg.github.com/compute for more information.
- //---------------------------------------------------------------------------//
- #ifndef BOOST_COMPUTE_FUNCTIONAL_DETAIL_UNPACK_HPP
- #define BOOST_COMPUTE_FUNCTIONAL_DETAIL_UNPACK_HPP
- #include <boost/compute/functional/get.hpp>
- #include <boost/compute/type_traits/is_vector_type.hpp>
- #include <boost/compute/type_traits/result_of.hpp>
- #include <boost/compute/type_traits/vector_size.hpp>
- #include <boost/compute/detail/meta_kernel.hpp>
- namespace boost {
- namespace compute {
- namespace detail {
- template<class Function, class Arg, size_t Arity>
- struct invoked_unpacked
- {
- invoked_unpacked(const Function &f, const Arg &arg)
- : m_function(f),
- m_arg(arg)
- {
- }
- Function m_function;
- Arg m_arg;
- };
- template<class Function, class Arg, size_t Arity>
- inline meta_kernel& operator<<(meta_kernel &k, const invoked_unpacked<Function, Arg, Arity> &expr);
- template<class Function, class Arg>
- inline meta_kernel& operator<<(meta_kernel &k, const invoked_unpacked<Function, Arg, 1> &expr)
- {
- return k << expr.m_function(get<0>()(expr.m_arg));
- }
- template<class Function, class Arg>
- inline meta_kernel& operator<<(meta_kernel &k, const invoked_unpacked<Function, Arg, 2> &expr)
- {
- return k << expr.m_function(get<0>()(expr.m_arg), get<1>()(expr.m_arg));
- }
- template<class Function, class Arg>
- inline meta_kernel& operator<<(meta_kernel &k, const invoked_unpacked<Function, Arg, 3> &expr)
- {
- return k << expr.m_function(get<0>()(expr.m_arg), get<1>()(expr.m_arg), get<2>()(expr.m_arg));
- }
- template<class Function>
- struct unpacked
- {
- template<class T, class Enable = void>
- struct aggregate_length
- {
- BOOST_STATIC_CONSTANT(size_t, value = boost::tuples::length<T>::value);
- };
- template<class T>
- struct aggregate_length<T, typename enable_if<is_vector_type<T> >::type>
- {
- BOOST_STATIC_CONSTANT(size_t, value = vector_size<T>::value);
- };
- template<class TupleArg, size_t TupleSize>
- struct result_impl {};
- template<class TupleArg>
- struct result_impl<TupleArg, 1>
- {
- typedef typename detail::get_result_type<0, TupleArg>::type T1;
- typedef typename boost::compute::result_of<Function(T1)>::type type;
- };
- template<class TupleArg>
- struct result_impl<TupleArg, 2>
- {
- typedef typename detail::get_result_type<0, TupleArg>::type T1;
- typedef typename detail::get_result_type<1, TupleArg>::type T2;
- typedef typename boost::compute::result_of<Function(T1, T2)>::type type;
- };
- template<class TupleArg>
- struct result_impl<TupleArg, 3>
- {
- typedef typename detail::get_result_type<0, TupleArg>::type T1;
- typedef typename detail::get_result_type<1, TupleArg>::type T2;
- typedef typename detail::get_result_type<2, TupleArg>::type T3;
- typedef typename boost::compute::result_of<Function(T1, T2, T3)>::type type;
- };
- template<class Signature>
- struct result {};
- template<class This, class Arg>
- struct result<This(Arg)>
- {
- typedef typename result_impl<Arg, aggregate_length<Arg>::value>::type type;
- };
- unpacked(const Function &f)
- : m_function(f)
- {
- }
- template<class Arg>
- detail::invoked_unpacked<
- Function, Arg, aggregate_length<typename Arg::result_type>::value
- >
- operator()(const Arg &arg) const
- {
- return detail::invoked_unpacked<
- Function,
- Arg,
- aggregate_length<typename Arg::result_type>::value
- >(m_function, arg);
- }
- Function m_function;
- };
- template<class Function>
- inline unpacked<Function> unpack(const Function &f)
- {
- return unpacked<Function>(f);
- }
- } // end detail namespace
- } // end compute namespace
- } // end boost namespace
- #endif // BOOST_COMPUTE_FUNCTIONAL_DETAIL_UNPACK_HPP
|