blob: d2c794f43fd8364430ef293feb0048c1e9054cfe [file] [log] [blame]
/*=============================================================================
Copyright (c) 2001-2007 Joel de Guzman
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)
==============================================================================*/
#if !defined(BOOST_PP_IS_ITERATING)
#if !defined(PHOENIX_BIND_DETAIL_BIND_FUNCTION_HPP)
#define PHOENIX_BIND_DETAIL_BIND_FUNCTION_HPP
#include <boost/preprocessor/iterate.hpp>
#include <boost/preprocessor/dec.hpp>
#include <boost/preprocessor/repetition/enum_params.hpp>
#include <boost/preprocessor/repetition/enum_binary_params.hpp>
#define BOOST_PP_ITERATION_PARAMS_1 \
(3, (3, BOOST_PP_DEC(PHOENIX_COMPOSITE_LIMIT), \
"boost/spirit/home/phoenix/bind/detail/bind_function.hpp"))
#include BOOST_PP_ITERATE()
#endif
///////////////////////////////////////////////////////////////////////////////
//
// Preprocessor vertical repetition code
//
///////////////////////////////////////////////////////////////////////////////
#else // defined(BOOST_PP_IS_ITERATING)
#define N BOOST_PP_ITERATION()
template <typename RT
, BOOST_PP_ENUM_PARAMS(N, typename T)
, BOOST_PP_ENUM_PARAMS(N, typename A)>
inline actor<
typename as_composite<
detail::function_eval<N>
, detail::function_ptr<N, RT, RT(*)(BOOST_PP_ENUM_PARAMS(N, T))>
, BOOST_PP_ENUM_PARAMS(N, A)
>::type>
bind(RT(*f)(BOOST_PP_ENUM_PARAMS(N, T))
, BOOST_PP_ENUM_BINARY_PARAMS(N, A, const& _))
{
typedef detail::function_ptr<
N, RT, RT(*)(BOOST_PP_ENUM_PARAMS(N, T))> fp_type;
return compose<detail::function_eval<N> >(
fp_type(f), BOOST_PP_ENUM_PARAMS(N, _));
}
#undef N
#endif // defined(BOOST_PP_IS_ITERATING)