Chris@16
|
1 #if !BOOST_PHOENIX_IS_ITERATING
|
Chris@16
|
2 /*==============================================================================
|
Chris@16
|
3 Copyright (c) 2005-2010 Joel de Guzman
|
Chris@16
|
4 Copyright (c) 2010 Thomas Heller
|
Chris@16
|
5
|
Chris@16
|
6 Distributed under the Boost Software License, Version 1.0. (See accompanying
|
Chris@16
|
7 file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
|
Chris@16
|
8 ==============================================================================*/
|
Chris@16
|
9
|
Chris@16
|
10 #include <boost/phoenix/support/iterate.hpp>
|
Chris@16
|
11
|
Chris@16
|
12 #define BOOST_PHOENIX_EXTRACT_LOCAL_TYPE(Z, N, D) \
|
Chris@16
|
13 typename proto::detail::uncvref< \
|
Chris@16
|
14 typename proto::result_of::child_c< \
|
Chris@16
|
15 BOOST_PP_CAT(A, N) \
|
Chris@16
|
16 , 1 \
|
Chris@16
|
17 >::type \
|
Chris@16
|
18 >::type
|
Chris@16
|
19 /**/
|
Chris@16
|
20
|
Chris@16
|
21 #define BOOST_PHOENIX_EXTRACT_LOCAL(Z, N, D) \
|
Chris@16
|
22 proto::child_c<1>(BOOST_PP_CAT(a, N)) \
|
Chris@16
|
23 /**/
|
Chris@16
|
24
|
Chris@16
|
25 #define BOOST_PHOENIX_EXTRACT_LOCAL_KEY(Z, N, D) \
|
Chris@16
|
26 typename proto::detail::uncvref< \
|
Chris@16
|
27 typename proto::result_of::value< \
|
Chris@16
|
28 typename proto::result_of::child_c< \
|
Chris@16
|
29 BOOST_PP_CAT(A, N) \
|
Chris@16
|
30 , 0 \
|
Chris@16
|
31 >::type \
|
Chris@16
|
32 >::type \
|
Chris@16
|
33 >::type
|
Chris@16
|
34 /**/
|
Chris@16
|
35
|
Chris@16
|
36 #define BOOST_PHOENIX_ITERATION_PARAMS \
|
Chris@16
|
37 (3, (1, BOOST_PHOENIX_LOCAL_LIMIT, \
|
Chris@16
|
38 <boost/phoenix/scope/detail/local_gen.hpp>))
|
Chris@16
|
39 #include BOOST_PHOENIX_ITERATE()
|
Chris@16
|
40
|
Chris@16
|
41 #else
|
Chris@16
|
42
|
Chris@16
|
43 template <BOOST_PHOENIX_typename_A>
|
Chris@16
|
44 BOOST_PHOENIX_SCOPE_ACTOR_GEN_NAME<
|
Chris@16
|
45 BOOST_PP_CAT(vector, BOOST_PHOENIX_ITERATION)<BOOST_PP_ENUM(BOOST_PHOENIX_ITERATION, BOOST_PHOENIX_EXTRACT_LOCAL_TYPE, _)>
|
Chris@16
|
46 , detail::map_local_index_to_tuple<BOOST_PP_ENUM(BOOST_PHOENIX_ITERATION, BOOST_PHOENIX_EXTRACT_LOCAL_KEY, _)>
|
Chris@16
|
47 >
|
Chris@16
|
48 BOOST_PHOENIX_SCOPE_ACTOR_GEN_FUNCTION (BOOST_PHOENIX_A_const_ref_a) BOOST_PHOENIX_SCOPE_ACTOR_GEN_CONST
|
Chris@16
|
49 {
|
Chris@16
|
50 typedef
|
Chris@16
|
51 BOOST_PP_CAT(vector, BOOST_PHOENIX_ITERATION)<BOOST_PP_ENUM(BOOST_PHOENIX_ITERATION, BOOST_PHOENIX_EXTRACT_LOCAL_TYPE, _)>
|
Chris@16
|
52 locals_type;
|
Chris@16
|
53
|
Chris@16
|
54 locals_type locals = {BOOST_PP_ENUM(BOOST_PHOENIX_ITERATION, BOOST_PHOENIX_EXTRACT_LOCAL, _)};
|
Chris@16
|
55
|
Chris@16
|
56 return
|
Chris@16
|
57 BOOST_PHOENIX_SCOPE_ACTOR_GEN_NAME<
|
Chris@16
|
58 locals_type
|
Chris@16
|
59 , detail::map_local_index_to_tuple<
|
Chris@16
|
60 BOOST_PP_ENUM(BOOST_PHOENIX_ITERATION, BOOST_PHOENIX_EXTRACT_LOCAL_KEY, _)
|
Chris@16
|
61 >
|
Chris@16
|
62 >(locals);
|
Chris@16
|
63 }
|
Chris@16
|
64
|
Chris@16
|
65 #endif
|
Chris@16
|
66
|