Chris@16: #if !BOOST_PHOENIX_IS_ITERATING
Chris@16: /*==============================================================================
Chris@16:     Copyright (c) 2005-2010 Joel de Guzman
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: #include <boost/phoenix/support/iterate.hpp>
Chris@16: 
Chris@16: #define BOOST_PHOENIX_EXTRACT_LOCAL_TYPE(Z, N, D)                               \
Chris@16:     typename proto::detail::uncvref<                                            \
Chris@16:         typename proto::result_of::child_c<                                     \
Chris@16:             BOOST_PP_CAT(A, N)                                                  \
Chris@16:           , 1                                                                   \
Chris@16:         >::type                                                                 \
Chris@16:     >::type
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_EXTRACT_LOCAL(Z, N, D)                                    \
Chris@16:         proto::child_c<1>(BOOST_PP_CAT(a, N))                                   \
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_EXTRACT_LOCAL_KEY(Z, N, D)                                \
Chris@16:     typename proto::detail::uncvref<                                            \
Chris@16:         typename proto::result_of::value<                                       \
Chris@16:             typename proto::result_of::child_c<                                 \
Chris@16:                 BOOST_PP_CAT(A, N)                                              \
Chris@16:               , 0                                                               \
Chris@16:             >::type                                                             \
Chris@16:         >::type                                                                 \
Chris@16:     >::type
Chris@16: /**/
Chris@16: 
Chris@16: #define BOOST_PHOENIX_ITERATION_PARAMS                                          \
Chris@16:     (3, (1, BOOST_PHOENIX_LOCAL_LIMIT,                                          \
Chris@16:     <boost/phoenix/scope/detail/local_gen.hpp>))
Chris@16: #include BOOST_PHOENIX_ITERATE()
Chris@16: 
Chris@16: #else
Chris@16: 
Chris@16:         template <BOOST_PHOENIX_typename_A>
Chris@16:         BOOST_PHOENIX_SCOPE_ACTOR_GEN_NAME<
Chris@16:             BOOST_PP_CAT(vector, BOOST_PHOENIX_ITERATION)<BOOST_PP_ENUM(BOOST_PHOENIX_ITERATION, BOOST_PHOENIX_EXTRACT_LOCAL_TYPE, _)>
Chris@16:           , detail::map_local_index_to_tuple<BOOST_PP_ENUM(BOOST_PHOENIX_ITERATION, BOOST_PHOENIX_EXTRACT_LOCAL_KEY, _)>
Chris@16:         >
Chris@16:         BOOST_PHOENIX_SCOPE_ACTOR_GEN_FUNCTION (BOOST_PHOENIX_A_const_ref_a) BOOST_PHOENIX_SCOPE_ACTOR_GEN_CONST
Chris@16:         {
Chris@16:             typedef
Chris@16:                 BOOST_PP_CAT(vector, BOOST_PHOENIX_ITERATION)<BOOST_PP_ENUM(BOOST_PHOENIX_ITERATION, BOOST_PHOENIX_EXTRACT_LOCAL_TYPE, _)>
Chris@16:                 locals_type;
Chris@16: 
Chris@16:             locals_type locals = {BOOST_PP_ENUM(BOOST_PHOENIX_ITERATION, BOOST_PHOENIX_EXTRACT_LOCAL, _)};
Chris@16: 
Chris@16:             return
Chris@16:                 BOOST_PHOENIX_SCOPE_ACTOR_GEN_NAME<
Chris@16:                     locals_type
Chris@16:                   , detail::map_local_index_to_tuple<
Chris@16:                         BOOST_PP_ENUM(BOOST_PHOENIX_ITERATION, BOOST_PHOENIX_EXTRACT_LOCAL_KEY, _)
Chris@16:                     >
Chris@16:                 >(locals);
Chris@16:         }
Chris@16: 
Chris@16: #endif
Chris@16: