// Copyright Daniel Wallin 2005. Use, modification and distribution is | |
// subject to 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_PARAMETER_FLATTEN_051217_HPP | |
# define BOOST_PARAMETER_FLATTEN_051217_HPP | |
# include <boost/preprocessor/tuple/elem.hpp> | |
# include <boost/preprocessor/tuple/rem.hpp> | |
# include <boost/preprocessor/cat.hpp> | |
# include <boost/preprocessor/seq/for_each.hpp> | |
# include <boost/preprocessor/seq/for_each_i.hpp> | |
# include <boost/preprocessor/identity.hpp> | |
# include <boost/preprocessor/selection/max.hpp> | |
# include <boost/preprocessor/arithmetic/sub.hpp> | |
# include <boost/preprocessor/repetition/enum_trailing.hpp> | |
# include <boost/parameter/aux_/preprocessor/for_each.hpp> | |
# define BOOST_PARAMETER_FLATTEN_SPLIT_required required, | |
# define BOOST_PARAMETER_FLATTEN_SPLIT_optional optional, | |
# define BOOST_PARAMETER_FLATTEN_SPLIT_deduced deduced, | |
# define BOOST_PARAMETER_FLATTEN_SPLIT(sub) \ | |
BOOST_PP_CAT(BOOST_PARAMETER_FLATTEN_SPLIT_, sub) | |
# define BOOST_PARAMETER_FLATTEN_QUALIFIER(sub) \ | |
BOOST_PP_SPLIT(0, BOOST_PARAMETER_FLATTEN_SPLIT(sub)) | |
# define BOOST_PARAMETER_FLATTEN_ARGS(sub) \ | |
BOOST_PP_SPLIT(1, BOOST_PARAMETER_FLATTEN_SPLIT(sub)) | |
# define BOOST_PARAMETER_FLATTEN_ARITY_optional(arities) \ | |
BOOST_PP_TUPLE_ELEM(3,0,arities) | |
# define BOOST_PARAMETER_FLATTEN_ARITY_required(arities) \ | |
BOOST_PP_TUPLE_ELEM(3,1,arities) | |
# define BOOST_PARAMETER_FLATTEN_SPEC0_DUMMY_ELEM(z, n, data) ~ | |
# define BOOST_PARAMETER_FLATTEN_SPEC0(r, n, elem, data) \ | |
(( \ | |
BOOST_PP_TUPLE_ELEM(3,2,data) \ | |
, BOOST_PP_TUPLE_REM(BOOST_PP_TUPLE_ELEM(3,0,data)) elem \ | |
BOOST_PP_ENUM_TRAILING( \ | |
BOOST_PP_SUB( \ | |
BOOST_PP_TUPLE_ELEM(3,1,data) \ | |
, BOOST_PP_TUPLE_ELEM(3,0,data) \ | |
) \ | |
, BOOST_PARAMETER_FLATTEN_SPEC0_DUMMY_ELEM \ | |
, ~ \ | |
) \ | |
)) | |
# define BOOST_PARAMETER_FLATTEN_SPEC_AUX(r, arity, max_arity, spec, transform) \ | |
BOOST_PARAMETER_FOR_EACH_R( \ | |
r \ | |
, arity \ | |
, BOOST_PARAMETER_FLATTEN_ARGS(spec) \ | |
, (arity, max_arity, transform(BOOST_PARAMETER_FLATTEN_QUALIFIER(spec))) \ | |
, BOOST_PARAMETER_FLATTEN_SPEC0 \ | |
) | |
# define BOOST_PARAMETER_FLATTEN_IDENTITY(x) x | |
# define BOOST_PARAMETER_FLATTEN_SPEC_optional(r, arities, spec) \ | |
BOOST_PARAMETER_FLATTEN_SPEC_AUX( \ | |
r \ | |
, BOOST_PP_CAT( \ | |
BOOST_PARAMETER_FLATTEN_ARITY_, BOOST_PARAMETER_FLATTEN_QUALIFIER(spec) \ | |
)(arities) \ | |
, BOOST_PP_TUPLE_ELEM(3,2,arities) \ | |
, spec \ | |
, BOOST_PARAMETER_FLATTEN_IDENTITY \ | |
) | |
# define BOOST_PARAMETER_FLATTEN_SPEC_required(r, arities, spec) \ | |
BOOST_PARAMETER_FLATTEN_SPEC_optional(r, arities, spec) | |
# define BOOST_PARAMETER_FLATTEN_SPEC_AS_DEDUCED(x) BOOST_PP_CAT(deduced_,x) | |
# define BOOST_PARAMETER_FLATTEN_SPEC_deduced_M(r, arities, n, spec) \ | |
BOOST_PARAMETER_FLATTEN_SPEC_AUX( \ | |
r \ | |
, BOOST_PP_CAT( \ | |
BOOST_PARAMETER_FLATTEN_ARITY_, BOOST_PARAMETER_FLATTEN_QUALIFIER(spec) \ | |
)(arities) \ | |
, BOOST_PP_TUPLE_ELEM(3,2,arities) \ | |
, spec \ | |
, BOOST_PARAMETER_FLATTEN_SPEC_AS_DEDUCED \ | |
) | |
# define BOOST_PARAMETER_FLATTEN_SPEC_deduced(r, arities, spec) \ | |
BOOST_PP_SEQ_FOR_EACH_I_R( \ | |
r \ | |
, BOOST_PARAMETER_FLATTEN_SPEC_deduced_M \ | |
, arities \ | |
, BOOST_PARAMETER_FLATTEN_ARGS(spec) \ | |
) | |
# define BOOST_PARAMETER_FLATTEN_SPEC(r, arities, spec) \ | |
BOOST_PP_CAT( \ | |
BOOST_PARAMETER_FLATTEN_SPEC_, BOOST_PARAMETER_FLATTEN_QUALIFIER(spec) \ | |
)(r, arities, spec) | |
# define BOOST_PARAMETER_FLATTEN(optional_arity, required_arity, wanted_arity, specs) \ | |
BOOST_PP_SEQ_FOR_EACH( \ | |
BOOST_PARAMETER_FLATTEN_SPEC \ | |
, ( \ | |
optional_arity, required_arity \ | |
, wanted_arity \ | |
) \ | |
, specs \ | |
) | |
#endif // BOOST_PARAMETER_FLATTEN_051217_HPP | |