Chris@16
|
1 // Copyright Daniel Wallin 2005. Use, modification and distribution is
|
Chris@16
|
2 // subject to the Boost Software License, Version 1.0. (See accompanying
|
Chris@16
|
3 // file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
|
Chris@16
|
4
|
Chris@16
|
5 #ifndef BOOST_PARAMETER_FLATTEN_051217_HPP
|
Chris@16
|
6 # define BOOST_PARAMETER_FLATTEN_051217_HPP
|
Chris@16
|
7
|
Chris@16
|
8 # include <boost/preprocessor/tuple/elem.hpp>
|
Chris@16
|
9 # include <boost/preprocessor/tuple/rem.hpp>
|
Chris@16
|
10 # include <boost/preprocessor/cat.hpp>
|
Chris@16
|
11 # include <boost/preprocessor/seq/for_each.hpp>
|
Chris@16
|
12 # include <boost/preprocessor/seq/for_each_i.hpp>
|
Chris@16
|
13 # include <boost/preprocessor/identity.hpp>
|
Chris@16
|
14 # include <boost/preprocessor/selection/max.hpp>
|
Chris@16
|
15 # include <boost/preprocessor/arithmetic/sub.hpp>
|
Chris@16
|
16 # include <boost/preprocessor/repetition/enum_trailing.hpp>
|
Chris@16
|
17 # include <boost/parameter/aux_/preprocessor/for_each.hpp>
|
Chris@16
|
18
|
Chris@16
|
19 # define BOOST_PARAMETER_FLATTEN_SPLIT_required required,
|
Chris@16
|
20 # define BOOST_PARAMETER_FLATTEN_SPLIT_optional optional,
|
Chris@16
|
21 # define BOOST_PARAMETER_FLATTEN_SPLIT_deduced deduced,
|
Chris@16
|
22
|
Chris@16
|
23 # define BOOST_PARAMETER_FLATTEN_SPLIT(sub) \
|
Chris@16
|
24 BOOST_PP_CAT(BOOST_PARAMETER_FLATTEN_SPLIT_, sub)
|
Chris@16
|
25
|
Chris@16
|
26 # define BOOST_PARAMETER_FLATTEN_QUALIFIER(sub) \
|
Chris@16
|
27 BOOST_PP_SPLIT(0, BOOST_PARAMETER_FLATTEN_SPLIT(sub))
|
Chris@16
|
28
|
Chris@16
|
29 # define BOOST_PARAMETER_FLATTEN_ARGS(sub) \
|
Chris@16
|
30 BOOST_PP_SPLIT(1, BOOST_PARAMETER_FLATTEN_SPLIT(sub))
|
Chris@16
|
31
|
Chris@16
|
32 # define BOOST_PARAMETER_FLATTEN_ARITY_optional(arities) \
|
Chris@16
|
33 BOOST_PP_TUPLE_ELEM(3,0,arities)
|
Chris@16
|
34
|
Chris@16
|
35 # define BOOST_PARAMETER_FLATTEN_ARITY_required(arities) \
|
Chris@16
|
36 BOOST_PP_TUPLE_ELEM(3,1,arities)
|
Chris@16
|
37
|
Chris@16
|
38 # define BOOST_PARAMETER_FLATTEN_SPEC0_DUMMY_ELEM(z, n, data) ~
|
Chris@16
|
39 # define BOOST_PARAMETER_FLATTEN_SPEC0(r, n, elem, data) \
|
Chris@16
|
40 (( \
|
Chris@16
|
41 BOOST_PP_TUPLE_ELEM(3,2,data) \
|
Chris@16
|
42 , BOOST_PP_TUPLE_REM(BOOST_PP_TUPLE_ELEM(3,0,data)) elem \
|
Chris@16
|
43 BOOST_PP_ENUM_TRAILING( \
|
Chris@16
|
44 BOOST_PP_SUB( \
|
Chris@16
|
45 BOOST_PP_TUPLE_ELEM(3,1,data) \
|
Chris@16
|
46 , BOOST_PP_TUPLE_ELEM(3,0,data) \
|
Chris@16
|
47 ) \
|
Chris@16
|
48 , BOOST_PARAMETER_FLATTEN_SPEC0_DUMMY_ELEM \
|
Chris@16
|
49 , ~ \
|
Chris@16
|
50 ) \
|
Chris@16
|
51 ))
|
Chris@16
|
52
|
Chris@16
|
53 # define BOOST_PARAMETER_FLATTEN_SPEC_AUX(r, arity, max_arity, spec, transform) \
|
Chris@16
|
54 BOOST_PARAMETER_FOR_EACH_R( \
|
Chris@16
|
55 r \
|
Chris@16
|
56 , arity \
|
Chris@16
|
57 , BOOST_PARAMETER_FLATTEN_ARGS(spec) \
|
Chris@16
|
58 , (arity, max_arity, transform(BOOST_PARAMETER_FLATTEN_QUALIFIER(spec))) \
|
Chris@16
|
59 , BOOST_PARAMETER_FLATTEN_SPEC0 \
|
Chris@16
|
60 )
|
Chris@16
|
61
|
Chris@16
|
62 # define BOOST_PARAMETER_FLATTEN_IDENTITY(x) x
|
Chris@16
|
63
|
Chris@16
|
64 # define BOOST_PARAMETER_FLATTEN_SPEC_optional(r, arities, spec) \
|
Chris@16
|
65 BOOST_PARAMETER_FLATTEN_SPEC_AUX( \
|
Chris@16
|
66 r \
|
Chris@16
|
67 , BOOST_PP_CAT( \
|
Chris@16
|
68 BOOST_PARAMETER_FLATTEN_ARITY_, BOOST_PARAMETER_FLATTEN_QUALIFIER(spec) \
|
Chris@16
|
69 )(arities) \
|
Chris@16
|
70 , BOOST_PP_TUPLE_ELEM(3,2,arities) \
|
Chris@16
|
71 , spec \
|
Chris@16
|
72 , BOOST_PARAMETER_FLATTEN_IDENTITY \
|
Chris@16
|
73 )
|
Chris@16
|
74
|
Chris@16
|
75 # define BOOST_PARAMETER_FLATTEN_SPEC_required(r, arities, spec) \
|
Chris@16
|
76 BOOST_PARAMETER_FLATTEN_SPEC_optional(r, arities, spec)
|
Chris@16
|
77
|
Chris@16
|
78 # define BOOST_PARAMETER_FLATTEN_SPEC_AS_DEDUCED(x) BOOST_PP_CAT(deduced_,x)
|
Chris@16
|
79
|
Chris@16
|
80 # define BOOST_PARAMETER_FLATTEN_SPEC_deduced_M(r, arities, n, spec) \
|
Chris@16
|
81 BOOST_PARAMETER_FLATTEN_SPEC_AUX( \
|
Chris@16
|
82 r \
|
Chris@16
|
83 , BOOST_PP_CAT( \
|
Chris@16
|
84 BOOST_PARAMETER_FLATTEN_ARITY_, BOOST_PARAMETER_FLATTEN_QUALIFIER(spec) \
|
Chris@16
|
85 )(arities) \
|
Chris@16
|
86 , BOOST_PP_TUPLE_ELEM(3,2,arities) \
|
Chris@16
|
87 , spec \
|
Chris@16
|
88 , BOOST_PARAMETER_FLATTEN_SPEC_AS_DEDUCED \
|
Chris@16
|
89 )
|
Chris@16
|
90
|
Chris@16
|
91 # define BOOST_PARAMETER_FLATTEN_SPEC_deduced(r, arities, spec) \
|
Chris@16
|
92 BOOST_PP_SEQ_FOR_EACH_I_R( \
|
Chris@16
|
93 r \
|
Chris@16
|
94 , BOOST_PARAMETER_FLATTEN_SPEC_deduced_M \
|
Chris@16
|
95 , arities \
|
Chris@16
|
96 , BOOST_PARAMETER_FLATTEN_ARGS(spec) \
|
Chris@16
|
97 )
|
Chris@16
|
98
|
Chris@16
|
99 # define BOOST_PARAMETER_FLATTEN_SPEC(r, arities, spec) \
|
Chris@16
|
100 BOOST_PP_CAT( \
|
Chris@16
|
101 BOOST_PARAMETER_FLATTEN_SPEC_, BOOST_PARAMETER_FLATTEN_QUALIFIER(spec) \
|
Chris@16
|
102 )(r, arities, spec)
|
Chris@16
|
103
|
Chris@16
|
104 # define BOOST_PARAMETER_FLATTEN(optional_arity, required_arity, wanted_arity, specs) \
|
Chris@16
|
105 BOOST_PP_SEQ_FOR_EACH( \
|
Chris@16
|
106 BOOST_PARAMETER_FLATTEN_SPEC \
|
Chris@16
|
107 , ( \
|
Chris@16
|
108 optional_arity, required_arity \
|
Chris@16
|
109 , wanted_arity \
|
Chris@16
|
110 ) \
|
Chris@16
|
111 , specs \
|
Chris@16
|
112 )
|
Chris@16
|
113
|
Chris@16
|
114 #endif // BOOST_PARAMETER_FLATTEN_051217_HPP
|
Chris@16
|
115
|