123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245 |
- /*=============================================================================
- Copyright (c) 2001-2009 Joel de Guzman
- Copyright (c) 2005-2006 Dan Marsden
- Copyright (c) 2009-2011 Christopher Schmidt
- Distributed under 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_FUSION_ADAPTED_STRUCT_DETAIL_ADAPT_BASE_HPP
- #define BOOST_FUSION_ADAPTED_STRUCT_DETAIL_ADAPT_BASE_HPP
- #include <boost/config.hpp>
- #include <boost/fusion/support/tag_of_fwd.hpp>
- #include <boost/preprocessor/empty.hpp>
- #include <boost/preprocessor/stringize.hpp>
- #include <boost/preprocessor/control/if.hpp>
- #include <boost/preprocessor/seq/size.hpp>
- #include <boost/preprocessor/seq/for_each.hpp>
- #include <boost/preprocessor/seq/for_each_i.hpp>
- #include <boost/preprocessor/seq/enum.hpp>
- #include <boost/preprocessor/seq/seq.hpp>
- #include <boost/preprocessor/tuple/eat.hpp>
- #include <boost/preprocessor/tuple/elem.hpp>
- #include <boost/preprocessor/arithmetic/dec.hpp>
- #include <boost/mpl/bool.hpp>
- #include <boost/mpl/tag.hpp>
- #include <boost/mpl/eval_if.hpp>
- #include <boost/mpl/identity.hpp>
- #include <boost/type_traits/add_const.hpp>
- #define BOOST_FUSION_ADAPT_STRUCT_UNPACK_NAME_TEMPLATE_PARAMS(SEQ) \
- BOOST_PP_SEQ_HEAD(SEQ)<BOOST_PP_SEQ_ENUM(BOOST_PP_SEQ_TAIL(SEQ))> \
- BOOST_PP_EMPTY()
- #define BOOST_FUSION_ADAPT_STRUCT_UNPACK_NAME(SEQ) \
- BOOST_PP_IF( \
- BOOST_PP_SEQ_HEAD(SEQ), \
- BOOST_FUSION_ADAPT_STRUCT_UNPACK_NAME_TEMPLATE_PARAMS, \
- BOOST_PP_SEQ_HEAD)(BOOST_PP_SEQ_TAIL(SEQ))
- #define BOOST_FUSION_ADAPT_STRUCT_UNPACK_TEMPLATE_PARAMS_IMPL_C(R, _, ELEM) \
- (typename ELEM)
- #define BOOST_FUSION_ADAPT_STRUCT_UNPACK_TEMPLATE_PARAMS_IMPL(SEQ) \
- BOOST_PP_SEQ_ENUM( \
- BOOST_PP_SEQ_FOR_EACH( \
- BOOST_FUSION_ADAPT_STRUCT_UNPACK_TEMPLATE_PARAMS_IMPL_C, \
- _, \
- BOOST_PP_SEQ_TAIL(SEQ)))
- #define BOOST_FUSION_ADAPT_STRUCT_UNPACK_TEMPLATE_PARAMS(SEQ) \
- BOOST_PP_IF( \
- BOOST_PP_SEQ_HEAD(SEQ), \
- BOOST_FUSION_ADAPT_STRUCT_UNPACK_TEMPLATE_PARAMS_IMPL, \
- BOOST_PP_TUPLE_EAT(1))(SEQ)
- #ifdef BOOST_NO_PARTIAL_SPECIALIZATION_IMPLICIT_DEFAULT_ARGS
- # define BOOST_FUSION_ADAPT_STRUCT_TAG_OF_SPECIALIZATION( \
- MODIFIER, TEMPLATE_PARAMS_SEQ, NAME_SEQ, TAG) \
- \
- template< \
- BOOST_FUSION_ADAPT_STRUCT_UNPACK_TEMPLATE_PARAMS(TEMPLATE_PARAMS_SEQ) \
- > \
- struct tag_of< \
- BOOST_FUSION_ADAPT_STRUCT_UNPACK_NAME(NAME_SEQ) MODIFIER \
- , void \
- > \
- { \
- typedef TAG type; \
- };
- #else
- # define BOOST_FUSION_ADAPT_STRUCT_TAG_OF_SPECIALIZATION( \
- MODIFIER, TEMPLATE_PARAMS_SEQ, NAME_SEQ, TAG) \
- \
- template< \
- BOOST_FUSION_ADAPT_STRUCT_UNPACK_TEMPLATE_PARAMS(TEMPLATE_PARAMS_SEQ) \
- > \
- struct tag_of<BOOST_FUSION_ADAPT_STRUCT_UNPACK_NAME(NAME_SEQ) MODIFIER> \
- { \
- typedef TAG type; \
- };
- #endif
- #define BOOST_FUSION_ADAPT_STRUCT_BASE_UNPACK_AND_CALL(R,DATA,I,ATTRIBUTE) \
- BOOST_PP_TUPLE_ELEM(3,0,DATA)( \
- BOOST_PP_TUPLE_ELEM(3,1,DATA), \
- BOOST_PP_TUPLE_ELEM(3,2,DATA), \
- I, \
- ATTRIBUTE)
- #ifdef BOOST_MSVC
- # define BOOST_FUSION_ADAPT_STRUCT_MSVC_REDEFINE_TEMPLATE_PARAM(R,_,ELEM) \
- typedef ELEM ELEM;
- # define BOOST_FUSION_ADAPT_STRUCT_MSVC_REDEFINE_TEMPLATE_PARAMS_IMPL(SEQ) \
- BOOST_PP_SEQ_FOR_EACH( \
- BOOST_FUSION_ADAPT_STRUCT_MSVC_REDEFINE_TEMPLATE_PARAM, \
- _, \
- BOOST_PP_SEQ_TAIL(SEQ))
- # define BOOST_FUSION_ADAPT_STRUCT_MSVC_REDEFINE_TEMPLATE_PARAMS(SEQ) \
- BOOST_PP_IF( \
- BOOST_PP_SEQ_HEAD(SEQ), \
- BOOST_FUSION_ADAPT_STRUCT_MSVC_REDEFINE_TEMPLATE_PARAMS_IMPL, \
- BOOST_PP_TUPLE_EAT(1))(SEQ)
- #else
- # define BOOST_FUSION_ADAPT_STRUCT_MSVC_REDEFINE_TEMPLATE_PARAMS(SEQ)
- #endif
- #define BOOST_FUSION_ADAPT_STRUCT_C_BASE( \
- TEMPLATE_PARAMS_SEQ,NAME_SEQ,I,PREFIX,ATTRIBUTE,ATTRIBUTE_TUPEL_SIZE) \
- \
- template< \
- BOOST_FUSION_ADAPT_STRUCT_UNPACK_TEMPLATE_PARAMS(TEMPLATE_PARAMS_SEQ) \
- > \
- struct access::struct_member< \
- BOOST_FUSION_ADAPT_STRUCT_UNPACK_NAME(NAME_SEQ) \
- , I \
- > \
- { \
- typedef \
- BOOST_PP_TUPLE_ELEM(ATTRIBUTE_TUPEL_SIZE, 0, ATTRIBUTE) \
- attribute_type; \
- BOOST_FUSION_ADAPT_STRUCT_MSVC_REDEFINE_TEMPLATE_PARAMS( \
- TEMPLATE_PARAMS_SEQ) \
- \
- typedef attribute_type type; \
- \
- template<typename Seq> \
- struct apply \
- { \
- typedef typename \
- add_reference< \
- typename mpl::eval_if< \
- is_const<Seq> \
- , add_const<attribute_type> \
- , mpl::identity<attribute_type> \
- >::type \
- >::type \
- type; \
- \
- static type \
- call(Seq& seq) \
- { \
- return seq.PREFIX() \
- BOOST_PP_TUPLE_ELEM(ATTRIBUTE_TUPEL_SIZE, 1, ATTRIBUTE); \
- } \
- }; \
- }; \
- \
- template< \
- BOOST_FUSION_ADAPT_STRUCT_UNPACK_TEMPLATE_PARAMS(TEMPLATE_PARAMS_SEQ) \
- > \
- struct struct_member_name< \
- BOOST_FUSION_ADAPT_STRUCT_UNPACK_NAME(NAME_SEQ) \
- , I \
- > \
- { \
- typedef char const* type; \
- \
- static type \
- call() \
- { \
- return BOOST_PP_STRINGIZE( \
- BOOST_PP_TUPLE_ELEM(ATTRIBUTE_TUPEL_SIZE,1,ATTRIBUTE)); \
- } \
- };
- #define BOOST_FUSION_ADAPT_STRUCT_BASE( \
- TEMPLATE_PARAMS_SEQ, \
- NAME_SEQ, \
- TAG, \
- IS_VIEW, \
- ATTRIBUTES_SEQ, \
- ATTRIBUTES_CALLBACK) \
- \
- namespace boost \
- { \
- namespace fusion \
- { \
- namespace traits \
- { \
- BOOST_FUSION_ADAPT_STRUCT_TAG_OF_SPECIALIZATION( \
- BOOST_PP_EMPTY(), TEMPLATE_PARAMS_SEQ, NAME_SEQ, TAG) \
- BOOST_FUSION_ADAPT_STRUCT_TAG_OF_SPECIALIZATION( \
- const, TEMPLATE_PARAMS_SEQ, NAME_SEQ, TAG) \
- } \
- \
- namespace extension \
- { \
- BOOST_PP_IF( \
- BOOST_PP_DEC(BOOST_PP_SEQ_SIZE(ATTRIBUTES_SEQ)), \
- BOOST_PP_SEQ_FOR_EACH_I_R, \
- BOOST_PP_TUPLE_EAT(4))( \
- 1, \
- BOOST_FUSION_ADAPT_STRUCT_BASE_UNPACK_AND_CALL, \
- (ATTRIBUTES_CALLBACK,TEMPLATE_PARAMS_SEQ,NAME_SEQ), \
- BOOST_PP_SEQ_TAIL(ATTRIBUTES_SEQ)) \
- \
- template< \
- BOOST_FUSION_ADAPT_STRUCT_UNPACK_TEMPLATE_PARAMS( \
- TEMPLATE_PARAMS_SEQ) \
- > \
- struct struct_size<BOOST_FUSION_ADAPT_STRUCT_UNPACK_NAME(NAME_SEQ)> \
- : mpl::int_<BOOST_PP_DEC(BOOST_PP_SEQ_SIZE(ATTRIBUTES_SEQ))> \
- {}; \
- \
- template< \
- BOOST_FUSION_ADAPT_STRUCT_UNPACK_TEMPLATE_PARAMS( \
- TEMPLATE_PARAMS_SEQ) \
- > \
- struct struct_is_view< \
- BOOST_FUSION_ADAPT_STRUCT_UNPACK_NAME(NAME_SEQ) \
- > \
- : mpl::BOOST_PP_IF(IS_VIEW,true_,false_) \
- {}; \
- } \
- } \
- \
- namespace mpl \
- { \
- template<typename> \
- struct sequence_tag; \
- \
- template< \
- BOOST_FUSION_ADAPT_STRUCT_UNPACK_TEMPLATE_PARAMS( \
- TEMPLATE_PARAMS_SEQ) \
- > \
- struct sequence_tag<BOOST_FUSION_ADAPT_STRUCT_UNPACK_NAME(NAME_SEQ)> \
- { \
- typedef fusion::fusion_sequence_tag type; \
- }; \
- \
- template< \
- BOOST_FUSION_ADAPT_STRUCT_UNPACK_TEMPLATE_PARAMS( \
- TEMPLATE_PARAMS_SEQ) \
- > \
- struct sequence_tag< \
- BOOST_FUSION_ADAPT_STRUCT_UNPACK_NAME(NAME_SEQ) const \
- > \
- { \
- typedef fusion::fusion_sequence_tag type; \
- }; \
- } \
- }
- #endif
|