| /*============================================================================= |
| Copyright (c) 2001-2010 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) |
| ==============================================================================*/ |
| #ifndef BOOST_PP_IS_ITERATING |
| #ifndef SCHEME_FUNCTION_CALL_HPP |
| #define SCHEME_FUNCTION_CALL_HPP |
| |
| #include <boost/preprocessor/iterate.hpp> |
| #include <boost/preprocessor/repetition/enum_params.hpp> |
| #include <boost/preprocessor/repetition/enum_binary_params.hpp> |
| #include <boost/preprocessor/repetition/repeat.hpp> |
| |
| #define SCHEME_PUSH_ELEMENT(z, n, _) elements[n] = _##n; |
| |
| #define BOOST_PP_ITERATION_PARAMS_1 \ |
| (3, (3, BOOST_PP_DEC(SCHEME_COMPOSITE_LIMIT), \ |
| "scheme/detail/function_call.hpp")) |
| #include BOOST_PP_ITERATE() |
| |
| #undef SCHEME_PUSH_ELEMENT |
| |
| #endif |
| |
| /////////////////////////////////////////////////////////////////////////////// |
| // |
| // Preprocessor vertical repetition code |
| // |
| /////////////////////////////////////////////////////////////////////////////// |
| #else // defined(BOOST_PP_IS_ITERATING) |
| |
| #define N BOOST_PP_ITERATION() |
| |
| template <BOOST_PP_ENUM_PARAMS(N, typename A)> |
| utree operator()(BOOST_PP_ENUM_BINARY_PARAMS(N, A, const& _)) const |
| { |
| boost::array<utree, N> elements; |
| BOOST_PP_REPEAT(N, SCHEME_PUSH_ELEMENT, _); |
| return derived()(get_range(elements)); |
| } |
| |
| #undef N |
| #endif // defined(BOOST_PP_IS_ITERATING) |
| |
| |
