Chris@16: /*==============================================================================
Chris@16:     Copyright (c) 2010 Thomas Heller
Chris@16: 
Chris@16:     Distributed under the Boost Software License, Version 1.0. (See accompanying
Chris@16:     file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
Chris@16: ==============================================================================*/
Chris@16: 
Chris@16: #if !BOOST_PHOENIX_IS_ITERATING
Chris@16: 
Chris@16: #define BOOST_PHOENIX_typename_A(N)                                             \
Chris@16:     BOOST_PP_ENUM_PARAMS(N, typename A)                                         \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_typename_A_void(N)                                        \
Chris@16:     BOOST_PP_ENUM_PARAMS_WITH_A_DEFAULT(N, typename A, void)                    \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_A(N)                                                      \
Chris@16:     BOOST_PP_ENUM_PARAMS(N, A)                                                  \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_A_ref(N)                                                  \
Chris@16:     BOOST_PP_ENUM_BINARY_PARAMS(N, A, & BOOST_PP_INTERCEPT)                     \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_A_const_ref(N)                                            \
Chris@16:     BOOST_PP_ENUM_BINARY_PARAMS(N, A, const& BOOST_PP_INTERCEPT)                \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_A_a(N)                                                    \
Chris@16:     BOOST_PP_ENUM_BINARY_PARAMS(N, A, a)                                        \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_A_ref_a(N)                                                \
Chris@16:     BOOST_PP_ENUM_BINARY_PARAMS(N, A, & a)                                      \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_A_const_ref_a(N)                                          \
Chris@16:     BOOST_PP_ENUM_BINARY_PARAMS(N, A, const& a)                                 \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_a(N)                                                      \
Chris@16:     BOOST_PP_ENUM_PARAMS(N, a)                                                  \
Chris@16: /**/
Chris@16: 
Chris@16: #else
Chris@16: 
Chris@16: #include <boost/preprocessor/repetition/repeat.hpp>
Chris@16: #include <boost/preprocessor/repetition/enum_binary_params.hpp>
Chris@16: #include <boost/preprocessor/repetition/enum_params.hpp>
Chris@16: #include <boost/preprocessor/repetition/enum_params_with_a_default.hpp>
Chris@16: #include <boost/preprocessor/seq/elem.hpp>
Chris@16: #include <boost/preprocessor/seq/enum.hpp>
Chris@16: #include <boost/preprocessor/seq/for_each_i.hpp>
Chris@16: #include <boost/preprocessor/seq/for_each_product.hpp>
Chris@16: #include <boost/preprocessor/seq/size.hpp>
Chris@16: #include <boost/preprocessor/tuple/elem.hpp>
Chris@16: 
Chris@16: #define BOOST_PHOENIX_ITERATION                                                 \
Chris@16:     BOOST_PP_ITERATION()                                                        \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_typename_A                                                \
Chris@16:     BOOST_PP_ENUM_PARAMS(BOOST_PHOENIX_ITERATION, typename A)                   \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_typename_A_void                                           \
Chris@16:     BOOST_PP_ENUM_PARAMS_WITH_A_DEFAULT(BOOST_PHOENIX_ITERATION, typename A, void)
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_A                                                          \
Chris@16:     BOOST_PP_ENUM_PARAMS(BOOST_PHOENIX_ITERATION, A)                             \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_A_ref                                                      \
Chris@16:     BOOST_PP_ENUM_BINARY_PARAMS(BOOST_PHOENIX_ITERATION, A, & BOOST_PP_INTERCEPT)\
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_A_const_ref                                                \
Chris@16:     BOOST_PP_ENUM_BINARY_PARAMS(BOOST_PHOENIX_ITERATION, A, const& BOOST_PP_INTERCEPT)\
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_A_a                                                        \
Chris@16:     BOOST_PP_ENUM_BINARY_PARAMS(BOOST_PHOENIX_ITERATION, A, a)                   \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_A_ref_a                                                    \
Chris@16:     BOOST_PP_ENUM_BINARY_PARAMS(BOOST_PHOENIX_ITERATION, A, & a)                 \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_A_const_ref_a                                              \
Chris@16:     BOOST_PP_ENUM_BINARY_PARAMS(BOOST_PHOENIX_ITERATION, A, const& a)            \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_a                                                          \
Chris@16:     BOOST_PP_ENUM_PARAMS(BOOST_PHOENIX_ITERATION, a)                             \
Chris@16: /**/
Chris@16: 
Chris@16:     /////////////////////////////////////////////////////////////////////////////
Chris@16:     // Begin Perfect Forward argument permutation calculation
Chris@16:     /////////////////////////////////////////////////////////////////////////////
Chris@16: #define BOOST_PHOENIX_M0_R(_, N, __)                                            \
Chris@16:     (((A ## N)(&))((A ## N)(const&)))                                           \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_M0                                                        \
Chris@16:     BOOST_PP_REPEAT(BOOST_PHOENIX_ITERATION, BOOST_PHOENIX_M0_R, _)             \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_M1_R_R(_, N, SEQ)                                         \
Chris@16:     BOOST_PP_SEQ_ELEM(N, SEQ)                                                   \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_M1_R(R, __, ___, ELEM)                                    \
Chris@16:     (BOOST_PP_REPEAT(BOOST_PP_SEQ_SIZE(ELEM), BOOST_PHOENIX_M1_R_R, ELEM))      \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_M1(R, PRODUCT)                                            \
Chris@16:     ((BOOST_PP_SEQ_ENUM                                                         \
Chris@16:         (BOOST_PP_SEQ_FOR_EACH_I_R                                              \
Chris@16:             (R, BOOST_PHOENIX_M1_R, _, PRODUCT))))                              \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_PERM_SEQ                                                  \
Chris@16:     BOOST_PP_SEQ_FOR_EACH_PRODUCT(BOOST_PHOENIX_M1, BOOST_PHOENIX_M0)           \
Chris@16: /**/
Chris@16:     ////////////////////////////////////////////////////////////////////////////
Chris@16:     // End
Chris@16:     ////////////////////////////////////////////////////////////////////////////
Chris@16: 
Chris@16: #define BOOST_PHOENIX_PERM_SIZE                                                 \
Chris@16:     BOOST_PP_SEQ_SIZE(BOOST_PHOENIX_PERM_SEQ)                                   \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_M2(_, N, TUPLE)                                           \
Chris@16:     BOOST_PP_COMMA_IF(N) BOOST_PP_TUPLE_ELEM(BOOST_PHOENIX_ITERATION, N, TUPLE) \
Chris@16: /**/
Chris@16:     
Chris@16: #define BOOST_PHOENIX_M3(_, N, TUPLE)                                           \
Chris@16:     BOOST_PP_COMMA_IF(N) BOOST_PP_TUPLE_ELEM(BOOST_PHOENIX_ITERATION, N, TUPLE) a ## N\
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_PERM_ELEM(N)                                              \
Chris@16:     BOOST_PP_SEQ_ELEM(N, BOOST_PHOENIX_PERM_SEQ)                                \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_PERM_A(N)                                                 \
Chris@16:     BOOST_PP_REPEAT(BOOST_PHOENIX_ITERATION, BOOST_PHOENIX_M2, BOOST_PHOENIX_PERM_ELEM(N))\
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_PERM_A_a(N)                                               \
Chris@16:     BOOST_PP_REPEAT(BOOST_PHOENIX_ITERATION, BOOST_PHOENIX_M3, BOOST_PHOENIX_PERM_ELEM(N))\
Chris@16: /**/
Chris@16: 
Chris@16: #endif